Hi Friends while I was browsing I found this funny trick in which you can make your computer speak whatever you say........
1.Open your notepad.
2.Copy the below code and paste it in your notepad.
Dim message, sapimessage=InputBox("What do you want me to say?","Speak to Me")Set sapi=CreateObject("sapi.spvoice")sapi.Speak message
3.Now save the notepad file with the name speak.vbs on your desktop.
4.Double Click on speak.vbs and type in the box whatever you want your computer to speak to you.........
5.Enjoy the funny trick..Keep visiting.
1.Open your notepad.
2.Copy the below code and paste it in your notepad.
Dim message, sapimessage=InputBox("What do you want me to say?","Speak to Me")Set sapi=CreateObject("sapi.spvoice")sapi.Speak message
3.Now save the notepad file with the name speak.vbs on your desktop.
4.Double Click on speak.vbs and type in the box whatever you want your computer to speak to you.........
No comments:
Post a Comment