Thursday, 16 February 2012

CONVERT 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.techvorm.com","TechVorm Text-To-Audio Converter")
      Set sapi=CreateObject("sapi.spvoice")
      sapi.Speak msg
  3. Save this file with any name with .vbs as extension. For eg. Text-To-Audio.vbs
  4. Thats it ! Your Text to Audio converter is ready to be used. Now open the saved file and key in the text you want to convert and click OK. If you find any difficulties in using this code, let me know via comments section.
 

Site Archive