📄 update.asp
字号:
<%
if session("user_type")<>"T" then
response.redirect "../../../../index.asp"
end if
%>
<% response.buffer=true%>
<!--#INCLUDE FILE="../../../../system/odbc_connection.asp"-->
<% '还需要修改,直接添加好了，就不要显示原来的了%>
<HTML>
<HEAD>
<title> 修改子论坛名 </title>
<link rel="stylesheet" href="../../../../system/all.css">
</HEAD>
<BODY BGCOLOR="#FFFFFF">
<%
dim sql
sql="select * from bbs_forum where id=" & Request.QueryString("id")
set rs=db.execute(sql)
%>
<h2 align="center">修改子论坛名称</h2>
<CENTER>
<form name=form1 method=post action="">
<TABLE border="0" width="90%">
</caption>
<Tr bgcolor=#e9e9e9 align="center">
<TD><input name="forumname" type=text size="20" value="<%=rs("forumname")%>" >(最好字不要太多)
<input name="id" type="hidden" value="<%=Request.QueryString("id")%>">
</TD>
</Tr>
</TABLE>
<p><input type="submit" name="submit" value=" 提 交 " >  <input type=submit name=submit value=" 取 消 ">
</form>
</CENTER>
<%
If request("submit")=" 取 消 " Then
response.redirect "index.asp"
End If
if trim(Request("forumname"))<>"" then
forumname=trim(Request("forumname"))
sql = "update bbs_forum set forumname='" & forumname & "' where id=" & Request.Form("id")
db.Execute(Sql)
db.close
set db=nothing
response.write "<script language='Jscript'> top.frames['bottom'].frames['left'].location.reload(); </script>"
response.write "<script language='Jscript'> top.frames['bottom'].frames['main'].location.replace('index.asp?board_id=" &board_id&"');</script>"
end if
%>
</BODY>
</HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -