Smallest Text to Speech Program

1.Open Notepad and copy and paste the following code into it

Dim message, sapi
message=InputBox("What do you want me to say?","Speak to Me")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak message

2.Now save the notepad file with the name speak.vbs at your desktop.
3.Now double click on speak.vbs type in the box whatever you want your computer to speak for you.

I have a sample uploaded here, just download it to your windows PC and double click on it.

I have hosted the above file in my DropBox Public folder.(Learn How)

More tech tips at Digital Inspiration's Blog can be found here


  1. I can propose another version of speak.vbs script. It speaks aloud any text that is currently in your clipboard. Enjoy.;topic=10799.0;attach=10981


Post a Comment

Popular posts from this blog

Load Testing Using Gatling

Bengali English word definition in Google Dictionary

Automatically Deploying to Google Appengine from Github using Cloud Build