|
 |
| 尊敬的顾客您好，欢迎您浏览本公司网页，本公司热忱接受您的意见和建议，如果你对本公司的产品有意见或看洷请点击在线留言. |
|
 |
|
|
|
|
|
<%
if request("page")<>""then
page=cint(request("page"))
else
page=1
end if
set rs=server.CreateObject("adodb.recordset")
set rs2=server.CreateObject("adodb.recordset")
sql="select * from pro where(true) "
if trim(request("proname"))<>"" then
sql=sql&"and proname like '%" & Trim(Request("proname"))&"%'"
end if
if request("lx")="/" or request("lx")="" then
sql=sql
else
sql=sql&"and (idd='"&Trim(Request("lx"))&"' or new='"&Trim(request("lx"))&"')"
end if
sql=sql&" order by index"
rs.Open sql,cn,1,4 %>
<%if not rs.EOF then
rs.pagesize=8
rs.absolutepage=page %>
|
<% if request("chanpinname")<>"" then q=1 %>
<%fy2 page,"product.asp?flag=1"&"&",rs %>
|
|
|
<% ' 用循环输出当前页的 10 条数据
a=int(rs.PageSize/2)
For absRecordNum = 1 to a
%>
|
<% if not rs.eof then
sql2="select * from xl where idd='"&rs("idd")&"'"
rs2.Open sql2,cn,1,4
%>
<%
numz=numz+1
rs.movenext
end if %>
|
<% if not rs.eof then
sql2="select * from xl where idd='"&rs("idd")&"'"
rs2.Open sql2,cn,1,4
%>
<%
numz=numz+1
rs.movenext
end if %>
|
|
<%
if rs.eof then exit for
next
%>
<%fy2 page,"product.asp?flag=1"&"&lx="&request("lx")&"&bbb="&request("bbb")&"&proname="&request("proname")&"&classname="&request("classname")&"&choose="&request("choose")&"&choose1="&request("choose1")&"&choose2="&request("choose2")&"&",rs %>
|
|
<% else %>
<% end if %>
|
|
| |
|
