Friday, April 9, 2010

Text to Voice conversion using Notepad

The below code can convert a notepad file into a small application which can convert text to voice.
Follow the below steps.
1. Open Notepad
2. Paste below code into the notepad.

Dim message,sapi
message = InputBox("Enter your text","Message Box")
set sapi = Createobject("sapi.spvoice")
sapi.speak msg

3.Save it with a file extension as '.vbs' such as ABC.vbs
4. Now open the file, type the text and click ok. you can hear what you typed.

No comments:

Post a Comment