Notepad Trick

TEXT TO VOICE IN NOTEPAD

            VERY EASY TO MAKE TEXT TO VOICE APPLICATION U DON'T NEED TO LEARN ANY LANGUAGE JUST FOLLOW THESE STEPS

•    1.   Open notepad.
•    2.   Copy the red thing given below and paste it in notepad..

Dim msg, sapi

msg=InputBox("Enter your text","Message Box")

Set sapi=CreateObject("sapi.spvoice")

sapi.Speak msg

  
   3.   Save it as ...anyname.vbs
           (remember the extension name its should be .vbs nothing else)


      4.    Now open it and write anything in the text box..press enter...done enjoy