通过代码在 QTP 中运行恢复方案时出现问题

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:QTPRecoveryNavigation.qrs", "Navigation", 1
App.Test.Settings.Recovery.Item(1).Enabled = True
Recovery.Activate

正在调用恢复方案

，但报表中未显示已调用恢复方案。 那么既然它不在报告中，那么恢复方案是否没有被调用？？还是我在代码中缺少某些内容。还有什么要补充的？

编辑：抱歉，再次检查，并不是说恢复方案调用没有报告。我刚刚发现发生错误时不会调用恢复方案本身。但是，如果我转到文件>设置并在恢复中看到，则会添加恢复方案文件，当我第二次运行它时，将调用恢复方案。可能是什么问题。

提前感谢您的帮助。

Answer 1

可以写入报表以确保运行恢复方案

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