tangxiaomei123 发表于 2009-3-6 12:08:23

看看我的 代码有错吗？？为什么实现不了打开页面，谁来帮帮我

Dim linknum,counter
Set linkdesc=description.Create()
linkdesc("file name").value="btn-shoppingcart.gif"
linkdesc("image type").value="Image Link"
Set linkobj=Browser("name:=txm.92hidc.net - www.mywebsite.com Powered by Hishop").Page("url:=http://localhost/default.aspx","title:=txm.92hidc.net - www.mywebsite.com Powered by Hishop").ChildObjects(linkdesc)                        
linknum=linkobj.count
For counter=1tolinknum
linkobj(counter).Click
Next
这里是一个网页，有很多的连接，我想用这段代码把所有的连接都打开，这是我自己的代码，那位高手，大虾帮忙看下。

tangxiaomei123 发表于 2009-3-6 12:08:42

我再网上等着。

dreamever 发表于 2009-3-6 14:28:12

没有界面的话看代码也看不出太多的东西，我觉的还是先确定一下对象的层次，楼主确定page下面的子对象就一定是link了吗？我印象里很多page下面不会直接跟link，会是webtable或者webelement一类的子对象，然后再下面一层或N层才是link对象。
楼主不妨先按照这个思路查一下。

testlab 发表于 2009-3-6 16:42:28

For counter=0tolinknum-1试试?
页: [1]
查看完整版本: 看看我的 代码有错吗？？为什么实现不了打开页面，谁来帮帮我