Question

asp每行显示4个标题然后换行怎么做

asp每行显示4个标题然后换行怎么做

Answer 1

<table><tr>
<%
'在你建立数据库记录集后
p=1
while not rs.eof
title=rs("标题字段")
%>
<td><%=title%></td>
<%
if p mod 4 = 0 then '第4条记录后结束并换行
%>
</tr><tr>
<%
end if
p=p+1
rs.movenext
wend
rs.close
%>

Answer 2

'模一下就行了

Dim i
For i=0 To UBound(titles)
If i Mod 4=0
Response.Write titles(i)&"<br />"
Else
Resonse.Write titles(i) &" "
End If
Next

Answer 3

楼上的都回答了，，我就说下原理吧。
定义一个字符，
给它符值1
做单元格<td>循环，
判断定义字符的值，
如果到了4就打印</tr>来结束前面的<tr>
如果用mod 4 =0来判断就不用清空值。。
如果是用 if i=4 then response.write"</tr>" i=1这样再加一次。。。