Steps
1. Open the Notepad.
2.Copy/Write the code as given below into the notepad.
Dim message, sapi
message=InputBox("What do you want me to say?","Speak to Me")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak message
3. Save the file with any name with an extension .vbs
4. Run the file, type anything you want in the textbox and press OK.
5. Enjoy !
No comments:
Post a Comment