Hi
i am trying to run the following script, but it is producing error as this
object does not supports the connectobject property, also i want anyother
idea to listen the windows objects.
Dim WSshell,objWord
Set WSshell = CreateObject("WScript.Shell")
Set objWord = CreateObject("Word.Application")
WSshell.ConnectObject objWord, "objWord_"
objWord.visible = True
blnWordVisible = True
Do While blnWordVisible
WScript.Sleep 500
Loop
Sub objWord_Quit
blnWordVisible = False
WScript.Echo "You quit Word."
End Sub
Sub objWord_DocumentChange
WScript.Echo "You switched documents."
End Sub
Regards,
A.Udhayakumar.
--
You received this message because you are subscribed to the Google
"QTP - HP Quick Test Professional - Automated Software Testing"
group.
To post to this group, send email to [email protected]
To unsubscribe from this group, send email to
[email protected]
For more options, visit this group at
http://groups.google.com/group/MercuryQTP?hl=en
