在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