|
Browser("XX系统").Page("XX系统").WebEdit("UserName").Set DataTable("UserName", dtGlobalSheet)
Browser("XX系统").Page("XX系统").WebEdit("Password").SetSecure DataTable("PassWord", dtGlobalSheet)
Browser("XX系统").Page("XX系统").Image("Button1").Click DataTable("p_x", dtGlobalSheet), DataTable("p_y", dtGlobalSheet)
If Browser("XX系统").Dialog("Microsoft Internet Explorer").Exist(1) then
Browser("XX系统").Dialog("Microsoft Internet Explorer").WinButton("确定").Click --这一行就是弹出的那个提示框
End If
Browser("XX系统").Page("XX系统").Sync
Browser("XX系统").Close |
|