回 帖 发 新 帖 刷新版面

主题:帮忙修改一下,感谢

如何定义一下,让如下代码每隔5行下方出现一条分割线。如下效果:

·333333333
·444444444
·555555555
................
·333333333
·444444444
·555555555
..................



<%
sql="select top 15 id,title from News where  lm='85' order by id desc"   
Set rs2= Server.CreateObject("ADODB.RecordSet")
rs2.Open sql,conn,1,1
if rs2.eof then
response.write"暂无信息"
else
do while not rs2.eof
%>
                  <table width="95%" border="0" align="center" cellpadding="2" cellspacing="0">
                    <TBODY>
                      <TR> 
                        <TD width="100%" height="25"> ·<a href=view.asp?newsid=<%=rs2("id")%> target="_blank" > 
                          <%=left(rs2("title"),24)%> 
                          </a> </TD>
                      </TR>
                    </TBODY>
                  </TABLE>
                  <%
rs2.movenext
loop
end if
rs2.close
set rs2=nothing
%>


十分感谢,帮忙修改一下

回复列表 (共4个回复)

沙发

这个也不难啊,循环前加个记数变量,每次循环后加1,然后判断每逢5的倍数的时候加条线。

板凳

能给改一下吗,贴全了吧,谢谢

3 楼

i = 1 
do while not rs2.eof
   .....
   if i mod 5 = 0 then
      '加条虚线代码
   end if
   i = i + 1
loop

4 楼

谢谢,你太棒啦~~  俺是菜鸟,见笑了

我来回复

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