小弟我下载了一个页面源码，怎么采集所有产品的连接地址，vb怎么采集到瞄链接文字

我下载了一个页面源码，如何采集所有产品的连接地址，vb如何采集到瞄链接文字啊
我下载了一个页面源码，如何采集所有产品的连接地址，也就是, <a href="***">想要这个文字</A>，。vb如何采集到瞄链接文字啊

[解决办法]

VB code

Private Sub Command1_Click()Dim obj As ObjectSet obj = WebBrowser1.Document.getelementsbytagname("a")For i = 0 To obj.length - 1Debug.Print obj(i).innertextNextEnd SubPrivate Sub Form_Load()WebBrowser1.Navigate "http://www.360buy.com/"End Sub
[解决办法]
探讨

1楼的大哥写的代码是对的，可是我的是截取源代码的一部分 <table> </table>这个表的内容，如何取到这个里面的所有瞄链接啊，

[解决办法]
探讨

引用:
VB codedim vtagforeach vtag in WebBrowser1.Document.getelementsbytagname("span")if vtag.classname="mbg-nw"then
    msgbox vtag.innerhtml
endif
next

classname可能不唯一.innerhtml是代码,不是锚链接文字

[解决办法]
觉得1楼老张用WebBrowser1.Navigate的方式速度不行，占资源，
可以用inet 或 httpxml 等试试..
[解决办法]
探讨

引用:
VB codedim vtagforeach vtag in WebBrowser1.Document.getelementsbytagname("span")if vtag.classname="mbg-nw"then
    msgbox vtag.innerhtml
endif
next

classname可能不唯一.innerhtml是代码,不是锚链接文字

[解决办法]
探讨

引用:
引用:
VB codedim vtagforeach vtag in WebBrowser1.Document.getelementsbytagname("span")if vtag.classname="mbg-nw"then
    msgbox vtag.innerhtml
endif
next

classname可能不唯一.innerhtml是代码,不是锚链接文字

class一般都是唯一的，那个span里面没有子标签，完全可以使用innerHTML，甚至outerhtml都是可以的。
你那个使用（i），i倒是极有可能不确定的。所以需要根据实际情况。