新手，问一个循环问题，马上给分，时间不等人。。

[yaccor]

我从数据库里读取数据，想让他一行显示3个，这样循环下去，怎么写啊？？
例如：
aaaaa bbbbb ccccc
ddddd eeeee fffff
......
.....
....
这样显示出来，怎么写啊

[孟子E章]

http://ms.mblogger.cn/net_lover/posts/8089.aspx

[tigerwen01]

<table width="170" border="0" cellspacing="0" cellpadding="0">
<%
...
do while not rs.eof
%>
<tr>
<td><%=rs("字段")%></td>
<%
if not rs.eof then
rs.movenext
%>
<td><%=rs("字段")%></td>
<%
end if
if not rs.eof then
rs.movenext
%>
<td><%=rs("字段")%></td>
<%end if%>
</tr>
<%
if not rs.eof then
rs.movenext
end if
loop
rs.close:set rs=nothing
%>
</table>
当然要取3的倍数，即select top 9 * from tablename

[cpp2017]

dim str dim i i = 1 do while not rs.eof if i Mod 3 = 1 then str = str & "<TR>" end if str = str & "<TD>" & rs("字段").value &"</TD>" if iMod 3 = 0 str = str &"</TR>" i = i +1 re.movenext if mod 3 = 1 then str = str &"<TD colspan='2'> </td></tr>" else if i mod 3 = 2 then str = str &"<TD> </td></tr>" end if

[cpp2017]

还没完 Response.Write("<TABLE>"+res+"</TABLE>")

[cpp2017]

dim str dim i i = 1 do while not rs.eof if i Mod 3 = 1 then str = str & "<TR>" end if str = str & "<TD>" & rs("字段").value &"</TD>" if iMod 3 = 0 then str = str &"</TR>" end if i = i +1 re.movenext if mod 3 = 1 then str = str &"<TD colspan='2'> </td></tr>" else if i mod 3 = 2 then str = str &"<TD> </td></tr>" end if Response.Write("<TABLE>"& res& "</TABLE>")

[lovebaby]

最简单的，嵌套两层循环。
<table>
<%
For i = 1 To 3
If Rs.Eof Then Exit For
%>
<tr>
<%
For q = 1 To 3
If Rs.Eof Then Exit For
%>
<td><%=Rs("字段名")%></td>
<%
rs.MoveNext
next
%>
%>
</tr>
<%next%>
</table>

[plought]

<%
Dim myarstr,ii,jj,dovar
myarstr(0)
myarstr(1)
myarstr(2)
myarstr(3)
myarstr(4)
myarstr(5)
'.......
dovar=0
%>
<TABLE>
<%FOR ii=1 to (UBound(myarstr)+1)/3%>
<TR>
<%for jj=1 to 3%>
<TD><%=myarstr(dovar)%></TD>
<%
dovar=dovar+1
next
%>
</TR>
<%NEXT%>
</TABLE>

[plought]

<%
Dim myarstr,ii,jj,dovar
myarstr(0)="aaaaa"
myarstr(1)="bbbbb"
myarstr(2)="ccccc"
myarstr(3)="ddddd"
myarstr(4)="eeeee"
myarstr(5)="fffff"
'.......
dovar=0
%>
<TABLE>
<%FOR ii=1 to (UBound(myarstr)+1)/3%>
<TR>
<%for jj=1 to 3%>
<TD><%=myarstr(dovar)%></TD>
<%
dovar=dovar+1
next
%>
</TR>
<%NEXT%>
</TABLE>

[yalan]

残酷同意cpp2017(幕白兄) 哥们的做法，我都是用这种方法写的
这种写法有个好处，就是可以自由的控制每行的列数
cpp2017(幕白兄) 写的是 mod 3，意思是每行3列
如果你写成mod 4就成了每行4列了
非常灵活
建议搂主选用呵呵

[yaccor]

感谢大家的支持，结帖