vb如何截取网页的html代码
我用vb下载一个一个页面，如何获取我需要的内容啊，就是需要截取功能，提完内容后，如何自动跳转到下一页啊，请教高手，我用webbrowser控件，
你的问题有点大，获取HTML就直接在DOCUMENTCOMPLETE事件中写webbrowser1.document.body.outhtml
这就是所有的HTML代码，然后你想要什么就自己分析吧。可以通过分析字符串的方式截取你要的内容
也可以根据HTML代码具有的属性来获得你要的内容。
自动跳转就更容易了，你获取完你要的代码，再次webbrowser1.navigate url 就行了。
'提取各文本分区标签(div)中的源代码
VB code:
Private Sub Form_Load()
WebBrowser1.Navigate "http://www.hao123.com/"
End Sub
Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
j = WebBrowser1.Document.getElementsByTagName("div").Length - 1
Dim aa As Object
For i = 0 To j
Set aa = WebBrowser1.Document.getElementsByTagName("div")(i)
s = s & aa.innerHTML & vbCrLf & "---------------------------第" & i & "个div中的源代码--------------------------------" & vbCrLf
Next
Static k As Integer
k = k + 1
If s <> "" Then
s1 = App.Path & "\" & k & ".txt"
Open s1 For Output As #1
Print #1, s
Close #1
Shell "notepad.exe " & s1, vbNormalFocus
End If
End Sub
相关问答：
看了一些VB ini文件写入读取的方法 但是还是不知道怎么写，上面写了很长 很多，但是我不知道怎么用，我想问一下怎样写才能实现在TEXT1中写字，然后点Command1提交，然后TEXT1里面的数字就写进INI里面[Section]的Key1 ......
为什么工具栏按扭的宽度改变不了,在属性里改了又变成原来的数值了
大胡子真厉害，回答基本都是爆料级的
大胡子升级真快啊，这才几天就5条短裤外加月排名第一了
想想我这5个短裤混了差不多8年才得到的。
回复 ......
可以吗
好奇怪的题目额！！
可以告诉我们你到底想问什么 ？
2分给我的话就可以。
........................可以吗
可以!
纠结，
29. vb可以这样做不？ ( H )√
A. ......
VB怎样获得鼠标处的超级连接呢？
在WebBrowser控件中有这样一个事件:StatusTextChange(index As Integer, ByVal Text As String)
它的Text参数正是鼠标处的超级连接,但问题是如果我的浏览器正� ......
