asp图片自动排列问题

来源:百度知道 编辑:UC知道 时间:2024/06/21 03:57:34
现在是一行一个图片,每页12个。右边显示标题和简介。如何改写代码变成一行4个图片,每页5行。图片下面为标题,不要简介了。代码如下:
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<%
if mid1="" then
sql="select id,fnam,nam,cont from photos where bid="&bid&" order by tim desc"
else
sql="select id,fnam,nam,cont from photos where bid="&bid&" and mid="&mid1&" order by tim desc"
end if
rs.open sql,conn,1,1
if rs.eof then
%>
<tr>
<td height="60" align="center">暂无...</td>
</tr>
<tr>
<%
else
const ipp=12
rs.pagesize=ipp
page=checkstr(request("page"))
if page="" then
page=1

您好!
这样可以吗?

<table width="580" height="99" border="0" cellpadding="0" cellspacing="0">
<tr>
<%
sql="select * from cp where xx='0' order by id desc"
set M=server.createobject("adodb.recordset")
M.open sql,conn,1,1

mypage=request("whichpage")
if mypage="" then
mypage=1
else
mypage=cint(mypage)
end if
mypagesize=request("pagesize")
if mypagesize="" then
mypagesize=20
end if
M.movefirst
M.pagesize=mypagesize
maxcount=cint(M.pagecount)
M.absolutepage=mypage
how=1
y=M.pagecount
d=M.recordcount
%>
<%
a=a+1
do while not M.eof and how <=M.pagesize
%>
<td><table width="135" height="190" border="0" align="center" cell