📄 admin_add.asp

📁 本程序采用ACC数据核心构件！！功能介绍：程序代码重新设计与优化
💻 ASP
字号:
<!--#include file="../inc/config.asp"-->
<!--#include file="../inc/conn.asp"-->
<!--#include file="../inc/code.asp"-->
<!--#include file="../inc/SqlIn.Asp"-->
<%
if session("adminlogin")<>sessionvar then
response.Write("<script>alert('可能您还没有登陆或者登陆超时！请重新登陆！');this.top.location.href='admin_index.asp';</script>")
call closeconn()
Response.End
End If
%>
<%
if request.QueryString("guiqi")="add" then'=============发布私服
set rs = server.createobject("adodb.recordset")
dim name,ip,gameid,sdate,hour,minute,addr,xingzhi,homepage,download,dk,zhuce,hot,top,time,Fine
name=htmlencode(request("name"))
ip=htmlencode(request.form("ip"))
dk=htmlencode(request.form("dk"))
gameid=htmlencode(trim(request.form("gameid")))
Service=htmlencode(trim(request.form("Service")))
sdate=htmlencode(request.form("sdate"))
hour=htmlencode(request.form("hour"))
minute=htmlencode(request.form("minute"))
addr=htmlencode(request.form("addr"))
hot=htmlencode(request.form("hot"))
top=htmlencode(request.form("top"))
time=htmlencode(request.form("time"))
Fine=htmlencode(request.form("Fine"))
xingzhi=htmlencode(request.form("xingzhi"))
QQ=htmlencode(request.form("QQ"))
homepage=htmlencode(request.form("homepage"))
download=htmlencode(request.form("download"))
zhuce=htmlencode(request.form("zhuce"))
if name="" or ip="" or gameid="" or Service="" or dk="" or zhuce="" or  homepage="" or QQ="" or xingzhi="" or addr="" or SDATE="" or hour="" or minute=""  then
response.write "<script>alert('带*的选项必须填写或选择，请返回检查后再提交');history.back()</script>"
call closeconn()
response.end
end if

call add()
	call closeconn()
sub add()
	sql="select * from Gq_sfdata" 
	rs.open sql,conn,1,3
	rs.addnew
	rs("name")=name
	rs("ip")=ip
	rs("dk")=dk
	rs("gameid")=gameid
	rs("Service")=Service
	rs("SDATE")=sdate
	rs("hour")=hour
	rs("minute")=minute
	rs("addr")=addr
	rs("xingzhi")=xingzhi
	rs("QQ")=QQ
	rs("homepage")=homepage
	rs("download")=download
	rs("zhuce")=zhuce
	rs("ulock")=1
	rs("top")=1
	rs("hot")=1
	rs("Fine")=1
        rs("hot")=hot
        rs("top")=top
        rs("Fine")=Fine
        rs("time")=time
        if trim(request.form("top"))="1" then
	rs("toptime")=Now()
	end if
        if trim(request.form("hot"))="1" then
	rs("hottime")=Now()
	end if
        if trim(request.form("fine"))="1" then
	rs("finetime")=Now()
	end if
	rs.update
	response.write "<script>alert('服务器"&name&"提交成功\n请等待管理员审核。\n请不要重复发布信息！\n如果信息发布错误需要修改，\n请直接联系管理员');location.replace('admin_add.asp')</script>"
	rs.close
	rs.nothing
call closeconn()
end sub
end if
%>

