📄 aucclass.asp

📁 实用的拍卖源码。适合个人建站学习使用。仅供学习参考
💻 ASP
字号:

<!-- #include file="inc/char.asp" --><!-- #include file="conn.asp" -->
<!-- #include file="head.asp" -->
<html>
<head>
<TITLE><%=webname%>--首页---联系QQ:6439358，联系邮箱vqqq59r@163.com，网站www.vqqq.com，谢谢大家对我们系统的支持</title>
<META http-equiv=Content-Type content="text/html; charset="<%=charset%>">
<META name="keywords" content="<%=keywords%>">
<META name="description" content="<%=description%>">
<link href="images/main_style.css" rel="stylesheet" type="text/css">
</HEAD>
<BODY leftMargin=0 onmouseover=exitpop=false text=#000000 topMargin=0 marginheight="0" marginwidth="0">

<TABLE border=0 cellPadding=0 cellSpacing=0 width=760>
  <tr>
    <td height="8"></td>
  </tr>
</table>
<TABLE border=0 cellPadding=0 cellSpacing=1 width="760" align=center class=yellow_bg>
         <TBODY>
              <TR>
                <TD align=center class=td>
	<TABLE border=0 cellPadding=0 cellSpacing=0 width="100%" align=center>
         <TBODY>
              <TR class=yellow_bg>
                <TD colSpan=3 height=2></TD></TR>
              <TR>
                <TD class=yellow_bg width=140>&nbsp;<font class=fblack><b>商品分类游览</b></font></TD>
                <TD width=20 class=yellow_bg>
                <IMG height=22 src="images/conner.gif" width=20></TD>
                <TD align=middle vAlign=bottom class=huise_bg>
                / <a href="searchprice.asp?pid=1" class="blacklink">1元热推</a>
                / <a href="searchprice.asp?pid=10" class="blacklink">10元热推</a>
                / <a href="searchprice.asp?pid=100" class="blacklink">100元热推</a>
                / <a href="searchprice.asp?pid=1000" class="blacklink">1000元热推</a>
		&nbsp;&nbsp;
                / <a href="cat.asp?action=all"  class="blacklink">所有商品</a> 
                / <a href="cat.asp?action=closing" class="blacklink">即将结束</a> 
                / <a href="cat.asp?action=new" class="blacklink">新登商品</a> 
                / <a href="cat.asp?action=hot" class="blacklink">热点商品</a></TD></TR>
	</TBODY>
</TABLE><BR>
<TABLE align=center border=0 cellPadding=2 cellSpacing=0 width=760>
              <TBODY>
              <TR>
                <TD width="485">
		<table width="485" border="0">
		<%sqlfl = "SELECT * FROM cat order by catid"    
		    set rsfl=server.createobject("adodb.recordset")
			rsfl.open sqlfl,conn,1,1
			if rsfl.eof then 
			response.write "还没有分类呢"
			end if
		    do while not rsfl.eof%>
		  <tr>
		    <td><img src=images/hit.gif>
		        <a href="displaycats.asp?catid=<%=rsfl("catID")%>" class="catbig"><%=rsfl("catname")%></a><br>&nbsp;&nbsp;
			<%sqlfl2="select * from catson where catID="&rsfl("catID")
			set rsfl2=server.createobject("adodb.recordset")
		    rsfl2.open sqlfl2,conn,1,1
			if rsfl2.eof then response.write "还没有分类目录呢！"
			while not rsfl2.eof %>
			<a href="displaycats.asp?catid=<%=rsfl("catID")%>&catsid=<%=rsfl2("catsonID")%>"><%=rsfl2("catsonname")%></a>
			|<%rsfl2.movenext
			wend%>
		    </td>
		  </tr>
			<%rsfl.movenext
			loop
			rsfl.close
			rsfl2.close
		        set rsfl = nothing
		        set rsf2 = nothing
			%>
		</table>
                </TD>
                </TR>
              </TBODY>
	</TABLE>
                </TD>
                </TR>
              </TBODY>
</TABLE>
</BODY>
</HTML>
<!-- #include file="bottom.asp" -->
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -