Just copy and paste the following lines of code in notepad:
Code:
Dim userInput
userInput = InputBox("Write a message for me to say")
Set Sapi = Wscript.CreateObject("SAPI.SpVoice")
Sapi.speak userInput
Save it
anything.vbs
Then You Can See Something Like this add text You want to say as Sound
0 comments:
Post a Comment