开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 游戏 > 外挂编程 > 查看源码
2.asp
资源名称：haohj.rar　[点击查看]
上传用户：angela
上传日期：2022-05-11
资源大小：853k
文件大小：12k
源码类别：

外挂编程

开发平台：

ASP/ASPX

2.asp：源码内容
  1. <!--#include file="../Inc/Cls_Conn.asp"-->
  2. <!--#include file="../Inc/Cls_Config.asp"-->
  3. <%
  4. '=====================================================================
  5. ' 作者声明：转载请保留版权信息，鄙视不要脸的人
  6. '=====================================================================
  7. ' 程序名称：蓝宇网络发布系统
  8. ' 软件版本：Version 3.3.0 Sp1
  9. ' 程序作者：蓝宇 QQ：18159079 ╲、随心゛ QQ：6821845
  10. '=====================================================================
  11. ' 联系方式：Tel：13203117383，QQ：18159079，hi.baidu.com/hezeyu
  12. ' 程序开发：蓝宇,╲、随心゛
  13. ' 官方网站：蓝宇网络(http://hi.baidu.com/hezeyu)
  14. '=====================================================================
  15. ' Copyright 2004-2007 蓝宇 - All Rights Reserved.
  16. '=====================================================================
  17. Dim Rs_type, Sql_Type
  18. start="家族发布"
  19. tee5.head()
  20. %>
  21. <SCRIPT LANGUAGE="JavaScript">
  22. <!--
  23. function chkselect(s,divid)
  24. {
  25. var divname='Issubport';
  26. var chkreport;
  27. s=Number(s)
  28. if (divid=="know1")
  29. {
  30. divname=divname+s;
  31. }
  32. if (divid=="know2")
  33. {
  34. s+=4;
  35. if (s==1003){s=999;}
  36. divname=divname+s;
  37. }
  38. if (divid=="know3")
  39. {
  40. s+=8;
  41. if (s==1007){s=999;}
  42. divname=divname+s;
  43. }
  44. document.getElementById(divid).innerHTML=divname;
  45. chkreport=document.getElementById(divname).innerHTML;
  46. document.getElementById(divid).innerHTML=chkreport;
  47. }
  48. //-->
  49. </SCRIPT>
  50. <SCRIPT language=JavaScript>
  51. function check(){
  52. if(document.form1.name.value=="")
  53.   {
  54. alert("家族名称不能为空！");
  55. document.form1.name.focus();
  56. return false;
  57. }
  58. if(document.form1.QQ.value=="")
  59. {
  60. alert("家族QQ群不能为空！");
  61. document.form1.qq.focus();
  62. return false;
  63. }
  64. if(document.form1.gameid.value=="")
  65. {
  66. alert("请选择家族所在的游戏！");
  67. document.form1.gameid.focus();
  68. return false;
  69. }
  70. if(document.form1.tel.value=="")
  71. {
  72. alert("请填写家族所玩的游戏版本！");
  73. document.form1.tel.focus();
  74. return false;
  75. }
  76. if(document.form1.master.value=="")
  77. {
  78. alert("请填写家族老大名字！");
  79. document.form1.master.focus();
  80. return false;
  81. }
  82. if(document.form1.Bulid.value=="")
  83. {
  84. alert("请填写家族创建的具体时间！");
  85. document.form1.bulid.focus();
  86. return false;
  87. }
  88. if(document.form1.addr.value=="")
  89. {
  90. alert("请选择家族所在地区！");
  91. document.form1.addr.focus();
  92. return false;
  93. }
  94. if(document.form1.Peo.value=="")
  95. {
  96. alert("请选择家族线路！");
  97. document.form1.Peo.focus();
  98. return false;
  99. }
  100. }
  101. </SCRIPT>
  102. </HEAD>
  103. <TABLE width=<%=tee5.TabWidth%> border=0 align="center" cellPadding=0 cellSpacing=0 bgcolor="#666666">
  104.     <TR>
  105.       <TD height=5 align="center"><TABLE width=100% border=0 align="center" cellPadding=0 cellSpacing=0 bgcolor="#FFFFFF">
  106.           <TBODY>
  107.             <TR>
  108.               <TD width="220" align="center" valign="top"><TABLE cellSpacing=1 cellPadding=5 width=100% align=center border=0>
  109.                   <TBODY>
  110.                     <TR bgColor=#FFFFFF>
  111.                       <TD bgcolor="#990000"><strong><FONT color=#ffffff>家族发布说明</FONT></strong></TD>
  112.                     </TR>
  113.                     <TR align="center" bgColor=#FFFFFF>
  114.                       <TD><TABLE cellSpacing=0 cellPadding=1 width="95%" align=center border=0>
  115.                         <TBODY>
  116.                           <TR>
  117.                             <TD height="63">１、欢迎您来到<%=tee5.WebName%>，如果您觉得好，请推荐给您的朋友，感谢！</TD>
  118.                           </TR>
  119.                           <TR>
  120.                             <TD height="84">２、<FONT 
  121. color=#ff0000>请按照要求，把您的家族信息登记完整，树立良好的发布道德切勿发布与家族无关信息或重复发布信息，否则您的信息将不会通过我们的审核！</FONT></TD>
  122.                           </TR>
  123.                           <TR>
  124.                             <TD>3、如果利用本系统发布违法、黄色、反动信息，本站立刻查明ip并交于公安机关查办！</TD>
  125.                           </TR>
  126.                         </TBODY>
  127.                       </TABLE></TD>
  128.                     </TR>
  129.                   </TBODY>
  130.               </TABLE></TD>
  131.               <TD width="1" bgcolor="#999999"></TD>
  132.               <TD height=5 align="center" valign="top">
  133. <TABLE cellSpacing=1 cellPadding=5 width=100% align=center border=0>
  134.                   <TBODY>
  135.                     <TR bgColor=#FFFFFF>
  136.                       <TD bgcolor="#990000"><strong><FONT color=#ffffff>为了您家族的人气，建议您正确，认真的填写以下资料　带
  137.                       <FONT color=#FF0000>* </FONT><FONT color=#0000FF></FONT>必须填写</FONT></strong></TD>
  138.                     </TR>
  139.                     <TR align="center" bgColor=#FFFFFF>
  140.                       <TD><TABLE cellSpacing=0 cellPadding=2 width=100% align=center border=0>
  141.                         <FORM name=form1 onsubmit="return check()" action=jzsave.asp method=post>
  142.                           <TBODY>
  143.                             <TR bgColor=#FFFFFF>
  144.                               <TD width="10%"><DIV align=center>家族名称：</DIV></TD>
  145.                               <TD width="90%" bgcolor="#FFFFFF"><INPUT maxLength=14 name=name>
  146.                                   <FONT color=#ff0000>* 不得带有任何特殊符号，否则不与发布！</FONT></TD>
  147.                             </TR>
  148.                             <TR bgColor=#FFFFFF>
  149.                               <TD width="10%"><DIV align=center>家族QQ群：</DIV></TD>
  150.                               <TD width="90%" bgcolor="#FFFFFF"><INPUT name=qq id="qq" maxLength=9>
  151.                                   <FONT color=#ff0000>* 只能为数字（半角）！</FONT></TD>
  152.                             </TR>
  153.                             <TR bgColor=#FFFFFF>
  154.                               <TD width="10%"><DIV align=center>所在游戏：</DIV></TD>
  155.                               <TD width="90%" bgcolor="#FFFFFF"><%
  156. Set Rs_type = Server.CreateObject("ADODB.RecordSet")
  157. Sql_Type="select * from Gq_GameType order by orderid"
  158. rs_type.open sql_type,conn,1,1
  159. %>
  160.                                   <SELECT id=gameid size=1 name=gameid>
  161.                                     <%
  162. if rs_type.eof and rs_type.bof then
  163. response.Write "<option value= selected>请添加游戏分类</option>"
  164. else
  165. do while not rs_type.EOF
  166. response.Write "<option value="&rs_type("id")&">"&rs_type("game")&"</option>"
  167. rs_type.movenext
  168. loop
  169. rs_type.close
  170. end if
  171. %>
  172.                                   </SELECT>
  173.                                   <FONT color=#ff0000>*</FONT> </TD>
  174.                             </TR>
  175.                             <TR bgColor=#FFFFFF>
  176.                               <TD align="center">游戏版本：</TD>
  177.                               <TD width="90%" bgcolor="#FFFFFF"><input name=Tel id="Tel" maxlength=50>
  178.                                 <FONT color=#ff0000>*</FONT></TD>
  179.                             </TR>
  180.                             <TR bgColor=#FFFFFF>
  181.                               <TD width="10%"><DIV align=center>家族老大：</DIV></TD>
  182.                               <TD width="90%" bgcolor="#FFFFFF"><INPUT name=master id=master maxLength=14>
  183.                                   <FONT color=#ff0000>*</FONT> 家族老大的名字</TD>
  184.                             </TR>
  185.                             <TR bgColor=#FFFFFF>
  186.                               <TD width="10%"><DIV align=center>创建日期：</DIV></TD>
  187.                               <TD width="90%" bgcolor="#FFFFFF"><INPUT name=Bulid id=Bulid value="<%=now()%>" size=19 maxLength=19>
  188. &nbsp;<FONT color=#ff0000>* 默认为系统当时间，请按自己的实际情况修改。</FONT></TD>
  189.                             </TR>
  190.                             <TR bgColor=#FFFFFF>
  191.                               <TD width="10%"><DIV align=center>地区线路：</DIV></TD>
  192.                               <TD width="90%" bgcolor="#FFFFFF"><SELECT id=addr size=1 name=addr>
  193.                                     <OPTION value="" selected>〓 地区 〓</OPTION>
  194.                                     <OPTION value=北京>北京</OPTION>
  195.                                     <OPTION value=上海>上海</OPTION>
  196.                                     <OPTION value=重庆>重庆</OPTION>
  197.                                     <OPTION value=天津>天津</OPTION>
  198.                                     <OPTION value=广东>广东</OPTION>
  199.                                     <OPTION value=河北>河北</OPTION>
  200.                                     <OPTION value=山西>山西</OPTION>
  201.                                     <OPTION value=内蒙古>内蒙古</OPTION>
  202.                                     <OPTION value=辽宁>辽宁</OPTION>
  203.                                     <OPTION value=吉林>吉林</OPTION>
  204.                                     <OPTION value=黑龙江>黑龙江</OPTION>
  205.                                     <OPTION value=江苏>江苏</OPTION>
  206.                                     <OPTION value=浙江>浙江</OPTION>
  207.                                     <OPTION value=安徽>安徽</OPTION>
  208.                                     <OPTION value=福建>福建</OPTION>
  209.                                     <OPTION value=江西>江西</OPTION>
  210.                                     <OPTION value=山东>山东</OPTION>
  211.                                     <OPTION value=河南>河南</OPTION>
  212.                                     <OPTION value=湖北>湖北</OPTION>
  213.                                     <OPTION value=湖南>湖南</OPTION>
  214.                                     <OPTION value=广西>广西</OPTION>
  215.                                     <OPTION value=海南>海南</OPTION>
  216.                                     <OPTION value=四川>四川</OPTION>
  217.                                     <OPTION value=贵州>贵州</OPTION>
  218.                                     <OPTION value=云南>云南</OPTION>
  219.                                     <OPTION value=西藏>西藏</OPTION>
  220.                                     <OPTION value=陕西>陕西</OPTION>
  221.                                     <OPTION value=甘肃>甘肃</OPTION>
  222.                                     <OPTION value=青海>青海</OPTION>
  223.                                     <OPTION value=宁夏>宁夏</OPTION>
  224.                                     <OPTION value=新疆>新疆</OPTION>
  225.                                     <OPTION value=香港>香港</OPTION>
  226.                                     <OPTION value=澳门>澳门</OPTION>
  227.                                     <OPTION value=台湾>台湾</OPTION>
  228.                                     <OPTION value=国外>国外</OPTION>
  229.                                   </SELECT>
  230.                                   <SELECT id=peo size=1 name=peo>
  231.                                     <OPTION value="" selected>〓 线路 〓</OPTION>
  232.                                     <OPTION value=电信>电信</OPTION>
  233.                                     <OPTION value=网通>网通</OPTION>
  234.                                     <OPTION value=其他>其他</OPTION>
  235.                                   </SELECT>
  236.                                   <FONT color=#ff0000>*</FONT> 请选择正确的家族地区线路！</TD>
  237.                             </TR>
  238.                             <TR bgColor=#FFFFFF>
  239.                               <TD align="center">家族主页：</TD>
  240.                               <TD width="90%" bgcolor="#FFFFFF"><input name=web id=web value="http://" size=36 maxlength=100> 没有的请留空，发现主页打不开的或非家族主页一律删除</TD>
  241.                             </TR>
  242.                             <TR bgColor=#FFFFFF> 
  243.                             </TR>
  244.                             <TR align="center" bgColor=#FFFFFF>
  245.                               <TD colSpan=2><font color="#FF0000">为了您家族的人气，建议您详细、准确的填写上述资料。</font></TD>
  246.                             </TR>
  247.                             <TR bgColor=#FFFFFF>
  248.                               <TD colSpan=2 align=center><INPUT type=submit value=" 确 定 " name=submit>
  249.           　　
  250.             <INPUT type=reset value=" 清 除 " name=cmdcancel>
  251.                               </TD>
  252.                             </TR>
  253.                           </TBODY>
  254.                         </FORM>
  255.                       </TABLE></TD>
  256.                     </TR>
  257.                   </TBODY>
  258.               </TABLE></TD>
  259.             </TR>
  260.           </TBODY>
  261.       </TABLE></TD>
  262.     </TR>
  263. </TABLE>
  264. <%tee5.footer()
  265. call CloseConn()%>