我下载了一个页面源码，如何采集所有产品的连接地址，也就是,<a href="这的连接地址">，里面的地址。vb如何写啊
VB code:
Private Sub Command1_Click()
Set obj = WebBrowser1.Document.getElementsBytagName("a")
For I = 0 To obj.LENGTH - 1
Debug.Print obj(I).href
Next
End Sub
Private Sub Form_Load()
WebBrowser1.Navigate "http://www.hao123.com/"
End Sub
上面的大哥写的代码是对的，可是我的是截取源代码的一部分<table></table>这个表的内容，如何取到这个里面的所有连接啊，也就是说，table=mid(wstr,start,over)，这个table里面的所有连接啊
这个表的ID?name?
其实没那么麻烦,你试一下这个表中a标签的索引就行了,知道索引用上面代码就能够解决问题
table=mid(wstr,start,over)，这个不是表，我用一个mid函数截取一段代码，这段代码都是产品列表，我想取出产品的连接地址
你的问题和你说的就不是一码事.哪个页面?
我从页面中截取了一段代码，想采集出这段代码中的产品连接
所有产品的链接 URL 应该是有统一的格式的，可以遍历所有的 <a>，再根据 URL 的前缀判断是否为需要的产品链接。
VB code:
'引用Microsoft VBScript Regular Expressions 5.5
Private Sub Command1_Click()
Dim re As RegExp
Dim mh As Match
Dim mhs As MatchCollection
Text1.Text = 你的网�
