ASP里关于调用问题。50分求助。

来源:百度知道 编辑:UC知道 时间:2024/06/27 03:56:43
现在有这样一个问题,网站内的友情链接功能,一行8个,显示2行,
数据库里有五条友情链接的记录,那么我想实现,显示这五条记录外,另11条显示为“申请链接”,请问这样的话代码如何写??用FOR?还是??
以下是我调用的代码,最好按我的代码帮忙写下。

<%set rs = conn.execute("select top 16 bt,url,img from links where lx=1 order by id desc")
if not rs.eof then
i=1
do while not rs.eof%>

<td align="center"><a href="<%=rs("url")%>" target="_blank" title="<%=rs("bt")%>"><img src=<%=rs("img")%> widht="88" height="31" border="0" ></a></td>

<%
if i mod 8 = 0 then
Response.Write("</tr><tr><td height=10></td></tr>")
end if
rs.movenext
i=i+1
loop
end if
rs.close
set rs=nothing%>

在线等您来回答,如果回答正确,马上送分,谢谢。

我这个用的是For,怎么样
<%set rs = conn.execute("select top 16 bt,url,img from links where lx=1 order by id desc")
if not rs.eof then

%>
<div>
<%
for i=1 to 16
if not rs.eof then %>
<a href="<%=rs("url")%>" target="_blank" title="<%=rs("bt")%>"><img src=<%=rs("img")%> widht="88" height="31" border="0" ></a>
<%
rs.movenext
else
%>
<a href="" target="_blank" title="申请链接"><img src="图片地址" widht="88" height="31" border="0" ></a>
<% end if

if i = 8 then
Response.Write("</br>")
end if
next
%>
</div>
<%
rs.close
set rs=nothing%>

这个简单哦,先占个位置,一会空了再来解答.

顺简单优化一下:

<tabl