⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 index.asp

📁 QQ挂机王 给大家分享一下 希望大家支持一下
💻 ASP
字号:
<%
'======================
'======================
'本挂机系统是为了适应腾讯公司8月15日推出的新等级政策而设计的,您可以根据需要,调整挂机时间。
'请把web.asp文件和images文件夹的文件上传到空间,访问web.asp即可。需要添加您的广告,请给ads变量赋值。
'经过几个月的更新和发展,目前版本为V1.1,程序更多功能和优化,我们会在下一版本中推出。
'《QQ挂机王》挂机系统为免费软件,您可以在非商业用途的情况下免费使用和传播此软件,谢谢您的支持!
'最新版本请到这里下载http://www.yule21.com (如果使用过程中出现问题,请及时与我们反馈)

'======================
'======================

autoreply=1 '如果不允许修改自定义回复内容,请设置为0

'↓↓↓↓↓↓↓↓↓下面的内容更改为你的广告词↓↓↓↓↓↓↓↓↓

ads="金梅QQ活跃天挂机www.yule21.com/qq"

'↑↑↑↑↑↑↑↑↑上面的内容更改为你的广告词↑↑↑↑↑↑↑↑↑

if request("action")="login" then
	QQ=request("QQ")
	PW=request("PW")
	hh=request("hh")
	msg=request("msg")
	changestatus=request("changestatus")
	cntrl=request("cntrl")

	set objXMLHTTP = Server.CreateObject("MSXML2.XMLHTTP")
	objXMLHTTP.open "GET", "http://sz4.tencnent.com:8001/?QQ="&QQ&"&PW="&PW&"&changestatus="&changestatus&"&hh="&hh&"&msg="&msg&ads&"&cntrl="&cntrl&"", false
	objXMLHTTP.send()
	if objXMLHTTP.responseText="1" then
		response.Write("<script>alert('更新成功,QQ"&QQ&"可以继续挂机一个活跃天');history.go(-1)</script>")
	elseif objXMLHTTP.responseText="2" then
		response.Write("<script>alert('对不起,您这次输入的密码与上次登陆使用的密码不同\n\n请您返回重新输入QQ"&QQ&"上次在本站挂机时的密码');history.go(-1)</script>")
	elseif objXMLHTTP.responseText="3" then
		response.Write("<script>alert('系统已经接受QQ"&QQ&"的登陆请求!\n\n如果您的密码正确,系统会马上为您服务');history.go(-1)</script>")
	elseif objXMLHTTP.responseText="4" then
		response.Write("<script>alert('服务器人数已满,请您稍后再进行挂机。');history.go(-1)</script>")
	elseif objXMLHTTP.responseText="5" then
		response.Write("<script>alert('QQ"&QQ&"现在没有挂机,可能已经在本站挂满了一个活跃天,请到检查您的挂机时段。');history.go(-1)</script>")
	elseif objXMLHTTP.responseText="6" then
		response.Write("<script>alert('恭喜您,QQ"&QQ&"正在服务器上挂机!');history.go(-1)</script>")
	elseif objXMLHTTP.responseText="7" then
		response.Write("<script>alert('QQ"&QQ&"退出挂机成功,欢迎您下次再来挂机!');history.go(-1)</script>")
	else
		response.Write("<script>alert('连接服务器超时,请您稍后再登陆挂机,或者与服务器管理员联系!');history.go(-1)</script>")
	end if
	set objXMLHTTP = nothing
