|
我试着编写了一下,关于访问QTP自带的WEB界面的代码,但是总运行不成功,我痛苦了一天了,烦死了。我是个新手,希望能解决得帮我解决一下,先谢谢了。
目的:登陆QTP自带的web界面,使用不同的账号和密码
操作:1.把excel中值导入到datatable中。(excel中只有两列五行,user和pwd,值也很简单)
2.读取datatable中的值,没读取一次后,执行一下登陆的操作。共循环五次(因为excel的行数是5)
错误原因描述: 执行循环的第一次时,很顺利,但是执行到第二次时就报出错误----不能找到对象
代码:
Public function Welcome ( )
datatable.ImportSheet"D:\lzz.xls","Sheet1","Global"
Dim i
i =0
While i < datatable.GetRowCount
Dim dtuser,dtpwd
dtuser = datatable.Value("user","Global")
dtpwd = datatable.Value("pwd","Global")
Browser("Welcome: Mercury Tours").Page("Welcome: Mercury Tours").WebEdit("userName").set (dtuser)
Browser("Welcome: Mercury Tours").Page("Welcome: Mercury Tours").WebEdit("password").Set(dtpwd)
Browser("Welcome: Mercury Tours").Page("Welcome: Mercury Tours").Image("Sign-In").Click
If Browser("Welcome: Mercury Tours").Page("Find a Flight: Mercury").Exist Then
Print (" 登陆成功")
else
print ("登陆失败")
End If
Browser("Welcome: Mercury Tours").Close
i= i +1
datatable.SetNextRow
Wend
End Function
Call Welcome( )
错误
Cannot find the "userName" object's parent "Welcome: Mercury Tours" (class Browser). Verify that parent properties match an object currently displayed in your application.
我不知道我是否能描述清楚了。希望各位能帮一下我这个问题。 |
|