标题: [求助]对高手很简单的问题~~ [打印本页] 作者: ㄣ紸縡のoァ 时间: 2010-1-18 00:24 标题: [求助]对高手很简单的问题~~ <table align="center" border="0" width="100%" cellspacing="0" cellpadding="0">
<%
dim rs,sql,topbest
sql="select * from pic WHERE tuijian = true order by hits desc"
Set rs= Server.CreateObject("ADODB.Recordset")
rs.open sql,conn,1,1
topbest=1
if rs.eof and rs.bof then
response.write "<p align='center'>没有任何图片</p>"
else
i=0
do while not rs.eof or rs.bof
if not rs.eof then
%>
<tr>
<td align="center"><a href="list.asp?id=<%=rs("id")%>"> <img src="<%=rs("pic")%>" width="120" height="130" border="0"></a><br><%=rs("name")%></td>
<% rs.movenext%>
<td align="center"><a href="list.asp?id=<%=rs("id")%>"> <img src="<%=rs("pic")%>" width="120" height="130" border="0"></a><br><%=rs("name")%></td>
</tr>
<%rs.movenext
end if
topbest=topbest+2
if rs.eof or topbest>8 then
exit do
end if
loop
rs.close
set rs=nothing
end if%>
</table>
上面的代码怎么让他4X2排列了
如：
---------------------------------------------作者: 芯頽廢.。﹖ 时间: 2010-1-18 00:24
简单。作者: 逊一 时间: 2010-1-18 00:24
晕~~那怎么改啊~~我老改不来啊~~
上面的代码是2X4
我想4X2就是2行4张图片~~不知道怎么改`~帮忙下啊作者: 让爱留在心底 时间: 2010-1-18 00:24
以下是引用xing599666在2005-5-17 21:49:46的发言： <table align="center" border="0" width="100%" cellspacing="0" cellpadding="0"> <% dim rs,sql,topbest sql="select * from pic WHERE tuijian = true order by hits desc" Set rs= Server.CreateObject("ADODB.Recordset") rs.open sql,conn,1,1 topbest=1 if rs.eof and rs.bof then response.write "<p align='center'>没有任何图片</p>" else i=0 do while not rs.eof or rs.bof if not rs.eof then %> <tr> <td align="center"><a href="list.asp?id=<%=rs("id")%>"> <img src="<%=rs("pic")%>" width="120" height="130" border="0"></a><br><%=rs("name")%></td> <% rs.movenext%> <td align="center"><a href="list.asp?id=<%=rs("id")%>"> <img src="<%=rs("pic")%>" width="120" height="130" border="0"></a><br><%=rs("name")%></td> <% rs.movenext%> <td align="center"><a href="list.asp?id=<%=rs("id")%>"> <img src="<%=rs("pic")%>" width="120" height="130" border="0"></a><br><%=rs("name")%></td> <% rs.movenext%> <td align="center"><a href="list.asp?id=<%=rs("id")%>"> <img src="<%=rs("pic")%>" width="120" height="130" border="0"></a><br><%=rs("name")%></td> </tr> <%rs.movenext end if topbest=topbest+4 if rs.eof or topbest>8 then exit do end if loop rs.close set rs=nothing end if%> </table> 上面的代码怎么让他4X2排列了如： ---------------------------------------------
如果我做我就做一个判断控制不过这样应该能够实现你要的结果作者: 龙龙 时间: 2010-1-18 00:24
谢谢~~这个我知道~~我就是想让代码少一点
我想用这样但这样不成功
<table>
<%
for i=1 to 4
if rs.eof then exit for
%>
<tr>
<%
for i=1 to 2
%>
<td><img ......></img></td>
<%
rs.movenext
if rs.eof then exit for
next
%>
</tr>
<%
next
%>
</table>作者: 陪你疯→想你 时间: 2010-1-18 00:24
等等我做做试试作者: 僞o碬侎〾 时间: 2010-1-18 00:25
郁闷，有现成的你不找，看看是不是这种效果？？？？？ http://www31.websamba.com/linuxcfan/ 如果是的话，你就下载一下我的原代码，一看就明白了作者: 依然范特西 时间: 2010-1-18 00:25
以下是引用xing599666在2005-5-18 9:26:29的发言： 谢谢~~这个我知道~~我就是想让代码少一点 我想用这样但这样不成功 <table> <% for i=1 to 4 if rs.eof then exit for %> <tr> <% for i=1 to 2 %> <td><img ......></img></td> <% rs.movenext if rs.eof then exit for next %> </tr> <% next %> </table>
这样不还是2*4吗，把2和4换过来。还有把里头那个循环的i换成ii作者: 枫之泪-天涯 时间: 2010-1-18 00:25
看这里的帖子 http://bbs.bc-cn.net/bbs/dispbbs.asp?boardID=10&ID=18562&page=1