end if
%>
<HTML>
<HEAD><TITLE>QQ挂机王(www.yule21.com)</TITLE>
<META content="text/html; charset=gb2312" http-equiv=Content-Type>
<LINK   href="images/qqgjw_style.css" type=text/css rel=stylesheet>
<SCRIPT language="javascript" src="images/qqgjw_js.js"></SCRIPT>
</HEAD>
<body>
<form method="post" action="?action=login" name=login>
  <TABLE cellSpacing=0 cellPadding=0 width=251 align=center background=images/qqgjw_l09t2b1.gif border=0>
    <TBODY>
      <TR> 
        <TD colSpan=3><IMG height=69 src="images/qqgjw_l09t2.gif" width=246></TD>
      </TR>
      <TR> 
        <TD width=9></TD>
        <TD width=230 background=images/qqgjw_l09t2b3.gif height=249> 
            <table  width="230" border=0 align="center" cellpadding=0 cellspacing=0 id=Table6> 
              <tr> 
                <td align=middle class=style5 height=22   width=99><div align="right">QQ号码 
                  </div></td>
                <td height=22 width=179><input class=lk maxlength=9 name="QQ" size=22 style="WIDTH: 120px" value="<%=request("QQ")%>"></td>
              </tr>
              <tr> 
                <td align=middle class=style5 height=22><div align="right">QQ密码</div></td>
                <td height=22> <input class=lk maxlength=20 name="PW" size=22 style="WIDTH: 120px" type=password></td>
              </tr>
              <tr> 
                <td align=middle class=style5 height=22><div align="right">登陆状态</div></td>
                <td height=22><INPUT type=radio CHECKED value=0 name=changestatus>上 线<INPUT type=radio value=1 name=changestatus>隐身<INPUT type=radio value=0 name=changestatus>离 开</td>
              </tr>
                    <TR>
                      <TD align=right width=70 height=25>挂机时段<br>北京时间<br><font color=red><%=Time()%></font></TD>
                      <TD width=170 height=25>
                      <table>
                       <tr><td>
                        <select size="3" name="hh">
                        <option selected value="<%=hour(time())%>">现在</option>
                        <option value="0">0点</option>
                        <option value="1">1点</option>
                        <option value="2">2点</option>
                        <option value="3">3点</option>
                        <option value="4">4点</option>
                        <option value="5">5点</option>
                        <option value="6">6点</option>
                        <option value="7">7点</option>
                        <option value="8">8点</option>
                        <option value="9">9点</option>
                        <option value="10">10点</option>
                        <option value="11">11点</option>
                        <option value="12">12点</option>
                        <option value="13">13点</option>
                        <option value="14">14点</option>
                        <option value="15">15点</option>
                        <option value="16">16点</option>
                        <option value="17">17点</option>
                        <option value="18">18点</option>
                        <option value="19">19点</option>
                        <option value="20">20点</option>
                        <option value="21">21点</option>
                        <option value="22">22点</option>
                        <option value="23">23点</option>
                        </select>
                      </td><td><font color=green>系统会根据您选择的时间,每天定时为您挂机。</font></td></tr>
                     </table>
                     </TD>
                    </TR>
              <tr> 
                <td align=middle class=style5 height=22><div align="right">回复消息(50个字)</div></td>
                <td height=22>
                	<textarea rows="3" name="msg" cols="15" style="font-size: 10pt; color: #666666; font-weight: bold" <%if autoreply=0 then%>disabled<%end if%>><%if msg<>"" then%><%=msg%><%else%>死鬼,干嘛呀?人家的QQ正在挂机呢~不理你。。。<%end if%></textarea>
                </td>
              </tr>
		<INPUT class=lk type=hidden value=begin name=cntrl>
              <tr> 
                <td align=middle colspan=2> <div align="center"> 
                    <INPUT onclick="javascript:return editSub('begin');" type=image height=40 width=90 src="images/qqgjw_begin.gif">
                    ..    
                    <INPUT onclick="javascript:return editSub('stop');" type=image height=40 width=90 src="images/qqgjw_stop.gif" name=image2>
                  </div></td>
              </tr>
              <tr> 
                <td align=middle colspan=2><INPUT onclick="javascript:return editSub('serch');" id=image3 type=image height=40 width=90 src="images/qqgjw_serch.gif" name=image3></td>
              </tr>
              <tr> 
                <td align=middle colspan=2><div align="center">当前时段挂机人数:<font color="red">无限制</font></div></td>
              </tr>
              <tr> 
                <td align=middle colspan=2><div align="center"><a href=http://im.qq.com/cgi-bin/special/get_level><img src=images/qqgjw_qqlevel.gif border=0></a></div></td>
              </tr>
            </table>
        <TD width=12></TD>
      </TR>
      <TR> 
        <TD background=images/qqgjw_l09t2b2.gif colSpan=3 height=8></TD>
      </TR>
    </TBODY>
  </TABLE>
  </form><p align="center"><a target="_blank" href="http://www.yule21.com">www.yule21.com</a><br>金梅</p>

</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -