1.Create Notepad
2.Copy/Write the code as given
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.press OK.type what u want to speak
2.Copy/Write the code as given
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.press OK.type what u want to speak
No comments:
Post a Comment