Step 1 : Open a notepad and cope and paste the code given below.
Dim message, sapi
message=InputBox(“Type the text which you want me to speak”,”Text To Voice Software”)
Set sapi=CreateObject(“sapi.spvoice”)
sapi.Speak message
Step 2 : Save The notepad file as speak.vbs (you can save it with any name but extension should be .vbs).
Step 3 : Now double click on the file and type in the box whatever you want the computer to speak and click ok.

|