发布新日志

  • QTP小案例

    2009-01-08 18:29:45

    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、修改脚本（粗体即是主要添加的代码）

    遗留问题：

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

         还有页面上状态也改变

    查看(680) 评论(0) 收藏 分享 管理

Open Toolbar