photoclass.asp
来自「这是一个学生毕业时做的教务系统」· ASP 代码 · 共 88 行
ASP
88 行
<!--#include file=conn.asp -->
<%
IF not(Session("KEY")="super" or Session("KEY")="input") THEN
response.redirect "login.asp"
response.end
END IF
%>
<html>
<head>
<title>管理中心</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style type="text/css">
<!--
a { font-family: "宋体"; font-size: 9pt; font-style: normal; line-height: 13pt; font-weight: normal; font-variant: normal; text-transform: none; color: <%=fontcolor%>; text-decoration: none}
a:hover { font-family: "宋体"; font-size: 9pt; font-style: normal; line-height: 13pt; font-weight: normal; font-variant: normal; text-transform: none; color: <%=fontcolor%>; text-decoration: underline}
td { font-family: "宋体"; font-size: 9pt; font-style: normal; line-height: 13pt; font-weight: normal; font-variant: normal; text-transform: none; color: <%=fontcolor%>}
br { font-family: "宋体"; font-size: 9pt; font-style: normal; line-height: 13pt; font-weight: normal; font-variant: normal; text-transform: none; color: <%=fontcolor%>}
.bk { font-size: 9pt; border: 1px <%=xcolor%> solid}
body { font-family: "宋体"; font-size: 9pt; font-style: normal; line-height: 13pt; font-weight: normal; font-variant: normal; text-transform: none}
.an { font-family: "宋体"; font-size: 9pt; background-color: <%=bgcolor%>; border: 1px <%=xcolor%> solid; color: <%=fontcolor%>}
.xzy { border: <%=xcolor%> solid; border-width: 0px 1px 1px}
.zx { border: <%=xcolor%> solid; border-width: 0px 0px 1px 1px}
.sxz { border: <%=xcolor%> solid; border-width: 1px 0px 1px 1px}
.s { border: <%=xcolor%>; border-style: solid; border-top-width: 1px; border-right-width: 0px; border-bottom-width: 0px; border-left-width: 0px}
.y { border: <%=xcolor%>; border-style: solid; border-top-width: 0px; border-right-width: 1px; border-bottom-width: 0px; border-left-width: 0px}
.font { font-family: "Arial Black"; font-size: 14pt; color: <%=fontcolor%>}
.x { border: <%=xcolor%>; border-style: solid; border-top-width: 0px; border-right-width: 0px; border-bottom-width: 1px; border-left-width: 0px}
.z { border: <%=xcolor%>; border-style: solid; border-top-width: 0px; border-right-width: 0px; border-bottom-width: 0px; border-left-width: 1px}
.sx { border: <%=xcolor%>; border-style: solid; border-top-width: 1px; border-right-width: 0px; border-bottom-width: 1px; border-left-width: 0px}
-->
</style>
</head>
<body bgcolor="<%=bgcolor%>" text="#000000">
<br>
<br>
<table width="400" border="0" cellspacing="1" cellpadding="5" align="center" bgcolor="#000000">
<tr>
<td width="612" height="30" align="center" bgcolor="abb8d6"><strong> 影 集 分
类 管 理</strong></td>
</tr>
<form name="form1" method="post" action="photo_savetype.asp?cz=addtype">
<tr>
<td height="40" bgcolor="#FFFFFF" class="bk">添加分类:
<input type="text" name="typename" class="an" size="15" maxlength="50">
<input type="submit" name="Submit3" value="添加" class="an">
</td>
</tr>
</form>
<form name="form2" method="post" action="photo_savetype.asp">
<tr>
<td height="40" bgcolor="#FFFFFF" class="xzy">管理分类:
<select name="typeid">
<%
sql = "SELECT * FROM photo_type"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.OPEN sql,Conn,1,1
if rs.eof and rs.bof then
Response.Write"<option>还没有任何分类</option>"
else
do while not rs.eof
Response.Write"<option value='"&rs("id")&"'>"&rs("name")&"</option>"
rs.movenext
loop
end if
rs.close
set rs=nothing
%>
</select>
<br>
<br>
<select name="cz">
<option value="deltype">删除</option>
<option value="edittype" selected>修改</option>
</select>
<input type="submit" name="Submit22" value="确定" class="an">
新名称:
<input type="text" name="typename" class="an" maxlength="50" size="25">
<br>
<br>
*选择删除分类不用填写</td>
</tr>
</form>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?