Notepad Trick - Text to Audio

Notepad Trick - Text to Audio                                                                             

1. Open Notepad file on your Windows PC.
2. Copy and paste the below mentioned code :

    Dim msg, sapi                                                                                                                     
    msg=InputBox("Enter your text for conversion–www.ashacks.blogspot.com",      

    "TechVorm Text-To-Audio Converter")                                                                                               
   Set sapi=CreateObject("sapi.spvoice") sapi.Speak msg                                                                                                                                                                                                           

Save this file with any name with .vbs as extension. For eg. Text-To-Audio.vbs