QTP 值得思考的两个脚本

来源:互联网 发布:淘宝网 等级 编辑:程序博客网 时间:2024/05/23 11:45
一、
Dim status
status=Datatable("status",dtGlobalsheet)
If status="用户不存在" Then
Window("Flight Reservation").Close
elseif  status="登录成功" Then
Dialog("Login").WinEdit("Agent Name:").Setdatatable("un",dtGlobalsheet)
Dialog("Login").WinEdit("Password:").SetSecuredatatable("ps",dtGlobalsheet)
Dialog("Login").WinButton("OK").Click
End If
 
备注:改程序有没有意义?
------------------------
二、
Dim status
Window("Flight Reservation").Close
Dialog("Login").WinEdit("Agent Name:").Setdatatable("un",dtGlobalsheet)
Dialog("Login").WinEdit("Password:").SetSecuredatatable("ps",dtGlobalsheet)
status=Datatable("status",dtGlobalsheet)
If status="用户不存在" Then
Reporter.ReportEvent micFail, "登陆","登陆失败."
elseif  status="登录成功" Then
Window("FlightReservation").Close
End If
 
备注:程序跑不通

DataTable设计为:
 un ps status lhc 47fcc2abed4e0cec23813f984790937efda58974 登录成功 xx xx 用户不存在
                                                    
              
                                                 
 
原创粉丝点击