查看: 63|回复: 2

[求助]怎么实现双排显示

[复制链接]

DJ爱有多痛DJ

电梯直达

1^#

发表于 2010-1-15 06:56:03 | 只看该作者回帖奖励

|倒序浏览 |阅读模式

显示双排应该怎么改，各位兄台帮我看看。原码如下：
<%set rs = conn.execute("select top 5 id,mc,rq from vod where lbid="&lb("lbid")&" order by id desc")
do while not rs.eof
Response.Write("<tr><td height=22> <img src=image/dot.gif align=absmiddle> <a href=xiangxi.asp?id="&rs("id")&">"&rs("mc")&"</a>  [<font color=#ff6600>"&rs("rq")&"</font>]</td></tr>")
rs.movenext
loop
rs.close
set rs=nothing%></table></td>
</tr></table>
</td>
<%if i mod 2 = 0 then%>
</tr>
<%end if
lb.movenext
i=i+1
loop
lb.close
set lb=nothing%>
附件: 只有本站会员才能下载或查看附件，请您登录或注册

收藏0

使用道具举报

风忠人

2^#

发表于 2010-1-15 06:56:07 | 只看该作者

set rs=server.CreateObject("adodb.recordset")
rs.open "select name,dep,mbo,baoyuan from mbo where nian="&nian&" and yue="&yue&" order by id",conn,3,3for i=1 to  10name1=Trim(request("name1"&i)) dep=Trim(request("dep"&i)) mbo=Trim(request("mbo"&i))baoyuan=Trim(request("baoyuan"&i))rs("name")=name1rs("dep")=dep rs("baoyuan")=baoyuanrs("mbo")=mbors.updatenextrs.closeset rs=nothing

<%set rs = conn.execute("select top 5 id,mc,rq from vod where lbid="&lb("lbid")&" order by id desc")
do while not rs.eof
for j= 0 to 1
Response.Write("<tr><td height=22>&nbsp;<img src=image/dot.gif align=absmiddle>&nbsp;<a href=xiangxi.asp?id="&rs("id")&">"&rs("mc")&"</a>&nbsp;&nbsp;[<font color=#ff6600>"&rs("rq")&"</font>]</td></tr>")
               <%
   Rs.movenext
   IF RS.EOF=TRUE THEN EXIT for
next

rs.close
set rs=nothing%></table></td>
            </tr></table>
      </td>
      <%if i mod 2 = 0 then%>
      </tr>
<%end if
lb.movenext
i=i+1
loop
lb.close
set lb=nothing%>
试试这段。

回复支持反对

使用道具举报

返回列表

		自动登录	找回密码
密码			注册