<HTML>
<HEAD>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<TITLE><%=webname%>::私服信息登记</TITLE>
<link href="admin_style.css" type=text/css rel=stylesheet>
<SCRIPT language=JavaScript>
function check(){
if(document.form1.name.value=="")
  {
alert("私服服务器名称不能为空！");
document.form1.name.focus();
return false;
}
if(document.form1.ip.value=="")
{
alert("IP地址不能为空！");
document.form1.ip.focus();
return false;
}
if(document.form1.dk.value=="")
{
alert("ZONE不能为空！");
document.form1.dk.focus();
return false;
}
if(document.form1.gameid.value=="")
{
alert("请选择您要发布的私服类型！");
document.form1.gameid.focus();
return false;
}
if(document.form1.service.value=="")
{
alert("请选择您的服务器线路！");
document.form1.service.focus();
return false;
}
if(document.form1.addr.value=="")
{
alert("请选择您的服务器所在地！");
document.form1.addr.focus();
return false;
}
if(document.form1.Sdate.value=="")
{
alert("请填写开区具体时间！");
document.form1.Sdate.focus();
return false;
}
if(document.form1.xingzhi.value=="")
{
alert("游戏版本不能为空！");
document.form1.xingzhi.focus();
return false;
}
}
</SCRIPT>
<SCRIPT language=javascript src="../inc/setday.js"></SCRIPT>
</HEAD>
<BODY bgColor=#ffcc00 leftMargin=0  topMargin=0>
<table width=98% align="center" border="0" cellspacing="1" cellpadding="2" class="tableBorder">
<FORM name="form" action="?guiqi=add" method="post">
<tr> 
<th colspan="2">私服管理－－添加私服</th>
</tr>
<TR>
<td width="15%" align="right" class="TableRow1">游戏分类：</TD>
<td class="TableRow1">
<%
Set Rs_type = Server.CreateObject("ADODB.RecordSet")
Sql_Type="select * from Gq_Gametype order by orderid"
rs_type.open sql_type,conn,1,1
%>
<select id=select size=1 name=gameid>
<%
if rs_type.eof and rs_type.bof then
response.Write "<option value= selected>请添加游戏分类</option>"
else
do while not rs_type.EOF
response.Write "<option value="&rs_type("id")&">"&rs_type("game")&"</option>"
rs_type.movenext
loop
rs_type.close
end if
%></select><font color="#FF0000">*</font></TD>
</TR>
<TR>
<td width="15%" align="right" class="TableRow1">服务器名：</TD>
<td class="TableRow1"><INPUT name=name size="16" maxLength=20> <FONT face=宋体 color=#FF0000>*</FONT> <FONT color=#006600>限9个汉字</FONT></TD> 
</TR>
<TR>
<td width="15%" align="right" class="TableRow1">服务器IP：</TD>
<td class="TableRow1"><INPUT name=ip id="ip2" size="16" maxLength=16 value="点击下载登陆器"> 
<font color="#FF0000">*</font></TD>
</TR>
<TR>
<td width="15%" align="right" class="TableRow1">ZONE：</TD>
<td class="TableRow1"><INPUT name=dk id="dk2" size="16" maxLength=16> 
<font color="#FF0000">*</font></TD>
</TR>
<TR>
<td width="15%" align="right" class="TableRow1">开区时间：</TD>
<td class="TableRow1"><INPUT name=sdate onfocus=setday(this) value="点击选择" size=10 maxlength="12">
<SELECT name=hour>
<OPTION value="" selected>开区小时</OPTION>
<OPTION value=00>凌晨0点</OPTION>
<OPTION value=01>凌晨1点</OPTION>
<OPTION value=02>凌晨2点</OPTION>
<OPTION value=03>凌晨3点</OPTION>
<OPTION value=04>凌晨4点</OPTION>
<OPTION value=05>凌晨5点</OPTION>
<OPTION value=06>凌晨6点</OPTION>
<OPTION value=07>上午7点</OPTION>
<OPTION value=08>上午8点</OPTION>
<OPTION value=09>上午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>&nbsp;
<SELECT name=minute>
<OPTION value=00 selected>00分</OPTION>
<OPTION value=30>30分</OPTION>
</SELECT> <font color="#FF0000">*</font></TD>
</TR>
<TR>
<td width="15%" align="right" class="TableRow1">客服QQ：</TD>
<td class="TableRow1"><INPUT name=QQ value="游戏中查询" size="16" maxLength=10> <font color="#FF0000">*</font> 填写号码即可</TD>
</TR>
<TR>
<td width="15%" align="right" class="TableRow1">地区线路：</TD>
<td class="TableRow1">
          <SELECT id=select6 size=1 name=addr>
            <OPTION value="" selected>地区</OPTION>
	    <OPTION value=千兆>千兆</OPTION>
	    <OPTION value=百兆>百兆</OPTION>
	    <OPTION value=东北>东北</OPTION>
            <OPTION value=电信+>电信+</OPTION>
            <OPTION value=南方>南方</OPTION>
            <OPTION value=北方>北方</OPTION>
            <OPTION value=中国>中国</OPTION>
            <OPTION value=北京>北京</OPTION>
            <OPTION value=上海>上海</OPTION>
            <OPTION value=重庆>重庆</OPTION>
            <OPTION value=天津>天津</OPTION>
            <OPTION value=广东>广东</OPTION>
            <OPTION value=河北>河北</OPTION>
            <OPTION value=山西>山西</OPTION>
            <OPTION value=内蒙古>内蒙古</OPTION>
            <OPTION value=辽宁>辽宁</OPTION>
            <OPTION value=吉林>吉林</OPTION>
            <OPTION value=黑龙江>黑龙江</OPTION>
            <OPTION value=江苏>江苏</OPTION>
            <OPTION value=浙江>浙江</OPTION>
            <OPTION value=安徽>安徽</OPTION>
            <OPTION value=福建>福建</OPTION>
            <OPTION value=江西>江西</OPTION>
            <OPTION value=山东>山东</OPTION>
            <OPTION value=河南>河南</OPTION>
            <OPTION value=湖北>湖北</OPTION>
            <OPTION value=湖南>湖南</OPTION>
            <OPTION value=广西>广西</OPTION>
            <OPTION value=海南>海南</OPTION>
            <OPTION value=四川>四川</OPTION>
            <OPTION value=贵州>贵州</OPTION>
            <OPTION value=云南>云南</OPTION>
            <OPTION value=西藏>西藏</OPTION>
            <OPTION value=陕西>陕西</OPTION>
            <OPTION value=甘肃>甘肃</OPTION>
            <OPTION value=青海>青海</OPTION>
            <OPTION value=宁夏>宁夏</OPTION>
            <OPTION value=新疆>新疆</OPTION>
            <OPTION value=香港>香港</OPTION>
            <OPTION value=澳门>澳门</OPTION>
            <OPTION value=台湾>台湾</OPTION>
            <OPTION value=全国>全国</OPTION>
          </SELECT>　 
        <SELECT id=select7 size=1 name=Service>
          <option selected>线路</option>
          <%for i=0 to ubound(split(ssign,","))
