Step 1. First of all Open notepad then copy the below text and paste it in notepad.
Dim msg, sapi
msg=InputBox(“Enter your text for conversion– “,”By computer
msg=InputBox(“Enter your text for conversion– “,”By computer
freaks”)
Set sapi=CreateObject(“sapi.spvoice”)
sapi.Speak msg
Set sapi=CreateObject(“sapi.spvoice”)
sapi.Speak msg
Step
2: After Pasting the Above Code in notepad, Save the file with the
name
Text To Audio.vbs.
remember the name of the file should
be with .vbs extension.
its nothing but a Vbscript File.
its nothing but a Vbscript File.
Step 3: Now double click on the saved file and you will see a box like the below pic.
Step 4. Type your text which you want to hear, and then
press OK. Thats it. All
Done.
You can hear it load and clear.
You can hear it load and clear.
No comments:
Post a Comment