标题: 登陆脚本如何实现循环 [打印本页] 作者: kunalex 时间: 2008-1-10 10:42 标题: 登陆脚本如何实现循环 参照网上例子,编写登陆脚本如下,在setting的run下面设置run on all rows 去无法实现循环,请教是什么原因?
Dim Status
Browser("Login").Page("Login").WebEdit("UserName").Set DataTable("username", dtLocalSheet)
Browser("Login").Page("Login").WebEdit("Password").Set DataTable("password", dtLocalSheet)
Status = DataTable("Status", dtLocalSheet)
If Status="pass" Then
Browser("Login").Page("Login").WebButton("登入").Click
Browser("Login").Page("Page").Link("渠道管理").Click
End If
If Status="该用户不存在" Then
Reporter.ReportEvent micFail, "登陆", "登陆失败."
Browser("Login").close
End If