|
一开始还不会用output value,现在终于尝试成功了。在这里开个帖子证明一下自己又进步了一小步。
我要做的用例是在百度搜索“qtp”,然后获取到一个页码,把页码保存为output value,在后续步骤中使用该output value 进行换页。
第1步把基本的步骤录制成脚本:搜索成功时加入output value checkpoint;换页的时候只需要录制一次点击下一页的步骤。
编辑脚本:在action properties 中定义output parameter,page。脚本如下:
Browser("百度一下,你就知道").Page("百度一下,你就知道").WebEdit("wd").Set "qtp"
Browser("百度一下,你就知道").Page("百度一下,你就知道").WebButton("百度一下").Click
Browser("百度一下,你就知道").Page("百度搜索_qtp").Output CheckPoint("page")
'下面使用一个循环使点击下一页这个操作重复“所获取到的页码”那么多次
Do until Parameter("page") = 0
msgbox parameter("page")
Browser("百度一下,你就知道").Page("百度搜索_qtp").Link("下一页>").Click
Parameter("page")= Parameter("page") -1
Loop
还有一点不好的就是百度第一次显示的页码并不是最大的页码,所以没办法做到切换到最后一页 |
|