Make your computer speak whatever you type
 1] open notepad
 And
 2] copy and paste the following code in it and save it as speak.vbs and open it...
 Code is:
 Dim message, sapi
 message=InputBox("What do you want me to say?","Speak to Me")
 Set sapi=CreateObject("sapi.spvoice")
 sapi.Speak message
0 comments:
Post a Comment