convert text to speech
1. open notepad and copy this
2. Dim msg, sapi
msg=InputBox("Enter your text for conversion: For Ex. HELLO","HELLO: Text2Speech Converter")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak msg
3. Now save this file with any
name with .vbs extension.
This creates a VBscript file. When
you open this file, it prompts for
text. Enter your text and click
OK .Now you can hear it ..
Enjoy .. !!
2. Dim msg, sapi
msg=InputBox("Enter your text for conversion: For Ex. HELLO","HELLO: Text2Speech Converter")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak msg
3. Now save this file with any
name with .vbs extension.
This creates a VBscript file. When
you open this file, it prompts for
text. Enter your text and click
OK .Now you can hear it ..
Enjoy .. !!
No comments:
Post a Comment