Thursday 14 June 2012

Create your own Speaking Tool for your PC..

You can create a speaking tool of your own..

Step to be followed to create the SPEAK THIS TOOL:
  • Open the notepad
  • Copy and Paste the given below. 
Dim message, sapi
do
message=InputBox("Enter the text you want spoken","Speak This")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak message
loop until message = ""
  • Save the Filename  as  “SPEAK THIS.vbs” , Select the Save as type as All files and Press ok.
  • Close the Notepad 
  • Open the SPEAK THIS.vbs.
  • Enter the text in the INPUTBOX and Press Ok..
  • The Tool will speak the content typed by you 
  •  Enjoy ….



1 comment: