⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 catalog_small_desc.asp

📁 shoppingxp为网上商城系统
💻 ASP
字号:
<!--
┌─ shopxp.cn──────────────┐
│  免费版难免存在不足,建议你使用正式版  │
│  正式版用户提供免费升级24小时内排除故障│
│  请到www.shopxp.cn进行前台和后台的测试 │
│  热线:010-69209701-801 QQ:83107971   │
└────────────────────┘
-->
<!--#include file="conn/conn.asp"-->
<!--#include file="conn/webconfig.asp"-->
<html><head>
<%
	dim btype_id, anclassname, stype_id, nclassname
   	dim totalPut   
   	dim CurrentPage, TotalPages
        if request("btype_id")<>"" then
		btype_id=request("btype_id")
   	else
		btype_id=0
   	end if


if request("stype_id")<>"" then
		stype_id=request("stype_id")
   	else
		stype_id=0
   	end if
      
   	if not isempty(request("page")) then
      		currentPage=cint(request("page"))
   	else
      		currentPage=1
   	end if



		'rs.close

        
 
  	set rs=server.createobject("adodb.recordset")
					  	rs.open "select * from btype where btype_id="&btype_id,conn,1,1
						anclassname=rs("btype_name")
						rs.close
					  	rs.open "select * from stype where stype_id="&stype_id,conn,1,1
						nclassname=rs("stype_name")
						rs.close%>
<title><%=nclassname%>|<%=webname%></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312"><br>
<meta name="description" content="<%=nclassname%>,<%=webname%>">
<meta name="keywords" content="<%=nclassname%>,<%=webname%>">
<link href="img/css.css" rel="stylesheet" type="text/css">
</head>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<!--#include file="webtop.asp"-->
<table width="99%" border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td width="92%"><table width="99%" border="0" align="center" cellpadding="0" cellspacing="0">
      <tr>
        <td width="188" valign="top"><table width="98%"  border="0" cellspacing="0" cellpadding="0">
        <TD vAlign=top class=b><!--#include file="info/info_fenlei.asp"--></TD>
        </TR>
        <TR>
          <TD  vAlign=top class=b><!--#include file="info/info_tuijian.asp"--></TD>
        </TR>
        <TR>
          <TD  vAlign=top class=b><!--#include file="info/info_kefu.asp"-->
          </TD>
        </TR>
        <TR>
          </table>
        <td width="14" background="img/xiao/bg_body.gif"></td>
        <td valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0">
          <tr>
            <td><table width="10" height="5" border="0" cellpadding="0" cellspacing="0">
                <tr>
                  <td width="10"></td>
                </tr>
            </table></td>
          </tr>
        </table>
        <!--#include file="info/info_leitop.asp"-->
		<table width="100%" height="5" border="0" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">

                    <tr>
                      <td align="center">
                      </td>
                    </tr>
                    <%set rs=server.createobject("adodb.recordset")
btype_id=trim(request("btype_id"))
      if btype_id=empty then
          response.redirect "index.asp"
      end if
	  
	    sql="select * from stype where stype_id="&cstr(stype_id)
   rs.open sql,conn,1,1
	if not rs.eof then
		Nclassname=rs("stype_name")
 	end if
	rs.close
       
      page=request.querystring("page")
      if page="" then page=1
      if not(isnumeric(page)) then page=1
      if page<1 then page=1
      page=int(page)
      
if stype_id<>0 then
	sql="select * from shop_product where stype_id="+cstr(stype_id)+" and btype_id="+cstr(btype_id)+"  order by productid desc" 
elseif btype_id<>0 then
	sql="select * from shop_product where btype_id="+cstr(btype_id)+" order by productid desc" 
else
	sql="select * from shop_product order by productid desc"
end if

