【转】qtp测试链接的方法-含脚本

在QTP中，对于网页链接的测试可以使用Link对象，例如下面的脚本用于对链接的地址进行检查：
‘ 对链接的地址进行检查
Browser("Welcome: Mercury Tours").Page("Welcome: Mercury Tours").Link("REGISTER").CheckProperty ("url",http://newtours.demoaut.com/mercuryregister.php)
其中使用了CheckProperty方法，用于对比Link对象的URL属性是否等于指定的地址。也可以使用Link对象的Object属性中的href属性来进行比较，例如下面的代码所示：
href = Browser("Welcome: Mercury Tours").Page("Welcome: Mercury Tours").Link("REGISTER").Object.href
‘ 如果地址不正确，则报告错误
If NOT href ="http://newtours.demoaut.com/mercuryregister.asp" Then
Reporter.ReportEvent micFail,"Link Error",href
ExitAction
End If