Covert your text into audio

• Open Notepad
• Copy the code given below

Dim msg, sapi
msg=InputBox("Enter your text for conversion–www.softstrends.blogspot.com","PC Hacks Text-To-Audio coverter")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak msg

• And save the notepad file with .vbs extension. Now you can covert your text into audio