Talking machine
1. Open notepad and paste the following code :
Dim msg, sapi
msg=InputBox("Enter your text","Talking machine")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak msg
2. save the file with .vbs extension,
Example: TextSpeech.vbs
it will create a VBScript File.
3. Double click on TextSpeech.vbs file
4. input the text and press ok and listen.”