Question

请问如何用VB获取网页源码

Answer 1

使用Inet控件获取网页源码。

Internet Transfer 控件实现了两种广泛使用的 Internet 协议： 超文本传送协议（HyperText Transfer
Protocol）(HTTP) 和文件传送协议（File Transfer Protocol） (FTP)。使用 Internet Transfer
控件可以通过 OpenURL 或 Execute 方法连接到任何使用这两个协议的站点并检索文件。

Private Sub Command1_Click()
    Dim strhtml As String
    Dim STRURL As String
    STRURL = "http://www.baidu.com"
    strhtml = Inet1.OpenURL(STRURL)
    Text1 = strhtml
End Sub