Dim qtApp
Set qtApp = CreateObject("QuickTest.Application")
qtApp.Test.Settings.Recovery.Enabled = True
qtApp.Test.Settings.Recovery.SetActivationMode "OnError"
qtApp.Test.Settings.Recovery.Add "C:\qtp\recovery.qrs", "Recovery", 1
qtApp.Test.Settings.Recovery.Item(1).Enabled = True
‘Above statement will enable recovery file for specific test.
Set qtApp = CreateObject("QuickTest.Application")
qtApp.Test.Settings.Recovery.Enabled = True
qtApp.Test.Settings.Recovery.SetActivationMode "OnError"
qtApp.Test.Settings.Recovery.Add "C:\qtp\recovery.qrs", "Recovery", 1
qtApp.Test.Settings.Recovery.Item(1).Enabled = True
‘Above statement will enable recovery file for specific test.
No comments:
Post a Comment