Question

asp分两列显示

下面是代码，试了好久，搞不定，求助各位大虾怎么修改代码？
目前的显示效果是：
1
2，
3，
4，
……
15
我想要的效果是：
1
2，3
4，5
6，7
……
14，15，
补充一下，对于这些言语，我什么都不懂，希望能给出修改后正确的代码，谢谢！
<table>
<tr>
<td><table>
<%
dim h_sql,h_rs
h_sql="select top 15 * from web_news where nClass=62 order by id desc"
set h_rs=server.CreateObject("adodb.recordset")
h_rs.open h_sql,conn,3,2
num_=1
do while not h_rs.eof and num_=1
%>
<tr>
<td><%=h_rs("ntitle")%></td>
</tr>
<tr>
<td><div>
<%response.Write(left(h_rs("nHtmlText"),90))%></div></td>
</tr>
<%
h_rs.movenext
num_=num_+1
loop
%>
</table></td>
</tr>
<tr>
<td><table>
<tr>
<td>
<div>
<%do while not h_rs.eof and num_<=15%>
</div>
<table>
<tr>
<td><div"><%=left(trim(h_rs("nTitle")),15)%></div></td>
</tr>
</table>
<div>
<%
h_rs.movenext
num_=num_+1
loop
%>
</div></td>
</tr>
</table></td>
</tr>
</table>

Answer 1

现在已经不流行 if i mod 2 = 0 then 这样写法了，直接用DIV+CSS轻松搞定。
首先要用到
如两列：
<div style="width:120px; ">
<ul>
<%do while not rs.eof%>
<li style="float:left;width:60px;list-style:none;"><%=rs("字段")%></li> ----- 这里宽度width:60px 是div宽度的2分之1

<%
rs.movenext
loop
rs.close
set rs = nothing
%>
</ul>
</div>
如三列：
<div style="width:120px; ">
<ul>
<%do while not rs.eof%>
<li style="float:left;width:40px;list-style:none;"><%=rs("字段")%></li> ----- 这里宽度width:40px 是div宽度的3分之1
<%
rs.movenext
loop
rs.close
set rs = nothing
%>
</ul>
</div>

--------------利用DIV标签宽度来排列。

Answer 2

很难吗？ 可以先用response.writeline 方法输出1
然后用for循环输出，2~15，不是挺好的吗，
可以让for循环的步长值为2，然后每一个步骤中都输出两个数，加一个回车，
搞定了吧