注册 登录
编程论坛 ASP技术论坛

高手一看就能解决

kevinxu0638 发布于 2010-11-22 17:35, 388 次点击
大虾们看看代码我想实现的效果是每行显示三个值 但是远行后是这样的
只有本站会员才能查看附件,请 登录
第一个行是两个其他的都对 我知道这个问题是不是很难但我就实现不了帮帮嘛

[ 本帖最后由 kevinxu0638 于 2010-11-22 17:36 编辑 ]
5 回复
#2
kevinxu06382010-11-22 17:36
怎么回事代码贴了怎么不显示

<%
      Dim db6,rs6,strSql6
    Set db6=Server.CreateObject("ADODB.Connection")
    db6.Open "Dsn=background"                           
    Set rs6=Server.CreateObject("ADODB.Recordset")
    strsql6="select  *  from lh  "
    rs6.Open strSql6,db6,1
dim   i,j
i=1      
j=1        
do   while   (not   rs6.eof)   and  j <=3
  if   (i   mod   3)=0   then   
      response.write   " <br> "
      j=j+1
  end   if %>
 <%=rs6("sj_name")%>&nbsp; <%
rs6.movenext
i=i+1
loop
%>
#3
gupiao1752010-11-22 17:55
<%
    Dim db6,rs6,strSql6
    Set db6=Server.CreateObject("ADODB.Connection")
    db6.Open "Dsn=background"                           
    Set rs6=Server.CreateObject("ADODB.Recordset")
    strsql6="select  *  from lh  "
    rs6.Open strSql6,db6,1
   dim  j
   j=1            
   do   while  not   rs6.eof
   response.write rs6("sj_name")&"  "
    if   (j  mod   3)=0   then   
      response.write   " <br/> "
      j=j+1
  end   if
  rs6.movenext
 loop
%>
这样试试。其他部分不变。
#4
kevinxu06382010-11-23 09:21
回复 3楼 gupiao175
不行 结果在一行显示了 今天用其他的方法试了可以了
#5
hams2010-11-23 12:03
if   i=3  then   
      response.write   " <br/> "
      i=0
  end   if
#6
jansonwang2010-11-25 11:02
num=0
do while not rs.eof
    num=num+1
    response.write rs("sj_name")
    if num=3
    response.write "<br>"
    else
    response.write "    "
    end if
rs.movenext
loop
1