📄 productsseek.asp
字号:
<!--#include file="siteinfo.asp"-->
<HTML>
<HEAD>
<TITLE><%=sitename%></TITLE>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=gb2312">
<link href="images/CSS.css" type=text/css rel=stylesheet>
</HEAD>
<BODY ><!--#include file="top.asp" -->
<table width="778" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="179" valign="top" background="images/BGline01.gif"><!--#include file="Productsleft.asp" --></td>
<td width="598" valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr background="images/BGline04.gif">
<td width="20" height="24" background="images/BGline04.gif"> </td>
<td background="images/BGline04.gif"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><span class="ABOUT_01"><img src="images/GO_03.gif" width="11" height="11" align="absmiddle"> 当前位置：<a href="index.asp">首页</a> > <a href="productsall.asp">产品展厅</a> > 产品检索<%
postadd=trim(request.QueryString("postadd"))
if postadd="yesOk" then
BClass=trim(request.Form("BClass"))
KeyWord=trim(request.Form("KeyWord"))
else
BClass=trim(request.QueryString("BClass2"))
KeyWord=trim(request.QueryString("KeyWord2"))
end if
Response.Write" > 关键字<font color='#ff0000' style='font-family: Arial, Helvetica, sans-serif;' >"&KeyWord&"</font></a>"
if BClass="" then
if KeyWord="" then
sql = "SELECT id,LPattern,LName,LPrice,LPH,LSort,LManufacturer,LAddtime FROM Products where LPutout=true ORDER BY id DESC"
else
sql = "SELECT id,LPattern,LName,LPrice,LPH,LSort,LManufacturer,LAddtime FROM Products where LName like '%"&KeyWord&"%' or LKeyWord like '%"&KeyWord&"%' and LPutout=true ORDER BY id DESC"
end if
else
if KeyWord="" then
sql = "SELECT id,LPattern,LName,LPrice,LPH,LSort,LManufacturer,LAddtime FROM Products where LSort='"&BClass&"' and LPutout=true ORDER BY id DESC"
else
sql = "SELECT id,LPattern,LName,LPrice,LPH,LSort,LManufacturer,LAddtime FROM Products where LSort='"&BClass&"' and LName like '%"&KeyWord&"%' or LKeyWord like '%"&KeyWord&"%' and LPutout=true ORDER BY id DESC"
end if
end if
'=========产品展示样式==================
%>
</span></td>
</tr>
</table></td>
<td width="20" background="images/BGline04.gif"> </td>
</tr>
<tr>
<td> </td>
<td> </td>
<td> </td>
</tr>
<tr>
<td width="20" height="20"> </td>
<td><TABLE id=AutoNumber6 style="BORDER-COLLAPSE: collapse" cellSpacing=0 cellPadding=0 width=100%
border=0>
<TBODY>
<TR>
<td width="100%" align="center">
<%
StyleDD=Request.cookies("ProStyle")
select case StyleDD
%>
<% case "StyleA" %>
<!--#include file="Style/StyleA.asp"-->
<% case "StyleB" %>
<!--#include file="Style/StyleB.asp"-->
<% case "StyleC" %>
<!--#include file="Style/StyleC.asp"-->
<% case else %>
<!--#include file="Style/StyleC.asp"-->
<% end select %>
<%
'=========产品展示样式==============
Response.Write"<table width='100%' border='0' cellspacing='0' cellpadding='1' ><tr ><td height='18' background='images/BGline03.gif'></td></tr><tr><td height='18'align='center' >共有"&irecordcount&"个产品 每页显示"&ProductsShu&"个 当前页" &ipagecurrent& "/"&ipagecount&""
if ipagecurrent=1 then
Response.Write" 首页 | "
else
Response.Write" <a href='ProductsSeek.asp?page=1&BClass2="&BClass&"&KeyWord2="&KeyWord&"'>首页</a> | </a>"
end if
if ipagecurrent=1 then
Response.Write"上一页 | "
else
Response.Write"<a href='ProductsSeek.asp?page="&ipagecurrent-1&"&BClass2="&BClass&"&KeyWord2="&KeyWord&"'>上一页</a> | "
end if
if ipagecount>ipagecurrent then
Response.Write" <a href='ProductsSeek.asp?page="&ipagecurrent+1&"&BClass2="&BClass&"&KeyWord2="&KeyWord&"'>下一页</a> "
else
Response.Write" 下一页 "
end if
if ipagecount>ipagecurrent then
Response.Write"| <a href='ProductsSeek.asp?page="&ipagecount&"&BClass2="&BClass&"&KeyWord2="&KeyWord&"'>未页</a> "
else
Response.Write"| 未页"
end if
%>
转到第
<select name="sel_page" onChange="javascript:location=this.options[this.selectedIndex].value;">
<%
for i = 1 to ipagecount
if i = ipagecurrent then%>
<option value="2WANNOProductsSeek.asp?page=<%=i%>&BClass2=<%=BClass%>&KeyWord2=<%=KeyWord%>" selected><%=i%></option>
<%else%>
<option value="ProductsSeek.asp?page=<%=i%>&BClass2=<%=BClass%>&KeyWord2=<%=KeyWord%>"><%=i%></option>
<%
end if
next
%>
</select>
页 </td>
</tr>
</table></td>
<td width="20"> </td>
</tr>
<tr>
<td width="20" height="40"> </td>
<td> </td>
<td width="20"> </td>
</tr>
</table>
<TABLE id=AutoNumber6 style="BORDER-COLLAPSE: collapse" cellSpacing=0 cellPadding=0 width=100%
border=0>
<TBODY>
<TR></tr>
</table></td>
<td width="1" valign="top" background="images/BGline02.gif"></td>
</tr>
</table>
</TD>
</TR>
</TABLE>
<!--#include file="bot.asp" -->
</BODY>
</HTML>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -