标题: checkpoint设置为变量执行后的问题 [打印本页] 作者: shengyan 时间: 2005-11-11 12:40 标题: checkpoint设置为变量执行后的问题 以下代码是我录制的一个登录事件，把登录后页面上显示的当前用户名称zj设为检查点，再把这个检查点赋于变量a，如果检查点错误则提示，如果检查点正确则执行退出操作。但是在回放的过程中，输入编码、用户名、密码为空，并直接到
set a = Browser("登录").Page("突发公共卫生综合管理信息系统_2").Frame("mainFrame").Check CheckPoint("zj")这条语句，并提示run error“the test run cannot continue due to a syntax error 语句未结束”details中指的就是set这条语句
------------------------------------------------------------------------------------------------------------
'login
Browser("登录").Page("登录").WebEdit("txtOrganCode").Set "33000000"
Browser("登录").Page("登录").WebEdit("txtUserName").Set "zj"
Browser("登录").Page("登录").WebEdit("txtPassword").SetSecure "4374125a5745a21a6d101d554476148e1e4b"
Browser("登录").Page("登录").WebButton("登录").Click
Browser("登录").Page("突发公共卫生综合管理信息系统").Image("MBaseInfo").Click
Browser("登录").Page("突发公共卫生综合管理信息系统_2").Frame("leftFrame").Link("职业").Click
Browser("登录").Page("突发公共卫生综合管理信息系统_2").Frame("topFrame").Image("btExit").FireEvent "onmouseover"
Browser("登录").Page("突发公共卫生综合管理信息系统_2").Frame("mainFrame").Check CheckPoint("zj")
'checkpoint
set a = Browser("登录").Page("突发公共卫生综合管理信息系统_2").Frame("mainFrame").Check CheckPoint("zj")
If (a = false) Then
Reporter.ReportEvent micFail "zj check point" "check point error"
else
Browser("登录").Page("突发公共卫生综合管理信息系统_2").Frame("topFrame").Image("btExit").Click
Browser("登录").Page("突发公共卫生综合管理信息系统").Image("ExitSystem").Click
End If