Function RecoveryFunction1(Object, Method, Arguments, retVal)
End Function
具体的参数意义如下:
1. The object of the current test step
2. The method of the current test step
3. The actual method's arguments 4. The actual method's result 我写了一个碰到error就截屏的方法如下:
Public Function QTP_Capture(Object, Method, Arguments, retVal )
Dim PathWay,myTime,FileName
PathWay="C:\DCSAutomation\DCS\ErrorScreenCapture\"
myTime=now( )
TimeStamp=year(myTime)&month(myTime)&day(myTime)&hour(myTime)&minute(myTime)
FileName=PathWay&TimeStamp&".bmp"
Desktop.CaptureBitmap FileName
End Function
在recovery scenario manageer里面定义碰见error就调用这个function,从function libary里面选择的这个方法(这里有个问题要注意一下的,就是下拉菜单里面可选择的function一定是有4个参数的,否则是不会在这里显示的)
将这个recovery scenario跟test结合之后,再去run test.如果有错,在test result里面可以看到结果如下:
[attach]60119[/attach]