📄 products.asp
字号:
<%@ LANGUAGE = VBScript CodePage = 936 LCID=2052%>
<!--#include file="conn.asp"-->
<%'www.yd631.com
'QQ:121591448
'欢迎与我交流%>
<html>
<head>
<title>YD631_PUT2.0产品发布</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="images/css.css" type="text/css">
</head>
<body bgcolor="#eeeeee" text="#000000" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<center>
<table width="770" border="0" cellpadding="0" cellspacing="1" bgcolor="#D8D8D8" >
<tr valign="top">
<td width="180" align="center" valign="middle" bgcolor="#eeeeee"><font color="red">爬狗，来爬我吧→</font></b><script language=javascript src=http://ivan.pagou.com/ad/329.js></script>
<br><font color="red">爬狗，来爬我吧→</font></b><script language=javascript src=http://ivan.pagou.com/ad/329.js></script></td>
<td><table width="590" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="30" bgcolor="#E1EBDE">
<table width="95%" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td width="59%" align="left" valign="baseline"><form action="products.asp" method=post name="myform">
<font color="#000000"><b><font color="#666666">产品搜索</font>
<input name=keyword type=text id="keyword" size=12 maxlength=50>
<input name=login type=image src="images/search.gif"
width="60" height="22" align="absmiddle">
</form></td>
<td width="41%">
<div align="right"><font color="#666666" face="Arial, Helvetica, sans-serif">网站首页 </font><font color="#666666">></font> <font face="Arial, Helvetica, sans-serif" color="#666666"><a href="products.asp">产品展示</a></font></div> </td>
</tr>
</table>
</td>
</tr>
</table>
<table width="590" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="30"><table width="590" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="40" bgcolor="#eeeeee">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="5"><img src="main/dot.gif" width="1" height="1"></td>
</tr>
</table>
<table width="98%" border="0" cellspacing="1" cellpadding="8" bgcolor="#CCCCCC" align="center">
<tr>
<td align="center" bgcolor="#eeeeee">
<% set rs1=server.CreateObject("adodb.recordset")
sql1="select * from class "
rs1.open sql1,con,1,1
if not rs1.bof and rs1.eof then
else
do until rs1.eof
%><a href="products.asp?Sort_ID=<%=rs1("Sort_ID")%>"><b><%=rs1("sort")%></b></a>|<%rs1.movenext
loop
end if
rs1.close
set rs1=nothing%> </td>
</tr>
</table>
<table width="95%" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td height="40">
<table width="100%" border="0" cellspacing="5" cellpadding="0">
<tr>
<td>
<table border=0 cellpadding=0 cellspacing=0
width="100%">
<!--DWLayoutTable-->
<tbody>
<tr>
<td valign=top>
<%
dim keyword
dim sort_id
keyword=request("keyword")
sort_id=request("sort_id")
if sort_id<>"" then sqlwhere=sqlwhere &" and sort_id="&sort_id&""
if keyword<>"" then sqlwhere=sqlwher &" and shop_name like '%"&keyword&"%'"
Set rs=Server.CreateObject("ADODB.RecordSet")
strsql="select * from Product where shop_id<>0 "&sqlwhere&" order by dateandtime desc"
rs.Open strsql,con,1,1
if rs.eof then
response.write "没有找到你要的产品！<a href='products.asp'>返回</a>"
else
rs.movefirst
if not isempty(request("page")) then
pagecount=cint(request("page"))
else
pagecount=1
end if
rs.pagesize=9
if pagecount>rs.pagecount or pagecount<=0 then
pagecount=1
end if
rs.AbsolutePage=pagecount
%>
<table width="95%" border="0" align="center" cellpadding="0" cellspacing="0" bordercolor="#FF9900">
<%
j=1
do while not (rs.eof or err)
if (j mod 3)=1 then
response.write "<tr>"
end if
%>
<td align="center" valign="top">
<table width="100%" height="125" border="0" align="center" cellpadding="4" cellspacing="0">
<tr>
<td width="150" align="center" valign="middle">
<table width="80" border="0" cellpadding="1" cellspacing="0" bgcolor="#666666">
<tr>
<td>
<table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="eeeeee">
<tr>
<td align="center" valign="middle">
<%If rs("Pic")<>"" then%>
<a href='show.asp?Shop_ID=<%=rs("Shop_ID")%>' target=_blank><img border='0' width='160' height='120' src="Pic/<%=rs("pic")%>" align='center'></a>
<%Else%>
<a href='show.asp?Shop_ID=<%=rs("Shop_ID")%>' target=_blank><img border='0' width='160' height='120' src='Pic/no.jpg' align='center'></a>
<%End If%>
</td>
</tr>
</table>
</td>
</tr>
</table>
<table width="100%" height="22" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td align="center" height="30"><a class=a4 href="show.asp?Shop_id=<%=rs("shop_id")%>" target=_blank><%=left(rs("shop_name"),12)%></a></td>
</tr>
</table>
</td>
<td align="center" valign="middle" bgcolor="#eeeeee"> </td>
</tr>
</table>
</td>
<%
if (j mod 3)=0 then
response.write "</tr>"
end if
j=j+1
rs.moveNext
if j>9 then exit do
loop
end if
%>
</table>
</td>
</tr>
</tbody>
</table>
</td>
</tr>
</table>
<table width="100%" height="38" border="0" cellpadding="0" cellspacing="0">
<tr>
<th scope="row"><table width="95%" height="20" border="0" align="center" cellpadding="0" cellspacing="1">
<tr>
<td height="30" colspan="4" align="center" valign="middle" class="unnamed1">
<div align="right"><b> <font face="Arial, Helvetica, sans-serif">
<%
if rs.pagecount>1 then
response.Write "第"&pagecount&"页/共"&rs.pagecount&"页 "
if pagecount>=2 then
response.write"<a href=?Sort_ID="&sort_id&"&keyword="&keyword&"&page=1>首页</a> "
end if
if pagecount>=2 then
response.write"<a href=?Sort_ID="&sort_id&"&keyword="&keyword&"&page="&(cstr(pagecount)-1)&">上一页</a> "
end if
if pagecount>=10 then
response.write"<a href=?Sort_ID="&sort_id&"&keyword="&keyword&"&page="&(((cstr(pagecount)\10)-1)*10)+1&"><<</a> "
end if
q=(cstr(pagecount)-1)\10
if q<0 then
q=1
end if
p=(q*10)+1
do while p<((q*10)+11)
If p=pagecount Then
Response.Write p&" "
Elseif p<=rs.pagecount then
Response.Write "<a href='?Sort_ID="&sort_id&"&keyword="&keyword&"&page="&p&"'>"& p &"</a> "
End If
p=p+1
loop
A=rs.pagecount
if (A mod 10)=0 then
A=rs.pagecount-1
end if
if pagecount<(A\10)*10 then
response.write"<a href=?Sort_id="&Sort_id&"&keyword="&keyword&"&page="&((((cstr(pagecount)-1)\10)+1)*10)+1&">>></a>"
end if
if pagecount<(A) then
response.write" <a href=?Sort_id="&Sort_id&"&keyword="&keyword&"&page="&(cstr(pagecount)+1)&">下一页</a>"
end if
if pagecount<(A) then
response.write" <a href=?Sort_id="&Sort_id&"&keyword="&keyword&"&page="&rs.pagecount&">尾页</a>"
end if
End If%>
</font></b></div>
</td>
</tr>
</table></th>
</tr>
</table></td>
</tr>
</table>
</td>
</tr>
</table></td>
</tr>
</table>
</td>
</tr>
</table>
<p>技术支持：<a href="http://www.yd631.com">www.yd631.com </a>‖QQ:121591448‖作者：D.JOY</p>
</center>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -