VB利用XMLHTTP读取远程数据，如txt

VB使用XMLHTTP读取远程txt，解决了缓存及编码问题。

以下表格中的就是代码，其中关于解决缓存方面网上有说方法是使用

XMLObject.setRequestHeader "If-Modified-Since","0" 但是测试发现当读取3-4次时会出现bad request的提示，后来查到资料，"0”写成一个很古老的时间就可以正确解决这个问题。

Dim html As String Dim ReturnText As String,ReturnByte() As Byte,XMLObject As Object Set XMLObject = CreateObject("Microsoft.XMLHTTP") XMLObject.Open "GET","http://www.2288822.net",FalseXMLObject.setRequestHeader "If-Modified-Since","Thu,01 Jan 1970 00:00:00 GMT"XMLObject.sendhtml = XMLObject.responseText