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

📄 product.asp

📁 狼道公司源码下载
💻 ASP
字号:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<!--#include file="Inc/Conn.asp" -->
<!--#include file="Inc/Function.asp" -->
<%
Center_Left="Center_Left5.jpg"
%>
<HTML><HEAD><TITLE>产品分类展示 <%=WebTitle%></TITLE>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<META content="<%=WebKeyWord%>" name=description>
<META content="<%=WebKeyWord%>" name=keywords>
<META http-equiv=Pragma content=no-cache>
<LINK href="Images/common.css" type=text/css rel=STYLESHEET>
<LINK href="Images/style.css" type=text/css rel=stylesheet>
<META content="MSHTML 6.00.3790.2759" name=GENERATOR></HEAD>
<BODY leftMargin=0 background=Images/bg0.gif topMargin=0 marginwidth="0" marginheight="0">
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
  <TBODY>
  <TR>
    <TD height="81" background=Images/bg_company.gif><!--#include file="Top.asp" --></TD>
  </TR>
  <TR>
    <TD>
      <TABLE cellSpacing=0 cellPadding=0 width=830 border=0>
        <TBODY>
        <TR>
          <TD vAlign=top width=191>
            <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
              <TBODY>
              <TR>
                <TD vAlign=top>
                  <DIV align=center><IMG height=62 src="Images/left_menu.gif" width=191></DIV></TD></TR>
              <TR>
                <TD vAlign=top>
				
 <SCRIPT language=JavaScript src="JsMenu.js"></SCRIPT>

  <SCRIPT language=JavaScript>
		var JM = new JsMenu();
		JM.Direction = 1;	//主菜单排列方向:0代表横向,1代表竖向
		JM.MainWidth = 180;	//主菜单各项宽度
		JM.MainHeight = 20;	//主菜单各项高度
		
		JM.ItemWidth = null;	//子菜单宽度
		JM.ItemHeight = 20;	//子菜单高度
		
		JM.MainIcon = 'images/icon.gif';	//主菜单图标
		JM.MainAlign = 'left';	//主菜单对齐方式
		
		JM.ItemIcon =  'images//b01.gif';	//子菜单图标
		JM.ItemAlign = 'left';		//子菜单对齐方式
		
		JM.MainAnchor = null;		//主菜单链接样式
		JM.ItemAnchor = null;		//子菜单链接样式
		
		JM.Spacing = 1;				//菜单之间间隔
		JM.Padding = 4;				//菜单各项填充
		
		JM.OutBgColor = '#ffffff';	//默认时的背景颜色
		JM.OverBgColor = '#FFFFFF';	//激活时的背景颜色
		
		JM.OutBorder = '1px solid #ffffff';		//默认时的边框样式
		JM.OverBorder = '1px solid #ffffff';	//激活时的边框样式
		
		//加载数据项(分类ID,所属父ID,分类名,链接地址,打开链接的方式,显示Title);
		i=0;
		m=0;
		n=0;
		var name="";
		var parName="";
		var temp="";
		var temp2=new Array(); 
		var temp3=new Array();
		var link="Product.asp";
		var j=0;
		</SCRIPT>
		
		
		

       <SCRIPT language=JavaScript>		
	   <%
	   Set rs=server.CreateObject("adodb.recordset")
	   rs.open "select * from Class1 order by OrderID",Conn,1,1
	   do while not rs.eof
	   %>
			   i++;
	          name="level";
	          name=name+i;
	          var menuName=""; 
	          var nameExhibit="<%=China_EngLish_Title(rs("Title"),0)%>"; 
	          
			  menuName="<%=China_EngLish_Title(rs("Title"),0)%>"; 
					
			  JM.Add(name,'',menuName,link+"?CID1=<%=rs("ID")%>",'_self',nameExhibit);	
				 
			  parName=name;
			  temp=parName;					 
	   <%
		   Set rs1=server.CreateObject("adodb.recordset")
		   Rs1.Open "select * from Class2 where ClassID1="&rs("ID"),Conn,1,1
		   if not rs1.eof then
		   do while not rs1.eof
		   %>
			     	 

				     j++;
				     name="level"+i+"_"+j;							 
					 
					 var subMenuName=""; 
					 var nameExhibit="<%=China_EngLish_Title(rs1("Title"),0)%>"; 
					
						  subMenuName="<%=China_EngLish_Title(rs1("Title"),0)%>"; 
							
					JM.Add(name,parName,subMenuName,link+"?CID2=<%=rs1("ID")%>",'_self',nameExhibit);					
		   <%
		   rs1.movenext
		   loop
		   end if
		   rs1.close
		   set rs1=nothing
	   
	   rs.movenext
	   loop
	   rs.close
	   set rs=nothing
	   %>

	JM.Show();	//显示菜单
