Dim msg, sapi
msg=InputBox("Enter your text","Talk it")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak msg
Save the file with a (*.vbs) extension, it will create a VBScript File.
It will prompt you for a text when u open the file, input the text and press ok."
u will hear what u typed
Speech Application Programming Interface (SAPI) is an audio interface that was developed to use within Windows operating systems, the idea behind SAPI was to make possible the use of speech synthesis and recognition within the function of various Windows applications and refer the link for more
http://www.portset.co.uk/FAQ_on_Sapi.ht
this works in xp,may be in vista also.
enjoy!!!
No comments:
Post a Comment