求救
dim aa=Browser("Untitled Page").Page("Untitled Page").WebButton("房态查询").Check CheckPoint("房态查询")
Reporter.Filter=0
If (a=false) Then
Reporter.ReportEvent micPass,"错误报告","房态查询"
else
Browser("Untitled Page").Page("Untitled Page").WebButton("房态查询").Click
End If
为什么代码第二行提示语句未结束呢,是不是赋值的时候有错误,请高手看看
万分感谢 改成这样,就OK了
a=Browser("Untitled Page").Page("Untitled Page").WebButton("房态查询").Check (CheckPoint("房态查询")) 少了个括号吧,估计和楼上说的一样。 就是少了个括号, 谢谢。问题已解决 以后细心点 做测试要仔细:lol 谢谢
页:
[1]