Tuesday, September 18, 2012

Make Your PC Speak To You

Would you like to make your PC to talk to you. Use following code and edit text, enter what ever text you want and computer will talk to you.

Step 1: Copy following code and paste in a notepad

CreateObject("SAPI.SpVoice").Speak"Type Your Text Here"

Change highlighted text as your wish

Step 2: Save notepad as test.vbs(Test can be any name but text file should have .vbs extension)

Click on test.vbs
Done
Note: Works on windows systems only.


Another script:
Dim message, sapi Message=InputBox("What do you want me to say?","Speak to Me")
 Set sapi=CreateObject("sapi.spvoice")
Sapi.Speak message

No comments:

Post a Comment