Thursday, December 9, 2010

TEXT 2 AUDIO

hey guys wanna listen to computer inner voice 2 watever u write here is the way.U only need 2 write this coding in notepad and save it with anyname.vbs eg:-text2audio.vbs and then see the magic..


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