‘ 对链接的地址进行检查
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