在调试QTP脚本过程中发现，无论是Qtp自带的运行报告还是TD提供的运行报告，都无法为错误定位提供很确切、直观的参考。比如，有时错误发生在点击“订单填写”的步骤，而运行报告给出的结果是无法找到点击“订单填写”步骤之后的订单填写界面对象的缺失。因此为了更好地保留“现场”，我们在场景恢复关闭进程函数之前，先调用桌面截图函数保留“案发现场”。desktop.CaptureBitmap filename,Ture。
通常一个测试集中包含很多个测试用例，为了方便用例和截图的对应，要对截图的命名区分处理。麦兜兜想到两种方式：
一、返回错误发生时系统当前时间，如下所示：
Dim FileName ,TimeNow, ResPath
ResPath = "D:\TestsResult\"
TimeNow = DotNetFactory.CreateInstance( "System.DateTime" ).Now.ToString( "ddMMyyHHmmss" )
FileName = ResPath & "\" & TimeNow & ".bmp"
desktop.CaptureBitmap filename,True
二、从环境变量获取当前测试脚本的名称，如下所示：
Dim FileName ,ResPath
ResPath = "D:\TestsResult\"
TestNameNow=environment.Value("TestName")
FileName = ResPath & "\" & TestNameNow & ".bmp"
desktop.CaptureBitmap filename,True
当然也可将二者结合。
