声明一下：此代码适合你做网站用，普通朋友可以不用理这个东西！

ASP版:

CODE:
＜%
dim objXMLHTTP, qq, pwd

qq = "10000"
pwd = "123456"

set objXMLHTTP = Server.CreateObject("MSXML2.XMLHTTP.5.0")
objXMLHTTP.open "POST", "_blank＞99dK9s2c8@1M7q4)9K6b7g2)9J5c8W2)9J5c8U0t1I4x3g2)9J5k6e0p5K6z5g2)9J5k6e0p5$3y4#2)9J5k6e0M7I4i4K6u0r3N6$3q4H3N6r3g2K6N6q4)9J5c8W2c8i4c8W2)9J5c8Y4q4I4M7r3!0J5N6r3q4D9i4K6u0r3M7X3g2D9j5g2)9J5c8Y4g2H3k6r3q4@1k6i4g2K6k6i4u0A6L8X3k6G2i4K6u0W2K9Y4y4H3", false
objXMLHTTP.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
objXMLHTTP.setRequestHeader "Connection", "Keep-Alive"
objXMLHTTP.send("qq="&qq&"&pwd="&pwd&"&FromWhere=register")

if InStr(objXMLHTTP.responseText, "验证失败") then
response.write "登录失败"
else
response.write "登录成功"
end if

set objXMLHTTP = nothing
%＞

PHP版:

CODE:
＜php
$qq = "100000"; //qq号码
$pwd = "123456"; //密码

$ch = curl_init();

curl_setopt($ch, CURLOPT_URL, "_blank＞c22K9s2c8@1M7q4)9K6b7g2)9J5c8W2)9J5c8U0t1I4x3g2)9J5k6e0p5K6z5g2)9J5k6e0p5$3y4#2)9J5k6e0M7I4i4K6u0r3N6$3q4H3N6r3g2K6N6q4)9J5c8W2c8i4c8W2)9J5c8Y4q4I4M7r3!0J5N6r3q4D9i4K6u0r3M7X3g2D9j5g2)9J5c8Y4g2H3k6r3q4@1k6i4g2K6k6i4u0A6L8X3k6G2i4K6u0W2K9Y4y4H3");
curl_setopt($ch, CURLOPT_FOLLOWLOCATION, 1); //这行是设定curl是否跟随header发送的location, 重要
curl_setopt($ch, CURLOPT_POST, 1);
//curl_setopt($ch, "Connection", "Keep-Alive");
curl_setopt($ch, CURLOPT_RETURNTRANSFER,1);
curl_setopt($ch, CURLOPT_POSTFIELDS, "qq=".$qq."&pwd=".$pwd."&FromWhere=register");

$return = curl_exec($ch);

curl_close($ch);

echo strstr($return, "postfield") ? "登录失败" : "登录成功";
?＞

js版:

CODE:
＜script type="text/javascript"＞
var qq = "100000"; //qq号码
var pwd = "123456"; //密码

if (window.XMLHttpRequest) {
var x = new XMLHttpRequest();
} else {
var MSXML = new Array('MSXML2.XMLHTTP.5.0', 'MSXML2.XMLHTTP.4.0', 'MSXML2.XMLHTTP.3.0', 'MSXML2.XMLHTTP', 'Microsoft.XMLHTTP');
for(var n = 0; n ＜ MSXML.length; n ++) {
try {
var objXMLHTTP = new ActiveXObject(MSXML[n]);
break;
} catch(e) {
}
}
}

objXMLHTTP.open("POST", "_blank＞ab5K9s2c8@1M7q4)9K6b7g2)9J5c8W2)9J5c8U0t1I4x3g2)9J5k6e0p5K6z5g2)9J5k6e0p5$3y4#2)9J5k6e0M7I4i4K6u0r3N6$3q4H3N6r3g2K6N6q4)9J5c8W2c8i4c8W2)9J5c8Y4q4I4M7r3!0J5N6r3q4D9i4K6u0r3M7X3g2D9j5g2)9J5c8Y4g2H3k6r3q4@1k6i4g2K6k6i4u0A6L8X3k6G2i4K6u0W2K9Y4y4H3", false);
objXMLHTTP.setRequestHeader("Content-Type", "application/x-www-form-urlencoded");
objXMLHTTP.setRequestHeader("Connection", "Keep-Alive");
objXMLHTTP.send("qq=" + qq + "&pwd=" + pwd + "&FromWhere=register");

if (objXMLHTTP.responseText.indexOf("验证失败") ＞ 0) {
alert("登录失败");
} else {
alert("等录成功");
}
＜/script＞

[培训]内核驱动高级班，冲击BAT一流互联网大厂工作，每周日13:00-18:00直播授课