回 帖 发 新 帖 刷新版面

主题:请教个输出语句!!!

set rq=server.CreateObject("adodb.recordset")
sql="select name from users"
rq.open sql,conn,1,1
q=rq.recordcount
要把结果按每行5个输出,到5个换行。
<%
if rq.eof or rq.bof then
response.Write("no!")
else
e=0
do while not rq.eof 
e=e+1
%>
<%= rq("name")%>
<%
if e%5=0 then
%><br />
<%end if%>
<%
rq.movenext
loop
end if
%>
帮忙改下,谢谢!!!

回复列表 (共3个回复)

沙发

e%5=0
应该是e mod 5=0

板凳

数值没法显示出来

3 楼

<%
set rq=server.CreateObject("adodb.recordset")
sql="select name from users"
rq.open sql,conn,1,1
q=rq.recordcount
要把结果按每行5个输出,到5个换行。
<%
if rq.eof or rq.bof then
response.Write("no!")
else
e=1
do while not rq.eof 
if e mod 5=0 then
 response.write "<br><br>"
end if
 response.write rq("name")&" "
e=e+1
rq.movenext
loop
end if
%>

我来回复

您尚未登录,请登录后再回复。点此登录或注册