📄 addform.asp
字号:
<%
if session("admin")="" then
response.redirect "admin.asp"
else
if session("flag")>1 then
response.write "<br><p align=center>您没有操作的权限</p>"
response.end
end if
end if
%>
<!-- #include file="conn.asp" -->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title></title>
<link rel="stylesheet" type="text/css" href="style.css">
</head>
<body>
<form method="POST" name="myform" action="formsave.asp">
<table align="center" width="400" border="0" align="center" cellpadding="4" cellspacing="1" bgcolor="#000000">
<tr>
<td colspan="2" bgcolor=#999999>添加论坛版块</td>
</tr>
<tr bgcolor=#FFFFFF><td>属性:</td><td><select name="formid">
<%
set rs=Server.CreateObject("ADODB.Recordset")
sql="select * from form where formid=0"
rs.open sql,conn,1,1
if rs.bof and rs.eof then %>
<option selected value="0">论坛分类</option>
<% else %>
<option selected value="0">论坛分类</option>
<% do while not rs.eof %>
<option value="<%=rs("id")%>"><%=rs("form")%></option>
<% rs.movenext
loop
end if
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
</select></td></tr>
<tr bgcolor=#FFFFFF><td>名称:</td><td><input name="form1" type="text" size="36"></td>
</tr>
<tr bgcolor=#FFFFFF><td>排列:</td><td><input name="list" type="text" size="24"> 填数字,顺排</td>
</tr>
<tr bgcolor=#FFFFFF><td colspan="2" align="center"><input type="submit" value="添加" name="Submit">
<input type="reset" value="重写" name="Submit2">
</td></tr>
</table>
</form>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -