<%
Set mypage=new xdownpage
mypage.getconn=conn
page=clng(request("x"))
set rs=server.CreateObject("adodb.recordset")
sql="select * from line order by id asc"
mypage.getsql=sql
mypage.pagesize=36
page=clng(request("x"))
mypage.getsql=sql
mypage.pagesize=36
set rs=mypage.getrs()
if rs.eof then
response.write " 对不起,暂无产品信息!"
else
count=0
do while not rs.eof and count
<%for i=1 to 6
%>