if order="time" then
    sql="select * from shop_product where stype_id="+cstr(stype_id)+" and btype_id="+cstr(btype_id)+"  order by productid desc" 
	elseif order="price1" then
    sql="select * from shop_product where stype_id="+cstr(stype_id)+" and btype_id="+cstr(btype_id)+"  order by huiuanjia desc , productid desc"
	elseif order="price2" then
	sql="select * from shop_product where stype_id="+cstr(stype_id)+" and btype_id="+cstr(btype_id)+"  order by huiyuanjia asc , productid desc"
	end if
      
      rs.open sql,conn,3,3
      if rs.eof then
          response.write "<tr><td align=center colspan=3 height=180><font color=#ff0000>产品数据正在收集当中......</font></td></tr>"
      else
          rs.pagesize=16
          totalrec=rs.recordcount
          totalpage=rs.pagecount
          if page>totalpage then page=totalpage
          rs.absolutepage=page
          rs.cachesize=rs.pagesize
          %>
                    <tr>
                      <td height="2"><br><TABLE width=100% height="40" border=0 align="center" cellPadding=0 cellSpacing=0>
                    <TBODY>
                      <TR>
                        <TD vAlign=top width=4 height=4><IMG height=4 
            src="img/xiao/new_line_004.gif" width=4></TD>
                        <TD background=img/xiao/new_line_008.gif height=4></TD>
                        <TD vAlign=top width=4 height=4><IMG height=4 
            src="img/xiao/new_line_005.gif" width=4></TD>
                      </TR>
                      <TR>
                        <TD width="1" background=img/xiao/new_line_009.gif></TD>
                        <TD><%
					  set rs2=server.CreateObject("adodb.recordset")
			rs2.open "select stype_name,stype_id from stype where btype_id="&rs("btype_id")&" order by stype_idorder",conn,1,1
			do while not rs2.eof
			response.write "<A href=Catalog_small_Desc.asp?action_key_order=small&btype_id="&rs("btype_id")&"&stype_id="&rs2("stype_id")&"><font color=#FF3300>"&trim(rs2("stype_name"))&"</font></A>  " 
             rs2.movenext
			 loop
			 rs2.close
			 set rs2=nothing%></TD>
                        <TD width="1" background=img/xiao/new_line_010.gif></TD>
                      </TR>
                      <TR>
                        <TD vAlign=top width=4 height=4><IMG height=4 
            src="img/xiao/new_line_006.gif" width=4></TD>
                        <TD background=img/xiao/new_line_011.gif></TD>
                        <TD vAlign=top width=4 height=4><IMG height=4 
            src="img/xiao/new_line_007.gif" width=4></TD>
                      </TR>
                    </TBODY>
                  </TABLE><table width="100%" height="35"  border="0" cellpadding="0" cellspacing="0">
                        <tr>
                          <td width="22%" height="23"><img src="img/xiao/CPXIZL.gif" width="151" height="21"></td>
                          <td width="78%"><b><%=nclassname%></b>所有商品共<b><%=totalrec%></b>件,这是第 <%=(page-1)*16+1%>--
                              <%if page+1<=totalpage then%>
                              <%=page*16%>
                              <%else%>
                              <%=totalrec%>
                              <%end if%>
      件</td>
                        </tr>
                        <tr>
                          <td height="1" colspan="2" background="img/xiao/linedot.gif"></td>
                        </tr>
                      </table></td>
                    </tr>
                    <tr>
                      <td width="100%">
					  <br>
                        <table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
                          <tr>
                            <%i=0
          do while not rs.eof and (i<rs.pagesize)
          i=i+1
 								%>
                            <td width="25%" height="134" align="left" bgcolor="#FFFFFF">
                              <div align="center">                              
                                <table border="0" align="center" cellpadding="0" cellspacing="0">
                                  <tr>
                                    <td><TABLE width=100 height=100 border=0 align="center" cellPadding=2 cellSpacing=1 bgColor=#e1e1e1 onmouseover="this.style.backgroundColor='#FF6600'" onmouseout="this.style.backgroundColor=''">
                                        <TBODY>
                                          <TR>
                                            <TD width=100 height=100 bgColor=#ffffff align=center>
                                              <%if rs("upfilepic")="" then 
response.write "<div align=center><a href=product.asp?id="&rs("productid")&" ><img src=img/emptybook.gif width=98 height=98 border=0></a></div>"
else%>
                                              <a href=product.asp?id=<%=rs("productid")%> ><img src="<%=trim(rs("upfilepic"))%>" alt="alt=&quot;<%=rs("productname")%>"  width=98 height=98 border=0></a>
                                              <%end if%>
                                            </td>
                                          </tr>
                                        </tbody>
                                      </table>
                                        <table width="100%" border="0" cellpadding="0" cellspacing="0">
                                          <tr>
                                            <td align=center> <%=trim(rs("productname"))%><br>
            会员价:<font color=#FF3300><%=trim(rs("huiyuanjia"))%> 元</font> </td>
                                          </tr>
                                      </table></td>
                                  </tr>
                                </table>
                              </div></td>
                            <%
		if (i mod 4=0) and i>=4 then
%>
                          </tr>
                          <tr>
                            <%
	end if
rs.movenext
loop
rs.close
%>
                          </tr>
                      </table></td>
                    </tr>
                    <tr>
                      <td width="100%" height="20">
                        <div align="center"></div></td>
                    </tr>
                    <tr>
                      <td width=478 height="23">
                        <p align="right"><strong style="font-weight: 400">第<%=page%>页/共<%=totalpage%>页&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
                      <%if page-1>0 then%>
                      <a href="Catalog_Desc.asp?btype_id=<%=btype_id%>&page=<%=page-1%>&stype_id=<%=stype_id%>">上一页</a>
                      <%else%>
        上一页
        <%end if%>
         
        <%if page+1<=totalpage then%>
         <a href="Catalog_Desc.asp?btype_id=<%=btype_id%>&page=<%=page+1%>&stype_id=<%=stype_id%>">下一页</a>
        <%else%>
        下一页
        <%end if
						  end if%>
                      </strong></font></p></td>
                    </tr>
            </table>         
          </td>
        <td width="1" background="img/xiao/bgbg.gif"></td>
      </tr>
    </table></td>
    <td width="8%">&nbsp;</td>
  </tr>
</table>
<!--#include file="copyright.asp" -->
</body>
</html>

⌨️ 快捷键说明

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