Lesson No.28 Make Your Computer Speech Any Message

Hello there, Welcome to our blog. How you all are, Hope you all doing great. On our blog you will find support for tech, hacking and social tweaks. We provide networking solutions for any type of problem. You can contact us through this blog. We will do whatever we can do for your problem.

Make Your Computer Speech Any Message

Description: This VBs will Make your computer speech by using microsoft assistant voice.
You can change the Speech message by changing "your messagehere" field.
To use This VBScript Just copy the vbs code given below on notepad file and save it as myscript.vbs 
To stop this VBscript..Open Task manager by Pressing ctrl+alt+del
and then click on Process tab and kill the process "Wscript.exe"

On Error Resume Next

strAgentName2 = "MERLIN"
strAgentPath2 = "C:\Windows\Msagent\Chars\" & strAgentName2 & ".acs"
Set objAgent2 = CreateObject("Agent.Control.2")

objAgent2.Connected = TRUE
objAgent2.Characters.Load strAgentName2, strAgentPath2
Set objPeter = objAgent2.Characters.Character(strAgentName2)

objPeter.MoveTo 700,300
objPeter.Show

objPeter.Play "GetAttention"
objPeter.Play "GetAttentionReturn"

objPeter.Speak("your message here")

Wscript.Sleep 1000

Set objAction= objPeter.Hide

Do While objPeter.Visible = True
Wscript.Sleep 250
Loop