📄 product.asp
字号:
<tr>
<td class="zhengwen"><table width="90%" border="0" align="center" cellpadding="0" cellspacing="0">
<%'----------------------------
PERPAGE =6
set rs=server.CreateObject("adodb.recordset")
if Key<>"" and CateID<>"" then '如果关键和产品类别都有的同时，筛选产品集
sql="select * from tProduct where StateFlag=0 and (CateID="&CateID&" or Title like '%"&Key&"%' or Content like '"&Content&"') order by AddTime desc"
else if Key<>"" then '如果只是关键的时
sql="select * from tProduct where StateFlag=0 and (Title like '%"&Key&"%' or Content like '"&Content&"') order by AddTime desc"
else if CateID="-1" then '推荐产品
sql="select * from tProduct where IsHot=1 and StateFlag=0 order by AddTime desc"
else if CateID="-2" then '库存产品
sql="select * from tProduct where IsHot=2 and StateFlag=0 order by AddTime desc"
else if CateID="0" then
sql="select * from tProduct where StateFlag=0 order by AddTime desc"
else
sql="select * from tProduct where CateID="&CateID&" and StateFlag=0 order by AddTime desc"
end if
end if
end if
end if
end if
rs.open sql,conn,1,1
if not(rs.eof and rs.bof) then
rs.pagesize = PERPAGE
if isempty(PageNo) or cstr(PageNo)<"1" then PageNo = 1
CurPage=PageNo
if int(PageNo)>=int(rs.pagecount) then CurPage=cint(rs.pagecount)
rs.absolutepage = CurPage
for i = 1 to rs.pagesize
%>
<tr>
<td><table width="100%" border="0" cellspacing="3" cellpadding="0">
<tr>
<td width="36%" rowspan="5" align="center"><a href="javascript:newWindow('/Product/ShowProduct.asp?ID=<%=rs("ID")%>','culture','713','583','')"> </a>
<table width="90%" border="0" cellspacing="0" cellpadding="0">
<tr align="left">
<td colspan="3"><img src="Images/1.jpg" width="183" height="18"></td>
</tr>
<tr>
<td width="13%" align="left"><img src="Images/2.jpg" width="24" height="97"></td>
<td width="65%"><table width="80%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><a href="javascript:newWindow('/Product/ShowProduct.asp?ID=<%=rs("ID")%>','culture','713','583','')"><img <%if trim(rs("ProductPic"))="" or isnull(rs("ProductPic")) then response.write "src=/UploadFile/default.gif" else response.write "src=/UploadFile/ProductFile/"&rs("ProductPic")&" width='100'"%> border="0"></a></td>
</tr>
</table></td>
<td width="22%" align="left"><img src="Images/4.jpg" width="40" height="97"></td>
</tr>
<tr align="left">
<td colspan="3"><img src="Images/5.jpg" width="183" height="28"></td>
</tr>
</table></td>
<td width="14%" height="20" align="right"><font color="#000000"> 产品名称： </font></td>
<td width="50%"><%=rs("Title")%></td>
</tr>
<tr>
<td height="20" align="right"><font color="#000000">产品类别：</font></td>
<td>
<% set rs1=conn.execute("select * from tProductCate where ID="&rs("CateID"))
response.write rs1("Title")
%></td>
</tr>
<tr>
<td height="20" align="right"><font color="#000000">发布时间：</font></td>
<td><%=formatdatetime(rs("AddTime"),1)%></td>
</tr>
<tr>
<td height="20" align="right"><font color="#000000">下载资料：</font></td>
<td>
<% if rs("OtherFile")<>"" then
if session("LoginID")="" then
response.write "[<a href='/Member/MemberLogin.asp'>请登录下载</a>]"
else
response.write "<a href='/UploadFile/ProductFile/"&rs("OtherFile")&"' target='_blank'>点击下载</a>"
end if
else
response.write "暂无资料"
end if
%>
</td>
</tr>
<tr>
<td> </td>
<td align="right"><a href="javascript:newWindow('/Product/ShowProduct.asp?ID=<%=rs("ID")%>','culture','713','583','')"><img src="images/arrow_7.gif" width="75" height="18" border="0"></a> </td>
</tr>
<tr>
<td height="1" colspan="3" align="center" bgcolor="#cccccc"></td>
</tr>
</table></td>
</tr>
<% rs.movenext
if rs.eof then
i = i + 1
exit for
end if
next %>
<tr>
<td><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td colspan="2"> </td>
</tr>
<tr>
<td><font color="#000000">页次：<b><%=CurPage%></b>/<b><%=rs.pagecount %></b>页 共<b><%=rs.recordcount %></b>条记录</font></td>
<td align="right">
<%
if CurPage = 1 then
response.write " 首页 | 上一页 | "
else
response.write "<a href='?PageNo=1&Key="&Key&"&CateID="&CateID&"&CateName="&CateName&"'><b> 首页 </b></a> | <a href='?PageNo="&CurPage-1&"&Key="&Key&"&CateID="&CateID&"&CateName="&CateName&"'><b>上一页</b></a>| "
end if
if CurPage = rs.pagecount then
response.write "后一页 | 尾页 "
else
response.write "<a href='?PageNo="&CurPage+1&"&Key="&Key&"&CateID="&CateID&"&CateName="&CateName&"'><b>后一页</b> </a>| <a href='?PageNo="&rs.pagecount&"&Key="&Key&"&CateID="&CateID&"&CateName="&CateName&"'><b>尾页</b> </a>"
end if
%>
跳转到：
<select name="menu1" onChange="MM_jumpMenu('parent',this,0)">
<% for i=1 to rs.pagecount
if cstr(CurPage)=cstr(i) then
response.write "<option value='?PageNo="&i&"&Key="&Key&"&CateID="&CateID&"&CateName="&CateName&"' selected>第"&i&"页</option>"
else
response.write "<option value='?PageNo="&i&"&Key="&Key&"&CateID="&CateID&"&CateName="&CateName&"'>第"&i&"页</option>"
end if
next
%>
</select>
</td>
</tr>
</table></td>
</tr>
<%else%>
<tr>
<td align="center" colspan=5 height="296"><font color="ff0000"><b>暂时没有该系列产品!</b></font></td>
</tr>
<% end if %>
</table></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
</table></td>
<td width="25" valign="bottom" background="../images/about_6.jpg">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="262" background="../images/about_6.jpg"><IMG SRC="../images/about_6.jpg" WIDTH=24 HEIGHT=52 ALT=""></td>
</tr>
<tr>
<td height="459" valign="bottom"><img src="../images/about_8.jpg" width=24 height=337 alt=""></td>
</tr>
</table></td>
</tr>
</table>
<!--#include file="../include/bottom.asp"-->
</body>
</html>
<map name="Map1111111111111" id="Map1111111111111">
<area shape="rect" coords="18,62,71,116" href="../News/News.asp">
<area shape="rect" coords="18,125,72,184" href="../aboutus/Cultrue.asp">
<area shape="rect" coords="20,203,73,258" href="../product/Feedback.asp">
<area shape="rect" coords="18,272,77,327" href="../Distribution/Distribution.asp">
<area shape="rect" coords="14,334,81,359" href="../english/main.asp" target="_blank">
</map>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -