📄 system.asp
字号:
<!--#include file="config.asp"-->
<!--#include file="check.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>系统设置</title>
<link rel="stylesheet" type="text/css" href="css.css">
</head>
<body>
<!--#include file="admin_top.asp"-->
<%
If Request.QueryString("act")="save" Then
Set rs=Server.CreateObject("ADODB.RecordSet")
rs.open "Select * from XH_Config",conn,1,3
rs("webname")=Trim(Request.Form("WebName"))
rs("WebUrl")=Trim(Request.Form("WebUrl"))
rs("SystemUrl")=Trim(Request.Form("SystemUrl"))
rs("RestrictIP")=Request.Form("RestrictIP")
rs.update
rs.close
Set rs=nothing
Call EndConnection()
Response.Redirect "system.asp"
End If
%>
<div align="center">
<table border="0" width="50%" id="table1" cellspacing="1" cellpadding="3" class="tableborder">
<form action="?act=save" method="post" name="form1">
<tr>
<th colspan="2">系统设置</th>
</tr>
<tr>
<td width="35%" align="right"><b>站点名称：</b></td>
<td><input type="text" name="WebName" size="30" value="<%=WebName%>"></td>
</tr>
<tr>
<td width="35%" align="right"><b>站点地址：</b></td>
<td><input type="text" name="WebUrl" size="30" value="<%=WebUrl%>"><br>
<font color="#808080">请输入完整地址（如：http://xh.uweb.cn/)</font></td>
</tr>
<tr>
<td width="35%" align="right"><b>系统所在地址：</b></td>
<td>
<input type="text" name="SystemUrl" size="30" value="<%=SystemUrl%>"><br>
<font color="#808080">请输入完整地址（如：http://xh.uweb.cn/vote/)</font></td>
</tr>
<tr>
<td width="35%" align="right"><b>IP限制：</b></td>
<td>
<select name="RestrictIP" size="1">
<option value="true" <%if RestrictIP=true then Response.Write "selected"%>>是</option>
<option value="false" <%if RestrictIP=false then Response.Write "selected"%>>否</option>
</select><br>
<font color="#808080">选择“是”则不允许同一IP多次投票</font>
</td>
</tr>
<tr>
<td colspan="2" align="center" class="tablebody"><input type="submit" name="submit" value="确认修改"></td>
</tr>
</form>
</table>
</div>
<!--#include file="admin_foot.asp"-->
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -