Download HTML page

Download HTML page

With CreateObject("MSXML2.XMLHTTP")
.open "GET", "http://www.rgagnon.com/howto.html", False
.send
WScript.Echo .responseText
End With

If you need to send an username and password :

With CreateObject("MSXML2.XMLHTTP")
.open "GET", "http://www.rgagnon.com/secure/example.html", False, _
myusername, mypassword
.send
WScript.Echo .responseText
End With

转载于:https://www.cnblogs.com/HappyQQ/archive/2008/02/26/1081446.html