找回密码
 注册
【阿里云】2核2G云服务器新老同享 99元/年,续费同价,云服务器3年机/5年机限时抢购,低至 2.5折华为云精选云产品特惠糖果主机Jtti,新加坡服务器,美国服务器,香港服务器,海外云服务器
查看: 648|回复: 4

哪位大大有网站挂QQ的源码~~

[复制链接]
发表于 2005 年 7 月 20 日 11:55:26 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?注册

×
  能否给偶一份。。在此先谢谢了。。
Jgwy.Com - Free Web Hosting Guide & Directory In China since 2001! Jgwy.Net-Jglt.Net
发表于 2005 年 7 月 20 日 11:58:49 | 显示全部楼层
【腾讯云】2核2G云服务器新老同享 99元/年,续费同价
发过。他们
Jgwy.Com - Free Web Hosting Guide & Directory In China since 2001! Jgwy.Net-Jglt.Net
回复

使用道具 举报

发表于 2005 年 7 月 20 日 13:53:22 | 显示全部楼层
点击就可以免费得30个Q币

点击立即冲值http://qq.7xiu.com/?53591806
Jgwy.Com - Free Web Hosting Guide & Directory In China since 2001! Jgwy.Net-Jglt.Net
回复

使用道具 举报

发表于 2005 年 7 月 20 日 13:59:31 | 显示全部楼层
估计网站很多
不发了
发了误认为是AD
楼主想要的话
PM我
Jgwy.Com - Free Web Hosting Guide & Directory In China since 2001! Jgwy.Net-Jglt.Net
回复

使用道具 举报

发表于 2005 年 7 月 20 日 14:14:28 | 显示全部楼层
ASP:



CODE: [Copy to clipboard]
<%
dim objXMLHTTP, qq, pwd

qq = "10000"
pwd = "123456"

set objXMLHTTP = Server.CreateObject("MSXML2.XMLHTTP.5.0")
objXMLHTTP.open &quotOST", "_blank>http://211.139.167.71/waptest/TW ... /updateuserinfo.jsp", 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: [Copy to clipboard]
<php
$qq = "100000"; //qq号码
$pwd = "123456"; //密码

$ch = curl_init();

curl_setopt($ch, CURLOPT_URL, "_blank>http://211.139.167.71/waptest/TW ... /updateuserinfo.jsp");
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: [Copy to clipboard]
<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(&quotOST", "_blank>http://211.139.167.71/waptest/TW ... /updateuserinfo.jsp", 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>
Jgwy.Com - Free Web Hosting Guide & Directory In China since 2001! Jgwy.Net-Jglt.Net
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

Archiver|手机版|小黑屋|金光论坛

GMT+8, 2024 年 9 月 20 日 19:54 , Processed in 0.100618 second(s), 22 queries .

Powered by Discuz! X3.5

© 2001-2023 Discuz! Team.

快速回复 返回顶部 返回列表