分类: ASP |
这段代码的作用是实现将查询所得的内容分为两列显示,每列显示8条。不过我没看很懂,感觉有点儿问题,很明显最后一段的do-loop循环中缺少了i变量的变化控制,并且缺少了一个</td>结束标签,估计是作者在copy代码时疏忽所致。
前面部分就不写了,从定义sql查询语句,建立记录集开始。
<%sqltext="select top 16 id,name from danwei where enable=1
or pid=4 or flag=1 order by pl desc"
rs.Open sqltext,cn,1,1
i=1
%>
rs.Open sqltext,cn,1,1
i=1
%>
<tr>
<td class="font2" valign="top" height="27">
<%do while not rs.EOF and i<10 %>
<a href="<%=linkclientdetail%>?id=<%=rs("id")%>" class=nav2><%=checktitle(trim(rs("name")),11)%></a><br>
<%rs.MoveNext
i=i+1
loop%>
<td class="font2" valign="top" height="27">
<%do while not rs.EOF and i<10 %>
<a href="<%=linkclientdetail%>?id=<%=rs("id")%>" class=nav2><%=checktitle(trim(rs("name")),11)%></a><br>
<%rs.MoveNext
i=i+1
loop%>
</td>
<td class="font2" valign="top" height="27">
<%do while not rs.EOF and i<17 %>
<a href="<%=linkclientdetail%>?id=<%=rs("id")%>" class=nav2><%=checktitle(trim(rs("name")),11)%></a><br>
<%rs.MoveNext
loop
rs.Close %>
文章引用自:http://www.tsov.net/trackback.asp?tbID=382