Question

我编写了以下代码，用于在运行时使用scrpit附加我的恢复方案。它如下：

Dim App
Set App = CreateObject("QuickTest.Application")
App.Test.Settings.Recovery.Enabled = True
App.Test.Settings.Recovery.SetActivationMode "OnEveryStep"
App.Test.Settings.Recovery.Add "C:\QTP\Recovery\Navigation.qrs", "Navigation", 1
App.Test.Settings.Recovery.Item(1).Enabled = True
Recovery.Activate

正在调用恢复方案，但报告中未显示已调用恢复方案。因为它不在报告中，是否没有调用恢复方案？或者我在代码中遗漏了一些东西。还有什么要补充的？

修改对不起，再次检查它，并不是恢复方案调用没有进入报告。我刚刚发现错误发生时没有调用恢复方案本身。但是如果我转到文件 - >设置并在恢复中看到，则添加恢复方案文件，当我第二次运行它时，则调用恢复方案。可能是什么问题。

提前感谢您的帮助。

Answer 1

您可以写入报告以确保恢复方案已运行

 Reporter.ReportEvent micDone, "Recovery Scenario", "Has been run"

通过代码在QTP中运行恢复方案的问题

1 个答案: