IF语句中的内容执行不了

wyy83

恩 先谢谢  我始终唯一标识不了每个链接  再仔细看下

wyy83

1.题目要求:在百度上依次输入指定的关键字(写在DataTable第一列)->搜索->在查找到的结果中找到与预期相匹配的链接(当前页找不到就翻下一页)(预期值写在DataTable第二列)->将链接的url保存在DataTable第三列.
2.实现
Browser("百度一下，你就知道").Page("百度一下，你就知道").WebEdit("wd").Set DataTable("keyword", dtGlobalSheet)
Browser("百度一下，你就知道").Page("百度一下，你就知道").WebButton("百度一下").Click

Dim keyword_value,search_value,result,url
keyword_value = DataTable("keyword", dtGlobalSheet)
result = 0

While result  = 0
        For i = 0 to 9
        search_value = Browser("百度一下，你就知道").Page("百度搜索_四川成都").Link         ("x:=17","index:="&i).GetROProperty("innertext")
        DataTable.GlobalSheet.AddParameter"搜索结果",search_value
        result = instr(1,search_value,keyword_value,1)
        If result > 0  Then
        url = Browser("百度一下，你就知道").Page("百度搜索_四川成都").Link("x:=17","index:="&i).GetROProperty("url")
        DataTable.GlobalSheet.AddParameter"URL",url
        Exit for
        End If
        Next
        If   result = 0Then
        Browser("百度一下，你就知道").Page("百度搜索_四川成都").Link("下一页").Click
        End If
Wend

谢谢hsjzfling的引导、谢谢huaxiaowu将结果共享出来,让我学习!
问题:现在是运行时,在第二列显示搜索结果,第三列显示url,但是运行结束就不再显示,怎么运行结束后,上述两列仍然保存在globalsheet表中呢?谢谢!

[ 本帖最后由 wyy83 于 2008-4-28 11:09 编辑 ]

hsjzfling

原帖由 huaxiaowu 于 2008-4-28 09:00 发表
还有没有别的题目可以给我做做的？
现在公司又没什么事做了……

在www.google.cn的输入框中输入指定字符(比如"sh")，在弹出的下拉框中逐一比较是否有预期的值显示，比如"手机","神墓"，若找到预期值，则将结果数保存到datatable中。

lz可以考虑另开一帖~~

huaxiaowu

原帖由 wyy83 于 2008-4-28 10:50 发表
1.题目要求:在百度上依次输入指定的关键字(写在DataTable第一列)->搜索->在查找到的结果中找到与预期相匹配的链接(当前页找不到就翻下一页)(预期值写在DataTable第二列)->将链接的url保存在DataTable第三列.
2.实现 ...

这个不是应该在结果当中看的么？？？
在RESULTS里面的RUN-TIME DATATABLE里面

huaxiaowu

原帖由 hsjzfling 于 2008-4-28 11:40 发表


在www.google.cn的输入框中输入指定字符(比如"sh")，在弹出的下拉框中逐一比较是否有预期的值显示，比如"手机","神墓"，若找到预期值，则将结果数保存到datatable中。

lz可以考虑另开一帖~~

哇，谢谢前辈，不过昨天下午和今天早上有点事，所以没看到。

我现在在改百度这个程序，因为我其实只写了个最最简单的，只测试一个数据没问题，再在DATATABLE里输入数据的话，循环不起来的。再就是，现在的情况是，预先的取值在BAIDU搜索出来的LINK中是能找到的，如果找到最后找不到呢。

我想先把这两个问题解决了，比如如果找不到那个LINK，就在第三行里输入“URL CANN‘T BE FOUND”
而且这样的话，最后一页就没有10个LINK了。

前辈给的这个题目，涉及到下拉菜单，我还没什么概念，呵呵，又可以捣腾好长时间啦。
等我有点头绪了，就去另开一帖：）

huaxiaowu

汗...没有下拉框.....
咋回事.......

不知道为什么我这边的GOOGLE没有下拉框....难道是因为在新加坡的关系???
试了好多次了....

所以我改成土豆网,搜索YUEYU,可以在下拉框中找到越狱第二季,反正道理一样,我就拿这个测了.

我去另开一帖先~~

[ 本帖最后由 huaxiaowu 于 2008-4-29 14:42 编辑 ]

hsjzfling

原帖由 huaxiaowu 于 2008-4-29 14:28 发表
汗...没有下拉框.....
咋回事.......

不知道为什么我这边的GOOGLE没有下拉框....难道是因为在新加坡的关系???
试了好多次了....

所以我改成土豆网,搜索YUEYU,可以在下拉框中找到越狱第二季,反正道理一样,我就 ...

你确定你上的是www.google.cn 么~~上alibaba.com也可以，不过这些网站的实现方法都不同，用QTP去做的时候也有一些区别，你可以都做做看~

huaxiaowu

绝对没错，是CN！！这个我还是知道的
又试了一下，还是不行

我还是在TUDOU上找越狱好了哈
看在MILLER份上，我也一定要把它弄清楚。。。
不过，前辈，给个提示吧。。。。。

那个百度的，彻底完成了哈，我加了两个EXIST语句，判断下一页和每个LINK存在后，再进行相关操作。