- Visual C++源码
- Visual Basic源码
- C++ Builder源码
- Java源码
- Delphi源码
- C/C++源码
- PHP源码
- Perl源码
- Python源码
- Asm源码
- Pascal源码
- Borland C++源码
- Others源码
- SQL源码
- VBScript源码
- JavaScript源码
- ASP/ASPX源码
- C#源码
- Flash/ActionScript源码
- matlab源码
- PowerBuilder源码
- LabView源码
- Flex源码
- MathCAD源码
- VBA源码
- IDL源码
- Lisp/Scheme源码
- VHDL源码
- Objective-C源码
- Fortran源码
- tcl/tk源码
- QT源码
shopsort.asp
资源名称:shop2.rar [点击查看]
上传用户:btntkt
上传日期:2021-04-16
资源大小:5296k
文件大小:4k
源码类别:
WEB源码(ASP,PHP,...)
开发平台:
DOS
- <!--#include file="conn.asp"-->
- <!--#include file="config.asp"-->
- <html><head><title>网软天下购物系统,网络购物系统,asp购物系统,免费购物系统,网上商城购物系统。--导航分类</title>
- <meta http-equiv="Content-Type" content="text/html; charset=gb2312">
- <meta name="description" content="<%=des%>">
- <meta name="keywords" content="<%=keya%>">
- <link href="skin/skin<%=skinid%>/css.css" rel="stylesheet" type="text/css">
- <style type="text/css">
- <!--
- .STYLE2 {font-size: 14}
- -->
- </style>
- <style type="text/css">
- <!--
- .STYLE3 {font-size: 13}
- -->
- </style>
- </head>
- <!--#include file="include/head.asp"-->
- <body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
- <TABLE width=996 border=0 align="center" cellPadding=0 cellSpacing=0>
- <TBODY>
- <TR>
- <TD class=b vAlign=top align=left><table width="100%" height="49" border="0" cellpadding="0" cellspacing="0">
- <tr>
- <td><br>
- <%
- set rs=server.CreateObject("adodb.recordset")
- rs.open "select anclass,anclassid from bsort order by anclassidorder",conn,1,1
- do while not rs.eof %>
- <table width="100%" height="70" border="0" cellpadding="0" cellspacing="0">
- <tr>
- <td><TABLE width=980 height="53" border=0 align="center" cellPadding=0 cellSpacing=0>
- <TBODY>
- <TR>
- <TD vAlign=top width=4 height=4><IMG height=4
- src="images/new_line_004.gif" width=4></TD>
- <TD background=images/new_line_008.gif height=4></TD>
- <TD vAlign=top width=4 height=4><IMG height=4
- src="images/new_line_005.gif" width=4></TD>
- </TR>
- <TR>
- <TD width="1" rowspan="2" background=images/new_line_009.gif></TD>
- <TD height="19" ><img src="images/body/orange-bullet.gif" align="middle">
- <%response.write "<br> <A href=class.asp?lx=big&anid="&rs("anclassid")&" class=top><span class=STYLE2><b><font color=#FF3300>"&trim(rs("anclass"))&"</font></b></span></a> <br>"%>
- </TD>
- <TD width="1" rowspan="2" background=images/new_line_010.gif></TD>
- </TR>
- <TR>
- <TD height="26"><% set rs2=server.CreateObject("adodb.recordset")
- rs2.open "select nclass,nclassid from ssort where anclassid="&rs("anclassid")&" order by nclassidorder",conn,1,1
- do while not rs2.eof
- response.write " <A href=class.asp?lx=small&anid="&rs("anclassid")&"&nid="&rs2("nclassid")&"><span class=STYLE3><b><font color=#0099cf>"&trim(rs2("nclass"))&"</font></b></span></A>"
- set rs3=server.CreateObject("adodb.recordset")
- rs3.open "select xclass,id from xsort where nclassid="&rs2("nclassid")&" order by id",conn,1,1
- do while not rs3.eof
- response.write " <A href=class.asp?lx=small&anid="&rs("anclassid")&"&nid="&rs2("nclassid")&"&xid="&rs3("id")&"><font color=#000000>"&trim(rs3("xclass"))&"</font></A> "
- rs3.movenext
- loop
- if rs3.eof then
- response.write "<br>"
- end if
- rs3.close
- set rs3=nothing
- rs2.movenext
- loop
- rs2.close
- set rs2=nothing
- response.write "<br>"%></TD>
- </TR>
- <TR>
- <TD vAlign=top width=4 height=4><IMG height=4
- src="images/new_line_006.gif" width=4></TD>
- <TD background=images/new_line_011.gif></TD>
- <TD vAlign=top width=4 height=4><IMG height=4
- src="images/new_line_007.gif" width=4></TD>
- </TR>
- </TBODY>
- </TABLE></td>
- </tr>
- </table><br>
- <% rs.movenext
- loop
- rs.close
- set rs=nothing%></td>
- </tr>
- </table>
- <br>
- </td>
- </tr>
- </table>
- <!--#include file="include/foot.asp"-->
- </body>
- </html>