用VBS实现的发送带Cookie的HTTP请求的代码
更新时间:2013年01月14日 00:51:46 作者:
在昨天的《使用正确版本的XMLHTTP》中卖了个关子,ServerXMLHTTP的功能比XMLHTTP强大,你现在大概已经猜到了吧。没错,用ServerXMLHTTP可以在HTTP请求头中加入Cookie,而XMLHTTP不可以
为了方便测试,先写一个回显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
复制代码 代码如下:
<?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
相关文章
视频转换大师WinMPG Video Convert 6.63
视频转换大师WinMPG Video Convert 6.63...2007-04-04
最新评论