Question

_ 高分 _帮我修改一段ASP代码,每行显示4个然后换行!

每行显示4个然后换行!

我怎么改都不行.

希望程序高手帮我一下:

先看代码:

<%
dim j
Set rs5 = Server.CreateObject("ADODB.Recordset")
sql="select top 15 * from photo order by id desc"
rs5.open sql,conn,1,1
if not rs5.eof and not rs5.bof then
rs5.pagesize =15
%>

<%for j=1 to (rs5.pagesize\1)%>

<table width="600" border="0" cellpadding="0" cellspacing="1" bgcolor="#efebde" style="BORDER: #ded7bd 1px solid;">
<tr>
<td ><div align="center" >
<a href=display.asp?id=<%=rs5("id")%>&classid=<%=rs5("classid")%> target="_blank"><img src=admin\<%=rs5("small")%> height="90" border="0" alt="?óè?ê±??:<%=rs5("time")%>" ></a></div></td>
</tr>
<tr>
<td bgcolor="#ffffff"><p align="center"><%=rs5("title")%></p></td>

</tr> <%
if j mod 3=0 then response.write "</tr><tr>"
rs5.movenext
if rs5.eof then
exit for
end if
next
%></table>
<%
rs5.close
set rs5=nothing
%>
<%end if%>

我再怎么改都是一行只显示一个,然后就换行到下一行.

我要改成每行显示4个图片,每个图片下都有个注释: <%=rs5("title")%>

谢谢高手,

解答的80分呈上.
回一楼:
我这段代码不算复杂庞大.
我应该能看的清楚的.
一个表格里边有1列2行.
把这2行想要变成三列.
帮我把成品的代码写一下吧,
拜托了.

回二楼:

你给的还是稍微有点不打对..,.
在最后还会提示:

ADODB.Field 错误 '80020009'

BOF 或 EOF 中有一个是“真”，或者当前的记录已被删除，所需的操作要求一个当前的记录。

/pic/news.asp，行 0

这个错误让我感觉好好渺茫....

Answer 1

<% '再修改1次
dim j
j=0
Set rs5 = Server.CreateObject("ADODB.Recordset")
sql="select top 15 * from photo order by id desc"
rs5.open sql,conn,1,1
if not rs5.eof and not rs5.bof then
rs5.pagesize =15
%>

<table width="600" border="0" cellpadding="0" cellspacing="1" bgcolor="#efebde" style="BORDER: #ded7bd 1px solid;">

<tr>
<% while not rs5.bof
j=j+1
%>
<td >
<div align="center" >
<a href=display.asp?id=<%=rs5("id")%>&classid=<%=rs5("classid")%> target="_blank">
<img src=admin\<%=rs5("small")%> height="90" border="0" alt="<%=rs5("time")%>" >
</a>
<br>
<%=rs5("title")%></div></td>
<%
if j mod 3=0 then response.Write("</tr><tr>") end if
rs5.movenext
wend
%>
</tr>
</table>
<%
rs5.close
set rs5=nothing
%>
<%end if%>

Answer 2

ASP 平台我这里没有..不过给你个实现的思想吧...

首先拿到记录集,然后外边一个大循环..循环里输出
<tr>
在tr之间在放一个小循环.循环4次.每次循环将记录指针下移,这里输你上边写的哪个td里的内容
</tr>

这样就可以了....呵呵...