UC知道求高手把这个ASP列显示图片代码改为横向输出图片 比如5行3列
来源：百度知道 编辑：UC知道 时间：2024/05/29 14:38:07
<%
dim rs
dim sql
msg_per_page = 5 set rs = server.createobject("adodb.recordset")
fenlei=Request.QueryString("f")
sql ="select * from [work] order by id desc"
rs.cursorlocation = 3 rs.pagesize = msg_per_page
rs.open sql,conn,0,1
if err.number<>0 then response.write "数据库操作失败：" & err.description
err.clear
else
if not (rs.eof and rs.bof) then totalrec = RS.RecordCount if rs.recordcount mod msg_per_pa
dim rs
dim sql
msg_per_page = 5 set rs = server.createobject("adodb.recordset")
fenlei=Request.QueryString("f")
sql ="select * from [work] order by id desc"
rs.cursorlocation = 3 rs.pagesize = msg_per_page
rs.open sql,conn,0,1
if err.number<>0 then response.write "数据库操作失败：" & err.description
err.clear
else
if not (rs.eof and rs.bof) then totalrec = RS.RecordCount if rs.recordcount mod msg_per_pa
你拿下面这个测下 每排5个的 有问题再补充
<%
dim rs
dim sql
msg_per_page = 5 set rs = server.createobject("adodb.recordset")
fenlei=Request.QueryString("f")
sql ="select * from [work] order by id desc"
rs.cursorlocation = 3 rs.pagesize = msg_per_page
rs.open sql,conn,0,1
if err.number<>0 then response.write "数据库操作失败：" & err.description
err.clear
else
if not (rs.eof and rs.bof) then totalrec = RS.RecordCount if rs.recordcount mod msg_per_page = 0 then n = rs.recordcount\msg_per_page else
n = rs.recordcount\msg_per_page+1
end if
currentpage = request("page")
If currentpage <> "" then
currentpage = cint(currentpage)
if currentpage < 1 then
currentpage = 1
end if
if err.number <> 0 then
err.clear
currentpage = 1
end if
else
currentpage = 1
End if