shopsort.asp
上传用户:btntkt
上传日期:2021-04-16
资源大小:5296k
文件大小:4k
源码类别:

WEB源码(ASP,PHP,...)

开发平台:

DOS

  1. <!--#include file="conn.asp"-->
  2. <!--#include file="config.asp"-->
  3. <html><head><title>网软天下购物系统,网络购物系统,asp购物系统,免费购物系统,网上商城购物系统。--导航分类</title>
  4. <meta http-equiv="Content-Type" content="text/html; charset=gb2312">
  5. <meta name="description" content="<%=des%>">
  6. <meta name="keywords" content="<%=keya%>">
  7. <link href="skin/skin<%=skinid%>/css.css" rel="stylesheet" type="text/css">
  8. <style type="text/css">
  9. <!--
  10. .STYLE2 {font-size: 14}
  11. -->
  12. </style>
  13. <style type="text/css">
  14. <!--
  15. .STYLE3 {font-size: 13}
  16. -->
  17. </style>
  18. </head>
  19. <!--#include file="include/head.asp"-->
  20. <body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
  21. <TABLE width=996 border=0 align="center" cellPadding=0 cellSpacing=0>
  22.   <TBODY>
  23.     <TR>
  24.       <TD class=b vAlign=top align=left><table width="100%" height="49"  border="0" cellpadding="0" cellspacing="0">
  25.           <tr>
  26.             <td><br>
  27.               <%
  28.   set rs=server.CreateObject("adodb.recordset")
  29.   rs.open "select anclass,anclassid from bsort order by anclassidorder",conn,1,1
  30.   do while not rs.eof %>
  31.               <table width="100%" height="70"  border="0" cellpadding="0" cellspacing="0">
  32.                 <tr>
  33.                   <td><TABLE width=980 height="53" border=0 align="center" cellPadding=0 cellSpacing=0>
  34.                     <TBODY>
  35.                       <TR>
  36.                         <TD vAlign=top width=4 height=4><IMG height=4 
  37.             src="images/new_line_004.gif" width=4></TD>
  38.                         <TD background=images/new_line_008.gif height=4></TD>
  39.                         <TD vAlign=top width=4 height=4><IMG height=4 
  40.             src="images/new_line_005.gif" width=4></TD>
  41.                       </TR>
  42.                       <TR>
  43.                         <TD width="1" rowspan="2" background=images/new_line_009.gif></TD>
  44.                           <TD height="19" ><img src="images/body/orange-bullet.gif" align="middle"> 
  45.                             <%response.write "<br>&nbsp;&nbsp;&nbsp;<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>&nbsp;&nbsp;<br>"%>
  46.                           </TD>
  47.                         <TD width="1" rowspan="2" background=images/new_line_010.gif></TD>
  48.                       </TR>
  49.                       <TR>
  50.                         <TD height="26"><% set rs2=server.CreateObject("adodb.recordset")
  51. rs2.open "select nclass,nclassid from ssort where anclassid="&rs("anclassid")&" order by nclassidorder",conn,1,1
  52. do while not rs2.eof
  53. response.write "&nbsp;&nbsp;&nbsp;<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>" 
  54.  set rs3=server.CreateObject("adodb.recordset")
  55. rs3.open "select xclass,id from xsort where nclassid="&rs2("nclassid")&" order by id",conn,1,1
  56. do while not rs3.eof
  57.  
  58. response.write "&nbsp;&nbsp;&nbsp;<A href=class.asp?lx=small&anid="&rs("anclassid")&"&nid="&rs2("nclassid")&"&xid="&rs3("id")&"><font color=#000000>"&trim(rs3("xclass"))&"</font></A> " 
  59.     rs3.movenext
  60.  loop
  61.  
  62.    if  rs3.eof  then
  63.  response.write "<br>"
  64.  end if 
  65.  rs3.close
  66.  set rs3=nothing
  67.  
  68.            rs2.movenext
  69.  loop
  70.  rs2.close
  71.  set rs2=nothing
  72.  response.write "<br>"%></TD>
  73.                       </TR>
  74.                       <TR>
  75.                         <TD vAlign=top width=4 height=4><IMG height=4 
  76.             src="images/new_line_006.gif" width=4></TD>
  77.                         <TD background=images/new_line_011.gif></TD>
  78.                         <TD vAlign=top width=4 height=4><IMG height=4 
  79.             src="images/new_line_007.gif" width=4></TD>
  80.                       </TR>
  81.                     </TBODY>
  82.                   </TABLE></td>
  83.                 </tr>
  84.               </table><br>
  85.             <% rs.movenext
  86. loop
  87. rs.close
  88. set rs=nothing%></td>
  89.           </tr>
  90.         </table> 
  91. <br>       
  92.       </td>
  93.     </tr>
  94. </table>
  95. <!--#include file="include/foot.asp"-->
  96. </body>
  97. </html>