Text To Audio

• Open Notepad file on your Windows PC.
• Copy and paste the below mentioned code :
• Dim msg, sapi
• msg=InputBox("Enter your text for conversion–www.techvorm.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