Posted Mon Oct 05, 2015 3:35 pm
Just copy the code below and save it in the notepad as anyname.vbs.
Then double click on the file you see a textbox like this
Then type what ever you want and click ok button.....
copy the code below:
Then double click on the file you see a textbox like this
Then type what ever you want and click ok button.....
copy the code below:
- Code:
Dim message, sapi
message=InputBox("What do you want me to say?","Speak to Me")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak message