Hi All,

for below query getting error  "Type mismatch: Window"

Dim X
Set x = CreateObject("Wscript.Shell")
x.Run "Calc"

If window("Calculator").Exist Then
    msgbox "Window Existed"
Window("Calculator").WinButton("7").Click
wait(2)
Window("Calculator").WinButton("+").Click
wait(2)
Window("Calculator").WinButton("8").Click
wait(2)
Window("Calculator").WinButton("=").Click
wait(5)
else
    msgbox "Window Not Existed"
End If

pls advice
Thanks in Advance


regards,
akbar

-- 
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

Reply via email to