response.write "<option value='"&i&"'>"&split(ssign,",")(i)&"</option>"
next
%></SELECT> <font color="#FF0000">*</font></TD>
</TR>
<TR>
<td width="15%" align="right" class="TableRow1">版本简介：</TD>
<td class="TableRow1"><input name="xingzhi" id="xingzhi2" size="56" maxlength="12"> 
<font color="#FF0000">*</font> 12个字内</TD> 
</TR>
<TR>
<td width="15%" align="right" class="TableRow1">网站地址：</TD>
<td class="TableRow1"><input name=homepage id=homepage3 size=36 maxlength=50> <font color="#FF0000">*</font> 此私服URL,开头一定要http://否则无法连接</TD> 
</TR>
<TR>
<td width="15%" align="right" class="TableRow1">登陆器地址：</TD>
<td class="TableRow1"><FONT color=#006600><INPUT name=download id=download3 size=36 maxLength=60> <font color="#FF0000">*</font> 此私服登陆器地址,开头一定要http://否则无法连接</TD> 
</TR>
<TR>
<td width="15%" align="right" class="TableRow1">注册地址：</TD>
<td class="TableRow1"><FONT color=#006600><INPUT name=zhuce id=zhuce3 size=36 maxLength=60> <font color="#FF0000">*</font> 此私服登陆器地址,开头一定要http://否则无法连接</TD> 
</TR>
<TR>
<td width="15%" align="right" class="TableRow1">广告期限：</TD>
<td class="TableRow1">
<select name="time" size="0">
<option selected value="0">请 选 择</option>
<option value="0">推荐一天</option>
<option value="1">推荐二天</option>
<option value="2">推荐三天</option>
<option value="3">推荐四天</option>
<option value="4">推荐五天</option>
<option value="5">推荐六天</option>
<option value="6">推荐七天</option>
</select> <font color="#FF0000">*</font> <font color="#000000">广告期限选择一至七 一为一天 依次类推，按推荐日期计算</font></TD> 
</TR>
<td width="15%" align="right" class="TableRow1">精品推荐：</TD>
<td class="TableRow1">
<select name="Fine" size="0">
<option value="0" selected>不 推 荐</option>
<option value="1">精品推荐</option>
</select> <font color="#FF0000">*</font> <font color="#0000FF">设置为精品推荐则会在首页最顶部显示精品字样</font></TD>
</TR>
<TR>
<td width="15%" align="right" class="TableRow1">固顶推荐：</TD>
<td class="TableRow1">
<select name="top" size="0">
<option value=0 selected>不 固 顶</option>
<option value=1>固顶推荐</option>
</select> <font color="#FF0000">*</font> <font color="#000000">设置为固顶推荐则会在首页套黄处出现</font></TD>
</TR>
<TR>
<td width="15%" align="right" class="TableRow1">通宵推荐：</TD>
<td class="TableRow1">
<select name="hot" size="0">
<option value=0 selected>不 通 宵</option>
<option value=1>通宵推荐</option>
</select> <font color="#FF0000">*</font> <font color="#000000">设置为通宵推荐则会在首页套黄处底部出现通宵推荐</font></TD>
</TR>
<TR>
<td class="TableRow1" colspan="2" height="30" align="center"><INPUT type=submit value= 提交私服信息 name=btn></TD>
</TR>
</FORM>
</TABLE>
<table width=98% align="center" border="0" cellspacing="0" cellpadding="0">
<tr align="middle">
<td height="30" valign="bottom">Copyright (c) 2004-2006 <a target="_blank" href="http://www.xuncms.cn"><b><font color="#708796">XunCms</font><font color="#cc0000">.Cn</font></b></font></a>. All Rights Reserved .</td>
</tr>
<tr align="middle">
<td>Powered by：<a href="http://www.xuncms.cn" target="_blank"><b><font color="#708796">讯图</font><font color="#cc0000">设计</font></b></font> XunCms <%=Version%></a></td>
</tr>
</table>
<%call closeconn()%>
</BODY>
</HTML>
⌨️ 快捷键说明

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