<table border=0 cellspacing=0 cellpadding=0 width='100%'>
  <tr align=center>
<%
dim nid,nemoney,pnum,w_num,vvt
  sql="select top 12 id,name,spic,emoney,power,counter from photo where hidden=1 order by id desc"
  set rs=joekoe_cms.exec(sql,1)
  do while not rs.eof
    nid=rs("id")
    topic=rs("name")
    nemoney=rs("emoney")
%>
  <td width='<%response.write pnum%>%'>
    <table border=0 cellspacing=0 cellpadding=0>
    <tr><td align=center><%response.write pic_fk(rs("spic"),4,"photo_view.asp?id="&nid)%></td></tr>

<%if vvt>0 then%>
   
<%if vvt>1 then%>
    <tr><td align=center><%response.write format_emoney_power(nemoney,rs("power"),0)%></td></tr>
<%
    end if
  end if
%>
    </table>
  </td>
<%
    rs.movenext
  loop
  rs.close
%>
  </tr>
  </table>

[ 本帖最后由 冬霜 于 2012-12-29 19:39 编辑 ]

试试下列修改后的代码，将<tr></tr>放在循环中。
<table border=0 cellspacing=0 cellpadding=0 width='100%'>
 <%
dim nid,nemoney,pnum,w_num,vvt
  sql="select top 12 id,name,spic,emoney,power,counter from photo where hidden=1 order by id desc"
  set rs=joekoe_cms.exec(sql,1)
  do while not rs.eof
    nid=rs("id")
    topic=rs("name")
    nemoney=rs("emoney")
%>
<tr align=center>
 <td width='<%response.write pnum%>%'>
    <table border=0 cellspacing=0 cellpadding=0>
    <tr><td align=center><%response.write pic_fk(rs("spic"),4,"photo_view.asp?id="&nid)%></td></tr>

<%if vvt>0 then%>
   
<%if vvt>1 then%>
    <tr><td align=center><%response.write format_emoney_power(nemoney,rs("power"),0)%></td></tr>
<%
    end if
  end if
%>
    </table>
  </td>
  </tr>
<%
    rs.movenext
  loop
  rs.close
%>
  </table>

版主你好，谢谢！
是多行显示了，一行一张罢了，我的想法是一行6张，二行就12张，不知如何改，谢谢

这的版主真负责。

先循环<td>，够6个后加个<tr>，然后再循环<td>呗，多研究一下，总会明白的。