Text to Speech PART-2


Hi friends, in my previous post, i told you the way to convert text to speech without any software.
Now i am going to tell you two more methods for this:

METHOD 1. :
>Open notepad.
>Copy and paste this code in the notepad.

CreateObject("SAPI.SpVoice").Speak"YOUR TEXT HERE"


>Replace your text with YOUR TEXT HERE.
>Now save this files as speak.vbs
>Now double click to run this script.
>You will listen your typed text.


METHOD 2. :
>Open Notepad.
>Copy and paste this code in notepad.


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


>Save it as talktome.vbs
>Now double click to open it.
>A box will appear. Type your text in that and press enter.
>You will listen what you typed.


Enjoy.

G+

0 comments:

Post a Comment