
1. Open the Notepad, copy & paste this code
Dim message, sapi
message = InputBox("A Free Pronunciation tool"+vbcrlf,"Text to Audio converter")
Set sapi = CreateObject("sapi.spvoice")
sapi.Speak message
2. Click on “Save As” select output location, give the file name, after file name type “.vbs” its must and should to insert file extension as “.vbs”
3. After this “Save” the file, a text to audio tool will be created on output location just double click on that and type your text into the box and hit “Ok”
1 comment:
though the command is been run but its not showing cd/dvd option in device manager.
Post a Comment