转:文本检查点在不使用对象库情况下的校验

1.通过webelement的innertext 属性的checkproperty方法进行校验
a.进行完整内容的校验：
browser("title:=.*").page("http://hi.baidu.com/fc/editor/=.*%22).webelement(%22innertext:=收件夹空间使用"+cstr(msgnum)+"/200","html tag:=DIV","index:=2").CheckProperty "innertext","收件夹空间使用"+cstr(msgnum)+"/200",2

b.给出完整的内容校验，却没有办法获取实际值时，可以使用通配符".*"：
browser("title:=.*").page("http://hi.baidu.com/fc/editor/=.*%22).webelement(%22innertext:=.*站内信.*","html tag:=LI").CheckProperty "innertext","站内信("+cstr(msgnum)+")",2

2.通过webelement的GetROProperty方法获取innertext属性的值，然后和预期值进行比较
strMessage = trim(browser("title:=.*").page("http://hi.baidu.com/fc/editor/=.*%22).webelement(%22innertext:=.*站内信.*","html tag:=LI").GetROProperty("innertext"))
msgnum=2 '是个变量，实际为根据数据库查询获取的总记录数
If strMessage = "站内信("+cstr(msgnum)+")" Then
         reporter.ReportEvent micPass, "成功", "期望是: 站内信("+cstr(msgnum)+"),实际是: "+cstr(strMessage)
else
         reporter.ReportEvent micFail, "失败", "期望是: 站内信("+cstr(msgnum)+"),实际是: "+cstr(strMessage)
End If