</SCRIPT>				</TD>
              </TR>
              <TR>
                <TD vAlign=top><br>
                  <img src="Images/bot2.gif" 
            width=191 height=240 border=0 usemap="#Map">
                  <map name="Map">
                    <area shape="rect" coords="103,6,189,51" href="Contact.asp">
                    <area shape="rect" coords="105,59,189,106" href="FeedBack.asp">
                    <area shape="rect" coords="106,117,188,164" href="News.asp">
                    <area shape="rect" coords="105,181,188,225" href="DownLoad.asp">
                  </map></TD>
              </TR>
              </TBODY></TABLE></TD>
          <TD vAlign=top rowSpan=2>
            <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
              <TBODY>
              <TR>
                <TD vAlign=top align=right height=25>
                  <TABLE cellSpacing=0 cellPadding=0 border=0>
                    <TBODY>
                    <TR>
                      <TD>&nbsp;</TD>
                      <TD width=5>&nbsp;</TD>
                      <TD vAlign=bottom>首页 &gt;&gt; 产品展示&nbsp;&nbsp;</TD>
                      <TD width=5>&nbsp;</TD></TR></TBODY></TABLE></TD></TR>
              <TR>
                <TD>
                  <TABLE cellSpacing=0 cellPadding=0 width=638 border=0>
                    <TBODY>
                    <TR>
                      <TD width=731><IMG height=26 
                        src="Images/compay01_title3.gif" width=450></TD>
                    </TR>
                    <TR>
                      <TD><IMG height=3 src="Images/title_line0.gif" 
                        width=670></TD></TR>
                    <TR>
                      <TD vAlign=top>
                        <TABLE cellSpacing=0 cellPadding=0 width="100%" 
border=0>
                          <TBODY>
                          <TR>
                            <TD></TD>
                          </TR></TBODY></TABLE>
                        <table cellspacing="8" cellpadding="8" width="100%" border="0">
                          <form action="Product.asp" method="post" name="ProductPicker_form">
                            <tbody>
                              <tr>
                                <td align="middle">搜索产品:   
                                  <input name="KW" id="KW" maxlength="20" />
                                  <select name="CID1" id="CID1">
                                    <option value="">全部基本分类</option>
									<%
									Set rs=server.CreateObject("adodb.recordset")
									rs.open "select * from Class1 order by OrderID",Conn,1,1
									do while not rs.eof
									%>
                                    <option value="<%=rs("ID")%>"><%=China_English_Title(rs("Title"),0)%></option>
									<%
									rs.movenext
									loop
									rs.close
									set rs=nothing
									%>
                                  </select>
                                  
                                  <select name="ZD" id="ZD">
                                    <option value="Title" selected="selected">产品名称</option>
                                    <option value="Content">产品描述</option>
                                  </select>
                                  <img style="cursor:hand" onClick="javascript:ProductPicker_form.submit();" src="Images/ebiz_go.gif" width="52" height="18" align="absmiddle" twffan="done" /></td>
                              </tr>
                            </tbody>
                          </form>
                        </table>
                        <table width="500" border="0" align="center" cellpadding="0" cellspacing="0" xmlns:fo="http://www.w3.org/1999/XSL/Format">
                          <tbody>
                            <tr>
                              <td align="left">当前位置: <a href="">商品分类</a><br /></td>
                            </tr>
                          </tbody>
                        </table>
                        <table cellspacing="0" cellpadding="0" width="500" align="center" border="0" xmlns:fo="http://www.w3.org/1999/XSL/Format">
                          <form name="ProductExhibitList_OrderForm" id="ProductExhibitList_OrderForm">
                            <input type="hidden" name="ProductExhibitList_OrderField" />
                            <input type="hidden" name="ProductExhibitList_Order" />
                            <input type="hidden" value="c373e9066203a95a8f6f081c9dffc98e" name="CategoryID2" />
                            <tbody>
                              <tr>
                                <td align="left" colspan="3"><br />
                                  
                                  <select name="OrderSelect" onChange="ChangeOrder();">
              <option value="">---请选择---</option>
              <option value="1">按照产品名称排序(升序)</option>
              <option value="2">按照产品名称排序(降序)</option>
              <option value="3">按照上架时间排序(升序)</option>
              <option value="4" selected="selected">按照上架时间排序(降序)</option>
            </select>
                                </td>
                              </tr>
                            </tbody>
                          </form>
                          <tr>
                            <td>                        
                          <TR vAlign="top"><td height="10"></td>
                          </tr>
                        </table>
                        <DIV align=center>
                        <TABLE cellSpacing=0 cellPadding=0 width="90%" 
border=0>
                          <TBODY>
                          <TR vAlign=top>
                            <TD vAlign=top>
							<%
Page=Request("Page")
if Page="" then Page=1
if Not isnumeric(Page) then Page=1
if CInt(Page)<1 then Page=1
Page=Abs(Cint(Page))
PCount=0
RCount=0
PSize=9

