'检查文本框对象是否存在(通过查源文件找出该对象的name值)
Browser("Welcome: Mercury Tours").Page("Welcome: Mercury Tours").Link("REGISTER").Click
If Browser("Welcome: Mercury Tours").Page("Register: Mercury Tours").WebEdit("email").Exist Then
MsgBox("用户对象存在")
Browser("Welcome: Mercury Tours").Page("Register: Mercury Tours").WebEdit("email").Set("test")
Else
MsgBox("用户对象不存在")
End If
2008年11月25日星期二
检查被测页面中对象是否存在
在手工编写脚本时,我们常常需要检查一下页面中每个需要测试的对象是否存在,如果对象存在,用例被正常执行;否则应设置提示或报错退出。
订阅:
博文评论 (Atom)
没有评论:
发表评论