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

📄 system.asp

📁 统管理：初始设置
💻 ASP
字号:
🔍 
<!--#include file="../conn/boardconn.asp"-->
<!--#include file="../style/sql.asp" -->
<!--#include file="../CHAR.INC"-->
<!--#include file="../function.asp"-->
<%
server_v1=Cstr(Request.ServerVariables("HTTP_REFERER"))
server_v2=Cstr(Request.ServerVariables("SERVER_NAME"))
if mid(server_v1,8,len(server_v2))<>server_v2 then
response.write "<br><br><center><table border=1 cellpadding=20 bordercolor=black bgcolor=#EEEEEE width=450>"
response.write "<tr><td style=font:9pt Verdana>"
response.write "<center><font face=Georgia,Tahoma size=2><u>友好提示：服务器禁止非法操作...</u></font></center>"
response.write "</td></tr></table></center>"
response.end
end if
%>
<%
fqys=request.servervariables("query_string") 
dim nothis(18) 
nothis(0)="net user" 
nothis(1)="xp_cmdshell" 
nothis(2)="/add" 
nothis(3)="exec%20master.dbo.xp_cmdshell" 
nothis(4)="net localgroup administrators" 
nothis(5)="select" 
nothis(6)="count" 
nothis(7)="asc" 
nothis(8)="char" 
nothis(9)="mid" 
nothis(10)="'" 
nothis(11)=":" 
nothis(12)="""" 
nothis(13)="insert" 
nothis(14)="delete" 
nothis(15)="drop" 
nothis(16)="truncate" 
nothis(17)="from" 
nothis(18)="%" 
errc=false 
for i= 0 to ubound(nothis) 
if instr(FQYs,nothis(i))<>0 then 
errc=true 
end if 
next 
if errc then 
response.write "<br><br><center><table border=1 cellpadding=20 bordercolor=black bgcolor=#EEEEEE width=450>"
response.write "<tr><td style=font:9pt Verdana>"
response.write "<center><font face=Georgia,Tahoma size=2><u>友好提示：服务器禁止非法操作...</u></font></center>"
response.write "</td></tr></table></center>"
response.end 
end if 
%>
<%CheckAdmin2%>
<html>
<head>
<title></title>
<meta http-equiv="Content-Type" content="text/html; charset=GB2312">
<link href="../style/style.css" rel="stylesheet" type="text/css">
</head>

<body topmargin="0" leftmargin="0">
<div align="center"><center>
	<%
	Set rs = Server.CreateObject("ADODB.Recordset")
	Sql="select * from [Aymi_System_Disp]"
	Set rs=conn.execute(Sql)
	%>
   <form id=form name=Form method="POST" action="edit_systemfox.asp?Action=Edit_System&NumID=<%Response.Write(rs(0))%>">

	<table cellpadding="0" cellspacing="0" border="0" width="90%">
        <tr>
          <td height="20" bgcolor="#96C5DE" align="center"><font color="white"><b>站点初始信息设置</b></font></td>
         </tr>
	<tr><td><table width="411" cellpadding="0" cellspacing="0" border="0" align="left">
		<tr>
			<td width="120"><a href="#zd">站点基本资料</a><br><a href="#sc">色彩</a><br><a href="#wb">相关文本</a></td>
			<td width="1" bgcolor="#CCCCCC"></td>
			<td width="132" valign="top" style="padding-left:12px;"><a href="#zz">站长资料</a></td>
			<td width="1" bgcolor="#CCCCCC"></td>
			<td width="132" style="padding-left:12px;" valign="top"><a href="#fw">信息访问</a><br><a href="#fb">信息发布</a></td>
			<td width="1" bgcolor="#CCCCCC"></td>
			<td width="132" style="padding-left:12px;" valign="top"><a href="#dh">导航条</a></td>
			<td width="*"></td>
		</tr></table></td></tr>
	</table>


<table cellpadding="0" cellspacing="0" border="0" width="90%">
	<tr>
		<td colspan="2" height="50" valign="bottom">
		<strong>站点资料</strong><a name="zd"></a>
		<hr color="#0066FF">		</td>
	</tr>
	<tr>
		<td width="25%" style="padding-right:12px;" align="right">站点名称</td>
		<td width="75%"><input class="input" type="text" name="name" size="20" maxlength="20"  value="<%Response.Write(rs(1))%>"></td>
	</tr>
	<tr>
		<td width="25%" style="padding-right:12px;" align="right">站点简短说明</td>
		<td width="75%"><input class="input" type="text" name="list" size="60" maxlength="120" value="<%Response.Write(rs(2))%>"></td>
	</tr>
	<tr>
		<td width="25%" style="padding-right:12px;" align="right">站点域名</td>
		<td width="75%"><input class="input" type="text" name="url" size="35" maxlength="129" value="<%Response.Write(rs(3))%>"></td>
	</tr>
	<tr>
		<td width="25%" style="padding-right:12px;" align="right">站点LOGO</td>
		<td width="75%"><input class="input" type="text" name="logo" size="50" maxlength="200" value="<%Response.Write(rs(4))%>"></td>
	</tr>
	<tr>
		<td width="25%" style="padding-right:12px;" align="right">关于本站</td>
		<td width="75%"><input class="input" type="text" name="about" size="6" maxlength="9" value="<%Response.Write(rs(34))%>">（填写帖子ID）</td>
	</tr>
	<tr>
		<td width="25%" style="padding-right:12px;" align="right" valign="top">统计代码</td>
		<td width="75%"><textarea class=input name="mcount" rows="6" cols="60"><%Response.Write(rs(28))%></textarea></td>
	</tr>
	<tr>
		<td width="25%" style="padding-right:12px;" align="right" height="12"><a name="sc"></a></td>
		<td width="75%"></td>
	</tr>
	<tr>
		<td width="25%" style="padding-right:12px;" align="right">按钮颜色</td>
		<td width="75%"><input class="input" type="text" name="a" size="7" maxlength="7" value="<%Response.Write(rs(24))%>"></td>
	</tr>
	<tr>
		<td width="25%" style="padding-right:12px;" align="right">特殊文本颜色</td>
		<td width="75%"><input class="input" type="text" name="b" size="7" maxlength="7" value="<%Response.Write(rs(26))%>"></td>
	<tr>
		<td width="25%" style="padding-right:12px;" align="right">导航条颜色</td>
		<td width="75%"><input class="input" type="text" name="title" size="7" maxlength="7" value="<%Response.Write(rs(12))%>"></td>
	</tr>
	<tr>
		<td width="25%" style="padding-right:12px;" align="right">导航条里文字颜色</td>
		<td width="75%"><input class="input" type="text" name="font" size="7" maxlength="7" value="<%Response.Write(rs(14))%>"></td>
	</tr>
	</tr>
	<tr>
		<td width="25%" style="padding-right:12px;" align="right">list条格底色</td>
		<td width="75%"><input class="input" type="text" name="body" size="7" maxlength="7" value="<%Response.Write(rs(13))%>"></td>
	</tr>
	<tr>
		<td width="25%" style="padding-right:12px;" align="right">帖子锁定</td>
		<td width="75%"><input class="input" type="text" name="suo" size="7" maxlength="7" value="<%Response.Write(rs(30))%>"></td>
	</tr>
	<tr>
		<td width="25%" style="padding-right:12px;" align="right">帖子加精</td>
		<td width="75%"><input class="input" type="text" name="jing" size="7" maxlength="7" value="<%Response.Write(rs(31))%>"></td>
	</tr>
	<tr>
		<td width="25%" style="padding-right:12px;" align="right">帖子置顶</td>
		<td width="75%"><input class="input" type="text" name="ding" size="7" maxlength="7" value="<%Response.Write(rs(32))%>"></td>
	</tr>
	<tr>
		<td width="25%" style="padding-right:12px;" align="right">帖子总置顶</td>
		<td width="75%"><input class="input" type="text" name="zong" size="7" maxlength="7" value="<%Response.Write(rs(33))%>"></td>
	</tr>
	<tr>
		<td width="25%" style="padding-right:12px;" align="right" height="12"><a name="wb"></a></td>
		<td width="75%"></td>
	</tr>
	<tr>
		<td width="25%" style="padding-right:12px;" align="right">版权所有</td>
		<td width="75%"><input class="input" type="text" name="copytxt" size="6" maxlength="9" value="<%Response.Write(rs(36))%>">（填写帖子ID）</td>
	</tr>
	<tr>
		<td width="25%" style="padding-right:12px;" align="right">用户协议</td>
		<td width="75%"><input class="input" type="text" name="reg" size="6" maxlength="9" value="<%Response.Write(rs(7))%>">（填写帖子ID）</td>
	</tr>
	<tr>
		<td width="25%" style="padding-right:12px;" align="right">网站帮助</td>
		<td width="75%"><input class="input" type="text" name="help" size="25" value="<%Response.Write(rs(8))%>">（填写贴吧名称）</td>
	</tr>
	<tr>
		<td width="25%" style="padding-right:12px;" align="right">贴图教程</td>
		<td width="75%"><input class="input" type="text" name="pic" size="6" maxlength="9" value="<%Response.Write(rs(9))%>">（填写帖子ID）</td>
	</tr>

	<tr>
		<td colspan="2" height="50" valign="bottom">
		<strong>站长资料</strong><a name="zz"></a>
		<hr color="#0066FF">		</td>
	</tr>
	<tr>
		<td width="25%" style="padding-right:12px;" align="right">站长昵称</td>
		<td width="75%"><input class="input" type="text" name="user" size="15" maxlength="30" value="<%Response.Write(rs(5))%>"></td>
	</tr>
	<tr>
		<td width="25%" style="padding-right:12px;" align="right">站长email</td>
		<td width="75%"><input class="input" type="text" name="mail" size="40" maxlength="70" value="<%Response.Write(rs(29))%>"></td>
	</tr>
	<tr>
		<td width="25%" style="padding-right:12px;" align="right">站长QQ</td>
		<td width="75%"><input class="input" type="text" name="qq" size="10" maxlength="10" onChange="javascript:if(this.value.length<5)alert('QQ号输入错误');" value="<%Response.Write(rs(6))%>"></td>
	</tr>
	<tr>
		<td width="25%" style="padding-right:12px;" align="right">关于站长</td>
		<td width="75%"><input class="input" type="text" name="zz" size="6" maxlength="9" value="<%Response.Write(rs(35))%>">（填写帖子ID）</td>
	</tr>
	<tr>
		<td colspan="2" height="50" valign="bottom">
		<strong>信息安全</strong><a name="fw"></a>
		<hr color="#0066FF">		</td>
	</tr>
	<tr>
		<td width="25%" style="padding-right:12px;" align="right">网站开启/关闭</td>
		<td width="75%">
		
		<SELECT name="off" size="1" class="input">
<OPTION value="0" <% if rs("SystemOff")="0" then response.Write("selected") end if%>>开启</OPTION>
<OPTION value="1" <% if rs("SystemOff")="1" then response.Write("selected") end if%>>关闭</OPTION>
</SELECT>
		
		</td>
	</tr>
	<tr>
		<td width="25%" style="padding-right:12px;" align="right">网站关闭说明</td>
		<td width="75%"><input class="input" type="text" name="txt" size="60" value="<%Response.Write(rs(18))%>"></td>
	</tr>
	<tr>
		<td width="25%" style="padding-right:12px;" align="right">网页放刷开启/关闭</td>
		<td width="75%"><SELECT name="refresh" size="1" class=input>
			<OPTION value="0" <% if rs("SystemRefresh")="0" then response.Write("selected") end if%>>关闭</OPTION>
			<OPTION value="1" <% if rs("SystemRefresh")="1" then response.Write("selected") end if%>>开启</OPTION>
		</SELECT></td>
	</tr>
	<tr>
		<td width="25%" style="padding-right:12px;" align="right">放刷时间间隔</td>
		<td width="75%"><input class="input" type="text" name="refreshtime" size="5" value="<%Response.Write(rs(16))%>">
			秒</td>
	</tr>
	<tr>
		<td width="25%" style="padding-right:12px;" align="right">后台管理地址</td>
		<td width="75%"><input class="input" type="text" name="master" size="40" value="<%Response.Write(rs(27))%>"></td>
	</tr>
	<tr>
		<td width="25%" style="padding-right:12px;" align="right" height="12"><a name="fb"></a></td>
		<td width="75%"></td>
	</tr>
	<tr>
		<td width="25%" style="padding-right:12px;" align="right">创建贴吧的权限</td>
		<td width="75%"><SELECT name="mnew" size="1" class=input>
			<OPTION value="0" <% if rs("SystemNew")="0" then response.Write("selected") end if%>>无限制（包括游客也可以创建）</OPTION>
			<OPTION value="1" <% if rs("SystemNew")="1" then response.Write("selected") end if%>>用户才可创建</OPTION>
			<OPTION value="2" <% if rs("SystemNew")="2" then response.Write("selected") end if%>>版主及以上才可创建</OPTION>
			<OPTION value="3" <% if rs("SystemNew")="3" then response.Write("selected") end if%>>仅管理员及以上才可创建</OPTION>
		</SELECT></td>
	</tr>
	<tr>
		<td width="25%" style="padding-right:12px;" align="right">发布和回复帖子的权限</td>
		<td width="75%"><SELECT name="vip" size="1" class=input>
			<OPTION value="0" <% if rs("SystemVip")="0" then response.Write("selected") end if%>>非用户也可以发布</OPTION>
			<OPTION value="1" <% if rs("SystemVip")="1" then response.Write("selected") end if%>>仅用户才可以发布</OPTION>
		</SELECT></td>
	</tr>
	<tr>
		<td width="25%" style="padding-right:12px;" align="right">关键字过滤</td>
		<td width="75%"><input class="input" type="text" name="mfilter" size="60" value="<%Response.Write(rs(10))%>"></td>
	</tr>
	<tr>
		<td width="25%" style="padding-right:12px;" align="right">验证码开启/关闭</td>
		<td width="75%"><SELECT name="code" size="1" class=input>
			<OPTION value="0" <% if rs("SystemCode")="0" then response.Write("selected") end if%>>开启</OPTION>
			<OPTION value="1" <% if rs("SystemCode")="1" then response.Write("selected") end if%>>关闭</OPTION>
		</SELECT>（对已经登陆用户不起作用）</td>
	</tr>
	<tr>
		<td colspan="2" height="50" valign="bottom">
		<strong>优秀吧导航</strong><a name="dh"></a>
		<hr color="#0066FF">		</td>
	</tr>
	<tr>
		<td width="25%" style="padding-right:12px;" align="right" valign="top">导航条代码</td>
		<td width="75%"><textarea class=input name="meun" rows="6" cols="60"><%Response.Write(rs(11))%></textarea></td>
	</tr>

        <tr>
          <td height="100"></td>
          <td><input class=input1 type="submit" value="编辑站点初始设置" name="Submit">&nbsp;<input class=input1 type="reset" value="擦除重填" name="Submit2"></td>
         </tr>
       </table>
      </form>
	<%
	rs.close
	Set rs=NOTHING
	conn.Close
	set conn=nothing
	%>
     </center>
    </div>
 </body>
</html>

⌨️ 快捷键说明

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