QTP小案例

Browser("BPS管理监控端").Page("BPS管理监控端").Frame("processInstFrame").WebList("queryCondition/_expr[4]/curren").Select DataTable("processinst_state", dtGlobalSheet)

Browser("BPS管理监控端").Page("BPS管理监控端").Frame("processInstFrame").WebButton("查询").Click
Browser("BPS管理监控端").Page("BPS管理监控端").Frame("processInstQueryResult").WebCheckBox("processInstID_2").Set "ON"
Browser("BPS管理监控端").Page("BPS管理监控端").Frame("processInstQueryResult").WebButton("挂起").Click

 If datatable.Value("processinst_state",dtGlobalSheet)<>"运行"Then
        wait(10)
         Browser("BPS管理监控端").Dialog("Microsoft Internet Explorer").Static("选中的流程实例不能被挂起").Check CheckPoint("选中的流程实例不能被挂起")

      Browser("BPS管理监控端").Dialog("Microsoft Internet Explorer").WinButton("确定").Click
 End If
 datatable.SetNextRow

场景：管理监控端流程实例管理，根据流程实例状态查询后选中第一条记录点击<挂起>按钮

案例：对各种状态的流程实例执行挂起操作

     验证点只验证了执行的正确及错误页面的情况，即错误会弹出提示框，验证提示的内容是否正确

操作：1、录制成功及失败的情况

     2、将流程实例状态的下拉列表内容参数化，在datatable中添加记录

     3、修改脚本（粗体即是主要添加的代码）

遗留问题：

     正确的情况是否真正验证成功还需要从数据库中判断状态是否修改

     还有页面上状态也改变