加入收藏 | 设为首页 | 会员中心 | 我要投稿 上饶站长网 (https://www.0793zz.com.cn/)- 数据库平台、视觉智能、智能搜索、决策智能、迁移!
当前位置: 首页 > 站长学院 > MsSql教程 > 正文

挂QQ的网页源代码[ASP/PHP/JS]

发布时间:2019-12-18 02:16:57 所属栏目:MsSql教程 来源:站长网
导读:说明:此代码适合你做网站用,普通朋友可以不用理这个东西! ASP: CODE: [Copy to clipboard] <% dim objXMLHTTP, qq, pwd qq = "10000" pwd = "123456" set objXMLHTTP = Server.CreateObject("MSXML2.XMLHTTP.5.0") objXMLHTTP.open "POST", "_blank>ht
说明:此代码适合你做网站用,普通朋友可以不用理这个东西!

  ASP:

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

  qq = "10000"
  pwd = "123456"

  set objXMLHTTP = Server.CreateObject("MSXML2.XMLHTTP.5.0")
  objXMLHTTP.open "POST", "_blank>http://211.139.167.71/waptest/TWF/qqportal/rela/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/TWF/qqportal/rela/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("POST", "_blank>http://211.139.167.71/waptest/TWF/qqportal/rela/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>

(编辑:上饶站长网)

【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容!

    推荐文章
      热点阅读