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

📄 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>Product <%=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"),1)%>"; 
	          
			  menuName="<%=China_EngLish_Title(rs("Title"),1)%>"; 
					
			  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"),1)%>"; 
					
						  subMenuName="<%=China_EngLish_Title(rs1("Title"),1)%>"; 
							
					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>Index &gt;&gt; Product &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">Product search:   
                                  <input name="KW" id="KW" maxlength="20" />
                                  <select name="CID1" id="CID1">
                                    <option value="">all sort</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"),1)%></option>
									<%
									rs.movenext
									loop
									rs.close
									set rs=nothing
									%>
                                  </select>
                                  
                                  <select name="ZD" id="ZD">
                                    <option value="EnTitle" selected="selected">Product Title</option>
                                    <option value="EnContent">Product 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>
                        <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

if ZD="" then ZD="EnTitle"

if CID1<>"" then 
  SQLStr="select ID,EnTitle as Title,Picture from Product where ClassID1="&CID1&" and "&ZD&" like '%"&KW&"%' Order by UpdateTime desc"
elseif CID2<>"" then
  SQLStr="select ID,EnTitle as Title,Picture from Product where ClassID2="&CID2&" and "&ZD&" like '%"&KW&"%' Order by UpdateTime desc"
else
  SQLStr="select ID,EnTitle as Title,Picture from Product where "&ZD&" like '%"&KW&"%' Order by UpdateTime desc"
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> Product <font COLOR=#FF0000><B><%=RCount%></B></font> &nbsp;<a href="?CID1=<%=CID1%>&CID2=<%=CID2%>&KW=<%=KW%>&ZD=<%=ZD%>&Page=1">First</a>&nbsp;<a href="?CID1=<%=CID1%>&CID2=<%=CID2%>&KW=<%=KW%>&ZD=<%=ZD%>&Page=<%=Page-1%>">Page Up</a>&nbsp;<a href="?CID1=<%=CID1%>&CID2=<%=CID2%>&KW=<%=KW%>&ZD=<%=ZD%>&Page=<%=Page+1%>">Page Down</a>&nbsp;<a href="?CID1=<%=CID1%>&CID2=<%=CID2%>&KW=<%=KW%>&ZD=<%=ZD%>&Page=<%=PCount%>">Last</a> &nbsp;Page:<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 + -