在调试脚本的过程中遇到了个问题...
判断某个单选框是否被选中
第一步先要找出你要判断哪个单选框,通过webradiogroup的value值来判断
v=Browser("编辑个人资料").Page("编辑个人资料").WebRadioGroup("_fmf.edit._0.si").GetROProperty("value")
If v=3 Then
a=Browser("编辑个人资料").Page("编辑个人资料").WebRadioGroup("_fmf.edit._0.si").GetROProperty("checked")
'If a=1 Then
Reporter.ReportEvent 0, "单选框被选中", "The user-defined step pass."
end if '
else if v<>3 then
Reporter.ReportEvent 1, "单选框未被选中", "The user-defined step pass."
End If
End If
如果取出来的value值不等于3 其实就是说这个单选框没被选中 就输出报告
中间注释掉的语句其实可以不用写的 因为qtp只能找到被选中的那个单选框的value,如果这个单选框没被选中.qtp自然也是找不到的 (这个也是调试脚本发现的结论..)
if这些个判断因为不能在报告中反应出来是成功了还是失败了.所以可以把这个结果输出到测试报告中.
方法:
在result中报告测试结果。
语法
Reporter.ReportEvent EventStatus, ReportStepName, Details [, in]
Argument Type Descrīption
EventStatus Number or pre-defined constant
状态值:
0 或 micPass:将本步骤的运行结果状态设置为“Pass”,并向Result中产生报告信息。
如果想在报告中生成“通过”报告,用本状态值。
1 或 micFail: 将本步骤的运行结果状态设置为“Fail”,并向Result中产生报告信息。当脚本中运行本语句时,整个测试的结果状态是“fails”。
如果想在报告中生成“失败”报告,用本状态值。如果运行了本语句,则整个测试的状态为“Fail”。
2 或 micDone:仅向Result中产生报告信息,但不影响整个测试的结果状态。
如果想在报告中生成“完成”报告,用本状态值。
3 或 micWarning: S向Result中产生报告信息,但是不会中断测试的运行,也不影响测试的 pass
/fail status。
如果想在报告中生成“警告”报告,用本状态值。运行这个语句后,整个测试结果状态为“Warning”。
ReportStepName String 将在报告中显示的步骤名称(object name).
Details String 报告的详细信息。这些信息是本条报告的“Details”信息。
in N/A Not in use
举例: 下面的例子使用ReprotEvent方法来报告一个失败信息。
Reporter.ReportEvent 1, "Custom Step", "The user-defined step failed."