用VBS实现的发送带Cookie的HTTP请求的代码

2020-07-26 11:49:02

字体：大中小

来源：转载

供稿：网友

为了方便测试，先写一个回显Cookie的简单的PHP程序：

复制代码代码如下:

 
<?php 
foreach($_COOKIE as $key => $value) 
echo "$key => $value/r/n"; 
?> 

然后分别用ServerXMLHTTP和XMLHTTP测试：

复制代码代码如下:

 
Dim http 
Set http = CreateObject("Msxml2.XMLHTTP") 
http.open "GET", "http://demon.tw/test/cookie.php", False 
http.SetRequestHeader "Cookie", "user=demon; passwd=123456" 
http.send 
WScript.Echo http.responseText 

用Msxml2.XMLHTTP什么都没有返回。

复制代码代码如下:

 
Dim http 
Set http = CreateObject("Msxml2.ServerXMLHTTP") 
http.open "GET", "http://demon.tw/test/cookie.php", False 
http.SetRequestHeader "Cookie", "user=demon; passwd=123456" 
http.send 
WScript.Echo http.responseText 

用Msxml2.ServerXMLHTTP返回

user => demon
passwd => 123456

以后碰到需要Cookie的网页就不用愁了。
原文： http://demon.tw/programming/vbs-http-cookie.html

上一篇：校准系统时间的VBS代码

下一篇：在VBS中定义字节数组Byte()介绍