51Testing软件测试论坛

标题: 请问这个脚本错在哪里啊 [打印本页]

作者: qinfarmer 时间: 2006-3-13 15:48
标题: 请问这个脚本错在哪里啊
Browser("My JSP 'MyJsp.jsp' starting").Page("My JSP 'MyJsp.jsp' starting").WebEdit("userName").Set "test4"
Browser("My JSP 'MyJsp.jsp' starting").Page("My JSP 'MyJsp.jsp' starting").WebEdit("passWord").Set "test4"
Browser("My JSP 'MyJsp.jsp' starting").Page("My JSP 'MyJsp.jsp' starting").WebButton("提交").Click
Browser("My JSP 'MyJsp.jsp' starting").Page("论坛").Link("论坛好友管理").Click

Browser("My JSP 'MyJsp.jsp' starting").Page("论坛_2").WebEdit("groupName").Set DataTable("group_name", dtLocalSheet)
Browser("My JSP 'MyJsp.jsp' starting").Page("论坛_2").WebButton("创建").Click
If datatable("null_error",dtlocalsheet)<>""Then
Browser("My JSP 'MyJsp.jsp' starting").Dialog("Microsoft Internet Explorer").Static("请填写组名！").Check CheckPoint("请填写组名！")
Browser("My JSP 'MyJsp.jsp' starting").Dialog("Microsoft Internet Explorer").Output CheckPoint("Microsoft Internet Explorer")
Browser("My JSP 'MyJsp.jsp' starting").Dialog("Microsoft Internet Explorer").WinButton("确定").Click

elseif datatable("more_error",dtlocalsheet)<>"" then
Browser("My JSP 'MyJsp.jsp' starting").Dialog("Microsoft Internet Explorer").Static("请填写组名！").Check CheckPoint("组名最多只能输入50个字符！")
Browser("My JSP 'MyJsp.jsp' starting").Dialog("Microsoft Internet Explorer").Output CheckPoint("Microsoft Internet Explorer_2")
Browser("My JSP 'MyJsp.jsp' starting").Dialog("Microsoft Internet Explorer").WinButton("确定").Click

elseif datatable("have_error",dtlocalsheet)<>"" then
Browser("论坛").Page("论坛_2_2").Check CheckPoint("已经存在了")
Browser("论坛").Page("论坛_2_2").Output CheckPoint("已经存在了_2")
Browser("论坛").Page("论坛_2").Sync

else
Browser("My JSP 'MyJsp.jsp' starting").Page("论坛_3_2").Check CheckPoint("组名添加成功")
Browser("My JSP 'MyJsp.jsp' starting").Page("论坛_3").Sync
Browser("My JSP 'MyJsp.jsp' starting").Close
End If

作者: 海龙 时间: 2006-3-13 23:49
错误信息？

作者: mstiunicon 时间: 2006-3-14 19:55
标题: 页面校验和数据库校验没有区分开
从if语句开始到结束：

'页面校验开始
If datatable("null_error",dtlocalsheet)<>""Then
Browser("My JSP 'MyJsp.jsp' starting").Dialog("Microsoft Internet Explorer").Static("请填写组名！").Check CheckPoint("请填写组名！")
'这个检查点需要参数化，取datatable的null_error一列的值即可，不需要写两遍。
Browser("My JSP 'MyJsp.jsp' starting").Dialog("Microsoft Internet Explorer").Output CheckPoint("Microsoft Internet Explorer")
Browser("My JSP 'MyJsp.jsp' starting").Dialog("Microsoft Internet Explorer").WinButton("确定").Click
'页面校验结束
Else

'下面是数据库校验的反馈信息
if datatable("have_error",dtlocalsheet)<>"" then
Browser("论坛").Page("论坛_2_2").Check CheckPoint("已经存在了")
Browser("论坛").Page("论坛_2_2").Output CheckPoint("已经存在了_2")
Browser("论坛").Page("论坛_2").Sync
'估计你们的系统是在页面上直接显示"已经存在了"的文字，这是新增不成功的情况。
else
Browser("My JSP 'MyJsp.jsp' starting").Page("论坛_3_2").Check CheckPoint("组名添加成功")
Browser("My JSP 'MyJsp.jsp' starting").Page("论坛_3").Sync
Browser("My JSP 'MyJsp.jsp' starting").Close
'新增成功了
End If
End If

[ 本帖最后由 mstiunicon 于 2006-3-14 19:56 编辑 ]

欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/)