📄 modify.asp
字号:
<%
if session("fishinfire") = "" then
Response.Redirect "login.asp"
Response.End
end if
%>
<!--#include file="conn.asp"-->
<%
dim sql
dim rs
sql="select * from admin"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>信息反馈</title>
<link rel="stylesheet" href="../include/site.css">
</head>
<body>
<form action="modifyok.asp" method="post" name="myform" id="myform">
<table width="450" border="0" align="center" cellpadding="0" cellspacing="1" background="image/dot.gif">
<tr valign="middle">
<td width="88" height="25" bgcolor="#FFFFFF">管理员名称：</td>
<td width="350" height="25" bgcolor="#FFFFFF"> <input name="adminname" type="text" class="myinput" id="adminname" value="<%=rs("adminname")%>" size="25" maxlength="25"></td>
</tr>
<tr valign="middle">
<td height="25" bgcolor="#FFFFFF">管理员密码：</td>
<td height="25" bgcolor="#FFFFFF"> <input name="adminpass" type="password" class="myinput" id="adminpass" size="25" maxlength="50">
<font color="#666666">(如不须修改密码，请留空)</font> </td>
</tr>
<tr valign="middle">
<td height="25" bgcolor="#FFFFFF">留言显示方式：</td>
<td height="25" bgcolor="#FFFFFF"><input <%If (CStr(rs("sh")) = CStr("0")) Then Response.Write("CHECKED") : Response.Write("")%> name="sh" type="radio" value="0">
所有留言只有管理员审核回复后显示<br>
<input <%If (CStr(rs("sh")) = CStr("1")) Then Response.Write("CHECKED") : Response.Write("")%> type="radio" name="sh" value="1">
所有留言直接在留言板上显示</td>
</tr>
<tr valign="middle">
<td height="25" bgcolor="#FFFFFF" colspan="2">语言过滤：(每个字、词或短语后面在中文输入法下输入逗号进行分隔)</td>
</tr>
<tr valign="middle">
<td height="25" bgcolor="#FFFFFF" colspan="2" align="center"><textarea name="nono" cols="45" rows="5" class="myinput" id="nono"><%=rs("nono")%></textarea></td>
</tr>
<tr valign="middle">
<td height="25" align="center" bgcolor="#FFFFFF"> </td>
<td height="25" bgcolor="#FFFFFF">
<input name="Submit32" type="submit" class=mybutton value="修改">
<input name="Submit" type="reset" class=mybutton value="重置"> <input name="adminid" type="hidden" id="adminid" value="<%=rs("adminid")%>">
</td>
</tr>
</table>
</form>
<%rs.close
set rs=nothing
%>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -