显示数据 - 编程论坛

#2

finaly2007-12-08 17:23

i=i+1
  if i mod 2 = 0 then response.write("</tr><tr>")
  rs.movenext
      loop
      rs.close
      set rs=nothing

#3

linyesu2007-12-08 17:26

下是我一行显示４列的，你改一下

sql="select  * from cp_货物信息 where cp_hwxx_类型='" & cenpin & "' order by cp_hwxx_编号"
set rs=conn.execute(sql)%><table>
<% i=0
j=0
do while not rs.eof %>
<tr>
<%
do while not rs.eof and i<4
%>

    <td><a href ="gftest.asp?zhao=<%=rs("cp_hwxx_系统编号")%>"><font color="#FFFFFF"><%=rs("cp_hwxx_品名")%></font></a></td>


<%
j=j+1
i=i+1
if i=4 then
i=0
response.write "<tr><td></td></tr>"
end if
rs.movenext
loop%>
</tr>
<%loop

%></table>
<%rs.close %>

#4

finaly2007-12-08 17:28

先谢过喽
for j=1 to rows ' 循环行

  for i=1 to cel ' 循环列
    if rs_Product.eof then exit for '
  rs_Product.MoveNext ' 移动到下一条数据
    if i=rs_Product.bof then exit for '如果数据输出完毕退出循环 i ,如果有很多数据的话,对数据输出的性能将会变的很不理想,郁闷中
    next
    if j=rows then exit for ' 退出行循环
next