请教asp图片横排

来源:百度知道 编辑:UC知道 时间:2024/09/23 04:10:55
<%
'==读取产品列表
id=Request.QueryString("id")
if id="" then
sql="select * from Zm_Product order by ord asc,id desc"
menuname="产品介绍"
else
sql="select * from Zm_Product where tid="&id&" or tid in (Select id from Zm_Product_type where pid="&id&") order by ord asc,id desc"
sql2="select * from zm_Product_type where id="&id
set rs1=conn.execute(sql2)
if not rs1.eof then
menuname=rs1("name")
else
menuname="没有此分类"
end if
end if

productlist="<ul>"
set rs=server.CreateObject("ADODB.RECORDSET")
rs.open sql,conn,1,1
if not rs.eof then
pages = 6 '定义每页显示的记录数
rs.pageSize = pages '定义每页显示的记录数
allPages = rs.pageCount'计算一共能分多少页
page = Request.QueryString("page")'通过浏览器传递的页数
'if语句属于基本的排错处理
if isEmpty(page

放一个表格循环<td>吧

<%
'==读取产品列表
id=Request.QueryString("id")
if id="" then
sql="select * from Zm_Product order by ord asc,id desc"
menuname="产品介绍"
else
sql="select * from Zm_Product where tid="&id&" or tid in (Select id from Zm_Product_type where pid="&id&") order by ord asc,id desc"
sql2="select * from zm_Product_type where id="&id
set rs1=conn.execute(sql2)
if not rs1.eof then
menuname=rs1("name")
else
menuname="没有此分类"
end if
end if

productlist="<ul>"
set rs=server.CreateObject("ADODB.RECORDSET")
rs.open sql,conn,1,1
if not rs.eof then
pages = 6 '定义每页显示的记录数
rs.pageSize = pages '定义每页显示的记录数
allPages = rs.pageCount'计算一共能分多少页
page = Request.QueryString("page")'通过浏览器传递的页数
'if语句属于