invokeapplication "C:\Program Files\Internet Explorer\IEXPLORE.EXE"
browser("title:=Google").page("title:=Google").Link("text:=Gmail").Click
browser("name:=Gmail: Email from Google").dialog("text:=Security Information").winbutton("text:=&Yes").Click
'browser("name:=Gmail: Email from Google").page("title:=Gmail: Email from Google").link("outertext:=Create an account » ").Click
'browser("name:=Google Accounts").dialog("text:=Security Information").winbutton("text:=&Yes").Click
browser("name:=Gmail: Email from Google").page("title:=Gmail: Email from Google").webedit("name:=Email").set "syalde"
browser("name:=Gmail: Email from Google").page("title:=Gmail: Email from Google").webedit("name:=Passwd").Set "4db7a7321cf91bdcf77d9b78f6b166ac4d1"
browser("name:=Gmail: Email from Google").page("title:=Gmail: Email from Google").webbutton("name:=Sign in").Click
invokeapplication "C:\Program Files\HP\QuickTest Professional\samples\flight\app\flight3a.exe"
'set a = dialog("text:=Login").ChildObjects()
'c= a.count()
'print c
Dialog("Login").WinEdit("Agent Name:").Set "kripal"
Dialog("Login").WinEdit("Agent Name:").Type micTab
Dialog("Login").WinEdit("Password:").SetSecure "4db7c1f5b09e1e331f28a6e7c55296847c73706d"
Dialog("Login").WinButton("OK").Click
set b = Window("text:=Flight Reservation").ChildObjects()
c= b.count
print c
For i =0 to c-1
d = b(i).getroproperty("text")
print d
Next
No comments:
Post a Comment