📄 admin_config.asp
字号:
<!--#include file="../Conn.asp"-->
<%
If Session("AdminUserName") = "" Then
Response.Write "<script>window.open('Login.asp','_parent');</script>"
Response.End
End If
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 "<script>alert('警告！你正在从外部提交数据！！请立即终止！！');location.href='../index.htm';</script>"
Response.End
end If
Dim action,Rs,Sql
action = Request.Form("action")
If action = "save" Then
Set Rs = Server.CreateObject("Adodb.Recordset")
Sql = "Select * From Config"
Rs.Open Sql,Conn,1,3
Rs("Name") = SafeStr(Request.Form("Name"))
Rs("Url") = SafeStr(Request.Form("Url"))
Rs("Notice") = SafeStr(Request.Form("Notice"))
If SafeStr(Request.Form("IsClose")) = "1" Then
Rs("IsClose") = True
Else
Rs("IsClose") = False
End If
Rs("CloseInfo") = SafeStr(Request.Form("CloseInfo"))
Rs("Tips") = SafeStr(Request.Form("Tips"))
Rs.Update
Rs.Close
Set Rs = Nothing
Response.Write "<script>alert('网站基本信息修改成功！');location.href='admin_config.asp';</script>"
Response.End
End If
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title><%=Name%>—后台管理</title>
<link href="../images/text.css" rel="stylesheet" type="text/css">
</head>
<body leftmargin="0" topmargin="0" onkeydown=return(!(event.keyCode==78&&event.ctrlKey))>
<table width="100%" height="32" border="0" cellpadding="0" cellspacing="0">
<tr>
<td align="center" background="../images/bj3.jpg">基本数据设置</td>
</tr>
<tr><td></td></tr>
</table><br>
<form method="post" action="?menu=configok">
<table width="770" border=1 align="center" cellPadding=7 cellSpacing=0 bordercolor="#999999" borderColorDark=#ffffff bgcolor="#F9F9F9">
<tr bgcolor="#FFFFFF">
<td width="143">网站地址：</td>
<td width="593"><input size="30" value="<%=Url%>" name="Url" class=inp3></td>
</tr>
<tr bgcolor="#FFFFFF">
<td>网站名称：</td>
<td><input size="30" value="<%=Name%>" name="Name" class=inp3></td>
</tr>
<tr bgcolor="#FFFFFF">
<td>系统公告：</td>
<td><TEXTAREA NAME="Notice" ROWS="8" COLS="50" id="gg"><%=Notice%></TEXTAREA></td>
</tr>
<tr bgcolor="#FFFFFF">
<td>网站维护开关：</td>
<td><select name="IsClose">
<option value="0" >= 正常开放 =</option>
<option value="1" <%If IsClose Then Response.Write "Selected"%>>= 关闭维护 =</option></select></td>
</tr>
<tr bgcolor="#FFFFFF">
<td>网站维护时的提示：</td>
<td><input size="30" value="<%=CloseInfo%>" name="CloseInfo" class=inp3></td>
</tr>
<tr bgcolor="#FFFFFF">
<td>锁定用户所见提示：</td>
<td><input name="Tips" class=inp3 id="sdts" value="<%=Tips%>" size="30"></td>
</tr>
</table>
<p align="center"><input type="submit" value="更新数据" class=btn> <input type="button" value=" 返 回 " onClick="javascript:window.history.go(-1);" class=btn></p><input name="action" type="hidden" value="save" /></form>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -