do while not rs.eof问题

答案:1 悬赏:0 手机版

解决时间 2021-04-25 16:31

提问者网友：饥饿走向夜
2021-04-25 13:11

下面代码是显示小于8行为一列，现在我想显示为二列都为8行的，该如何改一下！！

<%
Set rs_news=Server.CreateObject("Adodb.Recordset")
rs_news.open "select top 8 * from all_news where s_id=7 order by sendtime desc",conn,1,3
'i=1
do while not rs_news.eof and i<=8
      if len(rs_news("title")) > 10 then   '判断字符串的长度
        ttt= left(rs_news("title"),29)&" ..."
      else
         ttt= rs_news("title")
     end if
%>
    <li> <a href="news_c.asp?id=<%=rs_news("id")%>" title="<%=rs_news("title")%>"><%=rs_news("title")%></li>
<%
i=i+1
rs_news.movenext
loop
%>

最佳答案

五星知识达人网友：孤独的牧羊人
2021-04-25 13:38

这样试试，<ul>的css自己定义：

<%
Set rs_news=Server.CreateObject("Adodb.Recordset")
rs_news.open "select top 16 * from all_news where s_id=7 order by sendtime desc",conn,1,3
dim i
i=0
response.write "<ul style='float:left'>"
do while not rs_news.eof and i<16
    i=i+1
    if len(rs_news("title")) > 10 then   '判断字符串的长度
    ttt= left(rs_news("title"),9)&" ..."
    else
    ttt= rs_news("title")
    end if
%>
    <li><a href="news_c.asp?id=<%=rs_news("id")%>" title="<%=rs_news("title")%>"><%=ttt%></a></li>
<%
if i=8 then response.write "</ul><ul style='float:left'>"
rs_news.movenext
loop
response.write "</ul>"
%>

我要举报

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息