VBA如何获取网页的响应表头内容？

a20089668 · 发表于 2017-12-25 15:30

本帖最后由 a20089668 于 2017-12-25 15:32 编辑

- 响应标头
Accept-Ranges: bytes
Content-Encoding: gzip
Date: Mon, 25 Dec 2017 07:24:13 GMT

如上面，需要获取Date这个内容，即是2017-12-25 07:24:13 这个格林威治时间

kevinchengcw · 发表于 2017-12-25 19:14

Sub test()
With CreateObject("msxml2.xmlhttp")
.Open "HEAD", "http://club.excelhome.net/", False
.send
Debug.Print .getresponseheader("date")
End With
End Sub

复制代码

获取的内容自己转换为时间吧

a20089668 · 发表于 2017-12-25 20:00

刚回来看到，感谢了，已在工作表中代入代码获取到想要的时间了。

		自动登录	找回密码
密码			免费注册

[求助] VBA如何获取网页的响应表头内容？

最新热点 /1