|
3#
楼主 |
发表于 2011-9-27 17:07:36
|
只看该作者
谢谢你回答我的问题!
我按照你说的两步看了,都是没问题的,有“userName”对象啊,设断点的时候,用spy看也是 有这个对象的;循环运行了一次,就报上面的错误
我的代码如下:
Dim a
For i=1 to Datatable.GetRowCount
Browser("Welcome: Mercury Tours").Page("Welcome: Mercury Tours").WebEdit("userName").Set Datatable("username",dtGlobalSheet)
Browser("Welcome: Mercury Tours").Page("Welcome: Mercury Tours").WebEdit("password").SetSecure Datatable("password",dtGlobalSheet)
Browser("Welcome: Mercury Tours").Page("Welcome: Mercury Tours").Image("Sign-In").Click 26,8
a=Datatable("a",dtGlobalSheet)
If a="" Then
msgbox "登陆成功"
end if
If a="用户名不存在" then
msgbox "登录失败"
End If
Next |
|