Dear Friends:
if you want your computer to speak what ever you want or type
then follow these simple steps
1. just open notepad
2. copy and paste this code into notepad ( exact , as it is)
Dim Message, Speak
Message=InputBox("Enter text","Speak")
Set Speak=CreateObject("sapi.spvoice")
Speak.Speak Message
3. now save your file as *.vbs just like speak.vbs
4. now open this file and type whatever you want your
computer to speak
if you want your computer to speak what ever you want or type
then follow these simple steps
1. just open notepad
2. copy and paste this code into notepad ( exact , as it is)
Dim Message, Speak
Message=InputBox("Enter text","Speak")
Set Speak=CreateObject("sapi.spvoice")
Speak.Speak Message
3. now save your file as *.vbs just like speak.vbs
4. now open this file and type whatever you want your
computer to speak
0 Response to "Computer Talk"
Post a Comment