📄 sort.asp
字号:
<!--#include file="conn.asp" -->
<%
'☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆
'★ ★
'☆ 56770网络商城V2.3多语言版 ☆
'★ ★
'☆ 版权所有: 56770.com ☆
'★ ★
'☆ 程序制作: 56770网络 小寒 MoGui ☆
'★ email:admin@56770.com ★
'☆ QQ:88464758 ☆
'★ ★
'☆ [主页地址]http://www.56770.com ☆
'★ [支持论坛]http://bbs.56770.com/ ★
'☆ ☆
'★ 其他产品： ★
'☆ [56770MM写真系统] [56770行业信息网] ☆
'☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆
%>
<%
if session("admin_name")="" then
response.redirect "default.asp"
end if
%>
<link rel="stylesheet" type="text/css" href="css.css">
<body bgcolor="#FFFFCC" text="#000000" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<table width="100%" border="0" cellspacing="1" cellpadding="2" bgcolor="#FFFFFF" vspace="0" hspace="0">
<tr >
<td height="27" background="images/admin_bg_1.gif">.:: 您可以在这里进行商品类别相关操作</td>
</tr>
</table>
<table border="0" cellspacing="1" cellpadding="2" bgcolor="#FFFFFF" width="100%" align="center">
<tr>
<td height="22" bgcolor="#FFCC33" colspan="6" background="images/admin_bg_1.gif">
<div align="left"><a href="sort_edit.asp?a=add">添加一个一级分类</a></div>
</td>
</tr>
<tr>
<td height="22" bgcolor="#6699CC" width="70%">一级分类名称</td>
<td height="22" bgcolor="#6699CC" width="7%">编号</td>
<td colspan="4" bgcolor="#6699CC">操作</td>
</tr></table>
<%
dim rscsort
set rs=server.CreateObject("adodb.recordset")
rs.open "Select * From 56770_sort", conn, 1, 3
do while not rs.eof
%>
<table border="0" cellspacing="1" cellpadding="2" bgcolor="#FFFFFF" width="100%" align="center">
<tr bgcolor="#B0CBE6">
<td height="22" width="70%"> <img src="../images/+.gif"><%=rs("sort_name")%> [<a href="csort_edit.asp?name=<%=rs("sort_name")%>&sort_name=<%=rs("sort_id")%>&a=add"><font color=red>添加二级分类</font></a>]</td>
<td width="7%"><%=rs("number")%></td>
<td width="6%"><a onclick='{if(confirm("您确定删除吗?此操作将不能恢复!")){return true;}return false;}' href="sort_edit.asp?action=del&sort_id=<%=rs("sort_id")%>&a=del">删除</a></td>
<td width="8%"><a href="sort_edit.asp?sort_id=<%=rs("sort_id")%>&a=modi">修改</a></td>
</tr>
</table>
<%
set rscsort=server.CreateObject("adodb.recordset")
rscsort.open "Select * From 56770_csort Where sort_name=" & rs("sort_id") & "", conn, 1, 1
if not(rscsort.bof and rscsort.eof)then
do while not rscsort.eof
%>
<table border="0" cellspacing="1" cellpadding="2" bgcolor="#FFFFFF" width="100%" align="center">
<tr bgcolor="#E8F1FF">
<td height="22" width="70%"> <img src="../images/-.gif"><%=rscsort("csort_name")%> [<a href="cxsort_edit.asp?sort_name=<%=rscsort("sort_name")%>&csort_id=<%=rscsort("csort_id")%>&csort_name=<%=rscsort("csort_name")%>&a=add"><font color=red>添加三级分类</font></a>]</td>
<td height="22" width="7%"><%=rscsort("cnumber")%></td>
<td width="8%"><a onclick='{if(confirm("您确定删除吗?此操作将不能恢复!")){return true;}return false;}' href="csort_edit.asp?action=del&<%=rscsort("csort_name")%>&sort_name=<%=rscsort("sort_name")%>&csort_id=<%=rscsort("csort_id")%>&cnumber=<%=rscsort("cnumber")%>&a=des">删除</a></td>
<td width="8%"><a href="csort_edit.asp?modicsort=<%=rscsort("csort_name")%>&sort_name=<%=rscsort("sort_name")%>&csort_id=<%=rscsort("csort_id")%>&cnumber=<%=rscsort("cnumber")%>&a=modi">修改</a></td>
</tr>
</table>
<%
set rscxsort=server.CreateObject("adodb.recordset")
rscxsort.open "Select * From 56770_cxsort Where sort_name=" & rscsort("sort_name") & " and csort_name=" & rscsort("csort_id") & "", conn, 1, 1
if not(rscxsort.bof and rscxsort.eof)then
do while not rscxsort.eof
%>
<table border="0" cellspacing="1" cellpadding="2" bgcolor="#FFFFFF" width="100%" align="center">
<tr bgcolor="#F4F4F4">
<td height="22" width="70%"> <img src="../images/-.gif"><%=rscxsort("cxsort_name")%> [<a href="cysort_edit.asp?sort_name=<%=rscxsort("sort_name")%>&csort_name=<%=rscxsort("csort_name")%>&cxsort_name=<%=rscxsort("cxsort_id")%>&name=<%=rscxsort("cxsort_name")%>&a=add"><font color=red>添加四级分类</font></a>] </td>
<td width="7%"><%=rscxsort("xnumber")%></td>
<td width="8%"><a onclick='{if(confirm("您确定删除吗?此操作将不能恢复!")){return true;}return false;}' href="cxsort_edit.asp?action=del&sort_name=<%=rscxsort("sort_name")%>&csort_name=<%=rscxsort("csort_name")%>&cxsort_name=<%=rscxsort("cxsort_id")%>&xnumber=<%=rscxsort("xnumber")%>&a=del">删除</a></td>
<td width="8%"><a href="cxsort_edit.asp?modicxsort=<%=rscxsort("cxsort_name")%>&sort_name=<%=rscxsort("sort_name")%>&csort_name=<%=rscxsort("csort_name")%>&cxsort_id=<%=rscxsort("cxsort_id")%>&xnumber=<%=rscxsort("xnumber")%>&a=modi">修改</a></td>
</tr>
</table>
<%
set rscysort=server.CreateObject("adodb.recordset")
rscysort.open "Select * From 56770_cysort Where sort_name=" & rscxsort("sort_name") & " and csort_name=" & rscxsort("csort_name") & " and cxsort_name=" & rscxsort("cxsort_id") & "", conn, 1, 1
if not(rscysort.bof and rscysort.eof)then
do while not rscysort.eof
%>
<table border="0" cellspacing="1" cellpadding="2" bgcolor="#FFFFFF" width="100%" align="center">
<tr bgcolor="#ffffff">
<td height="10" width="34%"> <font color="#B0CBE6">∮</font><%=rscysort("cysort_name")%>
(<a onclick='{if(confirm("您确定删除吗?此操作将不能恢复!")){return true;}return false;}' href="cysort_edit.asp?action=del&cysort_name=<%=rscysort("cysort_id")%>&sort_name=<%=rscysort("sort_name")%>&csort_name=<%=rscysort("csort_name")%>&cxsort_name=<%=rscysort("cxsort_name")%>&ynumber=<%=rscysort("ynumber")%>&a=del">删除</a>|<a href="cysort_edit.asp?cysort_name=<%=rscysort("cysort_id")%>&sort_name=<%=rscysort("sort_name")%>&csort_name=<%=rscysort("csort_name")%>&cxsort_name=<%=rscysort("cxsort_name")%>&ynumber=<%=rscysort("ynumber")%>&a=modi">修改</a></td>
<%
rscysort.movenext
if rscysort.eof or rscysort.bof then
response.write ""
exit do
end if
%>
<td height="10" width="33%"><font color="#B0CBE6">∮</font><%=rscysort("cysort_name")%>
(<a onclick='{if(confirm("您确定删除吗?此操作将不能恢复!")){return true;}return false;}' href="cysort_edit.asp?action=del&cysort_name=<%=rscysort("cysort_id")%>&sort_name=<%=rscysort("sort_name")%>&csort_name=<%=rscysort("csort_name")%>&cxsort_name=<%=rscysort("cxsort_name")%>&ynumber=<%=rscysort("ynumber")%>&a=del">删除</a>|<a href="cysort_edit.asp?cysort_name=<%=rscysort("cysort_id")%>&sort_name=<%=rscysort("sort_name")%>&csort_name=<%=rscysort("csort_name")%>&cxsort_name=<%=rscysort("cxsort_name")%>&ynumber=<%=rscysort("ynumber")%>&a=modi">修改</a></td>
<%
rscysort.movenext
if rscysort.eof or rscysort.bof then
response.write ""
exit do
end if
%>
<td height="10" width="33%"><font color="#B0CBE6">∮</font><%=rscysort("cysort_name")%>
(<a onclick='{if(confirm("您确定删除吗?此操作将不能恢复!")){return true;}return false;}' href="cysort_edit.asp?action=del&cysort_name=<%=rscysort("cysort_id")%>&sort_name=<%=rscysort("sort_name")%>&csort_name=<%=rscysort("csort_name")%>&cxsort_name=<%=rscysort("cxsort_name")%>&ynumber=<%=rscysort("ynumber")%>&a=del">删除</a>|<a href="cysort_edit.asp?cysort_name=<%=rscysort("cysort_id")%>&sort_name=<%=rscysort("sort_name")%>&csort_name=<%=rscysort("csort_name")%>&cxsort_name=<%=rscysort("cxsort_name")%>&ynumber=<%=rscysort("ynumber")%>&a=modi">修改</a></td>
</tr>
</table>
<%
rscysort.movenext
loop
end if
rscysort.close
set rscysort=nothing
%>
<%
rscxsort.movenext
loop
end if
rscxsort.close
set rscxsort=nothing
rscsort.movenext
loop
end if
rscsort.close
set rscsort=nothing
rs.movenext
loop
%>
<%
rs.close
set rs=nothing
%>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -