首页 ›电脑› 电脑学堂 › 查看内容

教大家获取网页的源代码（网页GET操作基础篇，附代码）

2017-4-1 11:44 |来自: 互联网 5556 0

摘要: 以前发表过一篇文章教大家用POST的方法获取网络时间（基础入门篇）有兴趣的可以看下！今天教大家用GET此链接的方式，来获取网页源代码！其实浏览器几乎都有这个功能（必须说这句话，否则又有人要告诉我chrome也有这 ...

以前发表过一篇文章

教大家用POST的方法获取网络时间（基础入门篇）

有兴趣的可以看下！

今天教大家用GET此链接的方式，来获取网页源代码！

其实浏览器几乎都有这个功能（必须说这句话，否则又有人要告诉我chrome也有这个那个功能了,哈哈！)

今天以以下链接为例，来获取百度贴吧的个人资料。

https://www.baidu.com/p/技术小成/detail

查看源代码

获取到的网页源代码如下：

网页源代码

我们怎么用编程的方式实现这个功能呢？

我们以VB6.0为例：

VB6.0中，新建一个Command1,Text1，输入以下代码！

Private Sub Command1_Click()
Dim XMLHTTP As Object
Dim DataS As String
Set XMLHTTP = CreateObject("Microsoft.XMLHTTP")
XMLHTTP.Open "get", "https://www.baidu.com/p/技术小成/detail", True
XMLHTTP.Send
While XMLHTTP.ReadyState <> 4 '''等待页面加载完成
DoEvents '''把控制权交给系统,避免程序卡住
Wend
Text1 = XMLHTTP.ResponseText '''Text1中写入网页源代码
Set XMLHTTP = Nothing ‘’释放内存
End Sub

2. 运行程序，效果如图。