在测试脚本执行过程中,由于所测试的软件可能会发生非预期测试检查点的异常,如UI报错退出、莫名的窗体提示等,登陆的WEB页面也会经常出现刷新异常,这样会直接导致脚本找不到UI、对象而运行失败。因为是未知地、随机地发生此异常,而不是测试设计的检查点异常,所以在自动化测试的角度无法确定测试失败的原因和步骤,更无法实施Bug查找。在无人值守的情况下,此类异常还会导致后面的自动化测试工作无法进行。为了解决次为题,可以使用异常处理及场景恢复机制来弥补当前QTP的测试缺陷。场景恢复存在的目的在于避免测试过程中因为异常而引起的中断。并不是所有测试脚本都需要场景恢复,设计完美的测试脚本不仅可以让自动化测试过程更顺畅,同事还能够捕获可能产生的程序缺陷。
  1、异常处理的解决方案
  在QTP中,异常处理的方法很多,而且不同软件公司的使用情况也不尽相同。这里介绍一种常用的方法,供大家学习。
  1)设计思路
  (1)VBScript脚本中的“On Error Resume Next”意为,当脚本发生错误时自动运行下一行代码。可以利用此语句来解决QTP代码异常的问题。
  (2)通过VBScript脚本中得“Err.number”可以得出发生错误的信息代码,即通过判断当前程序是否发生了错误来进行Bug捕获。可以编写ErrorHandle()函数置于组件函数库中,用于捕获异常及相应处理。
  (3)处理的内容包括调用常规处理函数及场景恢复函数。
  异常处理流程如下:
  启动程序代码异常忽略—->程序声明—> 测试代码—->是否有异常:1.有,捕获异常&调用场景恢复;2.没有,执行下一个action
  2、异常处理机制伪代码及使用指南
  建议在QTP安装目录中得Dat目录下新建文本文件,命名为“ActionTemplate.mst ”,在QTp新建Test或Action时自动读取这个模板内容作为Action代码的一部分,可以利用这一特性来进行异常捕获。例如,可以在ActionTemplate.mst下写入如下代码。
On Error Resume Next
‘代码编辑区______________________________
‘结束编辑___________________________
call ErrorHandle()
捕获异常及异常处理函数
‘**********************************************************************************
‘函数作者:
‘函数功能:错误句柄处理
‘输入参数:无
‘返回值:日志文件、错误抓图
‘调用函数:LogPrint、SceneResume
‘*******************************************************************
Public Function ErrorHandle()
if Err.Number0 Then
‘ 打印记录详细Bug信息
LogPrint TestName&””&ActName&”Error Num: ” &Err.Number & “; Error Src:” & Err.Source & “; Error Desc: “& err.Description
Err.Clear
Setting.WebPackage(ReplayType”)=2 ‘Default is 1
Desktop.CaptureBitmap Environment(“Dir”) & “错误抓图”&TestName&”_”&ActName&”.bmp”,True
Setting.WebPackage(“ReplayType”)=1
SceneResume(LinkText) ‘调用场景恢复函数,后面会对此函数进行说明
End If
End Function
3、场景恢复函数说明
  场景恢复函数是由几个函数组合而成的,包含了日志函数、系统自动抓图函数、场景恢复调用的业务组件函数等。
  在执行测试程序的某个功能模块前,需要进行应用程序登录。
  场景恢复函数的作用如下。
  * 禁用被测试系统的所有相关进程。
  * 调用登录模块的业务组件。
  * 判断是否登录成功,并尝试连接5次。
  针对场景恢复函数特别说明如下:
  (1)在第一个Action发生一次而关闭的时候,用一个变量记录当前测试的页面。在场景恢复执行登录应用程序成功后,会自动根据发生异常时记录的变量,连接到异常发生时候的页面,并进行下一个Action的操作。
  (2)设置在登录的时候每隔5分钟尝试一次登录,并且总计尝试5次登录。这样设置的好处是,当网络由于某些原因突然连接不上,又无法确定网络连通的时间,在25分钟内尝试了5次后仍然登录不成功,那么久可以认为异常恢复失败而退出整体自动化测试的执行,并且记录日志”可能由于网络问题或其它原因,应用程序当前无法正常登录“。此时需要人工查找网络断开的原因并恢复自动化测试的整体运行。
  以下函数的代码段为伪代码,思路叫清晰。由于每个项目不同,登录环节也会不同,因此大家可以根据不同项目对以下函数进行修改使用。
‘**********************************************************************************************
‘函数作者:
‘函数功能:当程序发送异常,进行场景恢复
‘输入参数:LinkName:Action发生异常时候,变量记录的模块链接名称
‘返回值:无
‘调用函数:业务组件函数
‘调用函数:业务组件函数
’************************************************************************************
Function SceneResume(LinkText)
For check=0 to 4
‘以IE为例,禁止用所有的IE进程
WQL=”SELECT * FROM Win32_Process WhereName=’IEXPLORE.EXE’”
Set objServices=GetObject(“WinMgmts:”)
Set colobjSevicesSet=objServices.ExecQuery(WQL)
For Each objSWbemObject In colobjServicesSet
obWbemObject.Terminate
Next
‘登录应用程序(业务组件函数)
If  登录成功 Then
Exit For
else
TryID=5
End if
wait(300)
Next
If TryID=5  then
LogPrint  “可能由于网络问题或其它原因,应用程序当前无法正常登录”
End If
End Function