📄 fen.asp
字号:
<!--#include file="security.asp"-->
<!--#include file="articleconn.asp"-->
<link rel="stylesheet" type="text/css" href="css/style.css">
<body bgcolor="#666666">
<center>
<p> </p>
<form name="form1" method="post" action="fensave.asp">
<table border="0" cellspacing="0" width="600" cellpadding="0" height="20" class="sx">
<tr bgcolor="#333333">
<td width="100%" height="20">
<p align="center"><font
color="#FFFFFF">添 加 父 级 分 类</font>
</td>
</tr>
</table>
<table width="600" border="0" cellspacing="0" cellpadding="0" bordercolor="#000000">
<tr>
<td bordercolor="#FFFFFF">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="150">
<div align="right"><br>
<br>
请输入父级类名：</div>
</td>
<td> <br>
<input type="text" name="zhu" class="smallinput" size="30" maxlength="50">
</td>
</tr>
<tr>
<td width="150"> </td>
<td>
<input type="submit" name="Submit" value=" 添 加 " class="buttonface">
<input type="reset" name="Submit2" value=" 重 填 " class="buttonface">
</td>
</tr>
</table>
</td>
</tr>
</table>
</form>
<p><a href="mimi.asp"><font face="Webdings" size="4">7</font>返回管理页面</a> </p>
<p> </p>
<table border="0" cellspacing="0" width="600" bordercolorlight="#000000" bordercolordark="#FFFFFF" cellpadding="0" bgcolor="#333333" class="sx">
<tr bgcolor="#333333">
<td width="100%" height="20">
<p align="center"><font
color="#FFFFFF">父 级 分 类 列 表</font>
</td>
</tr>
</table>
<table width="600" border="0" cellspacing="0" cellpadding="0" bordercolor="#000000">
<tr>
<td bordercolor="#FFFFFF"> <br>
<table width="100%" border="0" cellspacing="0" cellpadding="3">
<tr>
<td><b><font color="#FFFFFF">父级类名称</font></b></td>
<td width="100">
<div align="center"><font color="#FF0000"><b><font color="#FFFFFF">修改</font></b></font></div>
</td>
<td width="100">
<div align="center"><font color="#FF0000"><b><font color="#FFFFFF">删除</font></b></font></div>
</td>
</tr>
</table>
<%
dim bentop,strSQL
strSQL ="SELECT * FROM zhu ORDER BY zhuid DESC"
Set bentop = Server.CreateObject("ADODB.Recordset")
bentop.open strSQL,Conn,0,1
if bentop.eof then
response.write "<font color='#0080C0'>还没有任何父级分类</font>"
else
do while not bentop.eof
if not bentop.eof then
%>
<table width="100%" border="0" cellspacing="0" cellpadding="3">
<tr>
<td><a href="typeadd.asp?typeid=<%=bentop("zhuid")%>&typename=<%=bentop("zhu")%>"><%=bentop("zhu")%></a></td>
<td width="100">
<div align="center"><a href="zhuedit.asp?zhuid=<%=bentop("zhuid")%>">修改</a></div>
</td>
<td width="100">
<div align="center"><a href="zhudel.asp?zhuid=<%=bentop("zhuid")%>">删除</a></div>
</td>
</tr>
</table>
<%bentop.movenext
end if
loop
bentop.close
set bentop=nothing
end if%>
</td>
</tr>
</table>
<font color="#FFFFFF">注：如删除父类，其添加的子类和其子类下的软件将一同删除，请确认清楚后才进行操作！！ </font>
</center>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -