查人人中国名人网欧陆战争4什么装备好:这个ASP的代码要怎么加入？
来源：百度文库 编辑：查人人中国名人网 时间：2024/05/02 17:48:35
<p align="left">
<%
set rs4=server.createobject("adodb.recordset")
sql="select * from website where classid="&rs3("id")&" and agree='1' order by clicks desc"
rs4.open sql,conn,1,1
if rs4.recordcount=0 then
response.write "游戏暂无分类！"
else
rs4.movefirst
if rs4.recordcount>5 then jj=6 else jj=rs4.recordcount end if
for j=1 to jj
response.write "<a target='_blank' href='link.asp?id="&rs4("id")&"'>"&rs4("name")&"</a> "
rs4.movenext
next
end if
rs4.close
set rs4=nothing
%>
</td>
我要在这原来的单元格里再加入一个表格，每行5个单元格，只需要4行，要怎么写这个代码才能实现？并且一样的读取数据库的内容。
留下QQ或联系方式行吗？
rs4.movefirst
if rs4.recordcount>5 then jj=6 else jj=rs4.recordcount end if
for j=1 to jj
response.write "<a target='_blank' href='link.asp?id="&rs4("id")&"'>"&rs4("name")&"</a> "
rs4.movenext
next
------------------------------------------
改成如下:
－－－－－－－－－－－－－－－－－－－－－－－
%>
<table width=100% border=0 cellingpad=0>
<%
rs4.movefirst
if rs4.recordcount>4 then jj=4 else jj=rs4.recordcount end if
if rs4.recordset->Fields->Count>5 then ii=5 else
ii=rs4.recordset->Fields->Count
for j=1 to jj
%>
<tr>
<%
for i=1 to ii
response.write "<td><a target='_blank' href='link.asp?id="&rs4("id")&"'>"&rs4("name")&"</a> <td> "
next
%>
</tr>
<%
rs4.movenext
next
%>
</table>
--------------------------------
上面可以设定table，td，tr的属性来控制显示效果。
rs4.movefirst
if rs4.recordcount>5 then jj=6 else jj=rs4.recordcount end if
for j=1 to jj
response.write "<a target='_blank' href='link.asp?id="&rs4("id")&"'>"&rs4("name")&"</a> "
rs4.movenext
next
改成,如此简单，何必弄得那么麻烦
for i=1 to 4
if rs.eof then exit for
response.write "<a target='_blank' href='link.asp?id="&rs4("id")&"'>"&rs4("name")&"</a>
rs.movenext
next