CID1=Request("CID1")
CID2=Request("CID2")
KW=Request("KW")
ZD=Request("ZD")
OrderSelect=Request("OrderSelect")

if CID1<>"" then
 if not isnumeric(CID1) then CID1=""
end if


if CID2<>"" then
 if not isnumeric(CID2) then CID2=""
end if

select Case OrderSelect 
  case "1"
     OrderSQL="Title"
  case "2"
     OrderSQL="Title desc"  
  case "3"
     OrderSQL="UpdateTime"  
  case "4"
     OrderSQL="UpdateTime desc"  
  case else
     OrderSQL="UpdateTime desc"       
end select
if ZD="" then ZD="Title"

if CID1<>"" then 
  SQLStr="select ID,Title,Picture from Product where ClassID1="&CID1&" and "&ZD&" like '%"&KW&"%' Order by "&OrderSQL
elseif CID2<>"" then
  SQLStr="select ID,Title,Picture from Product where ClassID2="&CID2&" and "&ZD&" like '%"&KW&"%' Order by "&OrderSQL
else
  SQLStr="select ID,Title,Picture from Product where "&ZD&" like '%"&KW&"%' Order by "&OrderSQL
end if


Set rs=server.CreateObject("adodb.recordset")


rs.open SQLStr,Conn,1,1
if not rs.eof then
  rs.pagesize=Psize
  RCount=rs.recordcount
  PCount=rs.PageCount
  if Cint(Page)>CInt(PCount) then Page=PCount
  rs.absolutepage=Page
end if
							%>
							<table width="100%" border="0" cellpadding="0" cellspacing="0">
                              <tr>
                                <%
i=0
do while not rs.eof  and i<CInt(PSize)
if i mod 3=0 and i<>0 then Response.Write("<tr>")
i=i+1
%>
                                <td width="25%"><table width="100%" border="0">

                                    <tr>
                                      <td><div align="center"><a href="ProductInfo.asp?ID=<%=rs("ID")%>" target="_blank" title="<%=rs("Title")%>"><img src="Pictures/<%=rs("Picture")%>" alt="<%=rs("Title")%>" width="130" height="130" border="0" class="product_picborder"></a></div></td>
                                    </tr>
                                    <tr>
                                      <td align="center" height="32"><a href="ProductInfo.asp?ID=<%=rs("ID")%>" target="_blank" title="<%=rs("Title")%>"><%=rs("Title")%></a></td>
                                    </tr>
                                </table></td>
                                <%
 rs.movenext
 loop
 rs.close
 set rs=nothing
 %>
                              </tr>
                            </table></TD>
                          </TR></TBODY></TABLE></DIV></TD></TR>
                    <TR>
                      <TD><div title="<BR>">
                        <table cellspacing=1 width='100%' border=0>
                            <tr>
                              <td align=center> 共有检索到产品 <font COLOR=#FF0000><B><%=RCount%></B></font> &nbsp;<a href="?CID1=<%=CID1%>&CID2=<%=CID2%>&KW=<%=KW%>&ZD=<%=ZD%>&OrderSelect=<%=OrderSelect%>&Page=1">首 页</a>&nbsp;<a href="?CID1=<%=CID1%>&CID2=<%=CID2%>&KW=<%=KW%>&ZD=<%=ZD%>&OrderSelect=<%=OrderSelect%>&Page=<%=Page-1%>">上一页</a>&nbsp;<a href="?CID1=<%=CID1%>&CID2=<%=CID2%>&KW=<%=KW%>&ZD=<%=ZD%>&OrderSelect=<%=OrderSelect%>&Page=<%=Page+1%>">下一页</a>&nbsp;<a href="?CID1=<%=CID1%>&CID2=<%=CID2%>&KW=<%=KW%>&ZD=<%=ZD%>&OrderSelect=<%=OrderSelect%>&Page=<%=PCount%>">尾 页</a> &nbsp;页次:<strong><font color=red><%=Page%></font>/<%=PCount%></strong>页&nbsp;                              </td>
                            </tr>
                        </table>
                      </div></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE></TD></TR>
        <TR>
          <TD valign="top">		    <BR></TD>
        </TR>
        </TBODY></TABLE></TD></TR>
  <TR>
    <TD><!--#include file="Bottom.htm" --></TD>
  </TR></TBODY></TABLE><!-- ? x p ?-->

<!-- AceCounter(Pro) Version 5.0 END -->
</BODY></HTML>
<script language="javascript">
  function ChangeOrder()
  {
     var OrderS;
	 OrderS=document.all.OrderSelect.value;
	 window.location.href="Product.asp?CID1=<%=CID1%>&CID2=<%=CID2%>&KW=<%=KW%>&ZD=<%=ZD%>&OrderSelect="+OrderS;
  }
</script>

⌨️ 快捷键说明

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