wuminru_01 发表于 2013-10-22 10:12:29

QTP如何设置动态属性标准检查点

本帖最后由 wuminru_01 于 2013-10-22 10:14 编辑

首先我使用该方法进行校验脚本动态点
Dim Get_Order_No
Get_Order_No=window("Flight Reservation").WinEdit("Order No:").GetROProperty("text") '获取参数
DataTable.LocalSheet.AddParameter "Order_No_text",Get_Order_No
window("Flight Reservation").WinEdit("Order No:").Check CheckPoint("Order No:")
'If StrComp(Get_Order_No,parameter("Order_No_text"))=0 Then
   ' Reporter.ReportEvent micPass, "订单成功", "通过动态值检查"
'End If
运行时系统在DATAtable中会新增一列数据，之后检查失败
我在使用如下方法进行脚本动态点检验
Dim Get_Order_No
Get_Order_No=window("Flight Reservation").WinEdit("Order No:").GetROProperty("text") '获取参数
'DataTable.LocalSheet.AddParameter "Order_No_text",Get_Order_No
'window("Flight Reservation").WinEdit("Order No:").Check CheckPoint("Order No:")
if StrComp(Get_Order_No,parameter("Order_No_text"))=0 Then
   Reporter.ReportEvent micPass, "订单成功", "通过动态值检查"
End If
出现找不到Order_No_text这个变量的错误，这个Order_No_text为DATATABLE的一列，请帮忙看看是什么原因呢？

赵佳乐SMILE 发表于 2013-10-22 11:15:23

不会 等着看看高手来

赵佳乐SMILE 发表于 2013-10-22 11:36:48

我用你上面的脚本 完全不报错

我是手动添加检查点选择standard的那个

Dim Get_Order_No
Get_Order_No=window("Flight Reservation").WinEdit("Order No:").GetROProperty("text") '获取参数
DataTable.LocalSheet.AddParameter "Order_No_text",Get_Order_No
window("Flight Reservation").WinEdit("Order No:").Check CheckPoint("Order No:")

赵佳乐SMILE 发表于 2013-10-22 11:41:08

第二个方法

Dim Get_Order_No
Get_Order_No=window("Flight Reservation").WinEdit("Order No:").GetROProperty("text") '获取参数
DataTable.LocalSheet.AddParameter "Order_No_text",Get_Order_No
'window("Flight Reservation").WinEdit("Order No:").Check CheckPoint("Order No:")
temp=DataTable.LocalSheet.GetParameter("Order_No_text").Value
msgbox temp
If StrComp(Get_Order_No,temp)=0 Then
    Reporter.ReportEvent micPass, "订单成功", "通过动态值检查"
End If
也是可以的

wuminru_01 发表于 2013-10-24 09:47:59

那是不是有可能我的QTP安装环境有问题呢？

wuminru_01 发表于 2013-10-24 16:23:52

不过谢谢了，我试了两种方法，第二种可以，第一种还是不行呢？
页: [1]
查看完整版本: QTP如何设置动态属性标准检查点