神马品牌网黑道皇帝 高清 下载:ASP输出列问题???高手请帮忙
来源：百度文库 编辑：神马品牌网 时间：2024/05/04 10:30:19
if youname.eof and youname.bof then
mm_line_commend = "● 该小类还没有推荐新闻"
else
dim rc
rc = 0
do while not youname.eof
rc= rc + 1
if rc < 10 then
mm_line_commend = mm_line_commend&"● <a href=""../"&(youname.Fields.Item("file_name").Value)&chr(34)&" target="&chr(34)&"_blank"&chr(34)&">"&(youname.Fields.Item("productname").Value)&"
"
end if
youname.movenext
loop
end if
%>
请问怎么改才行输出三列
如
新闻标题 新闻标题 新闻标题
新闻标题 新闻标题 新闻标题
新闻标题 新闻标题 新闻标题
可只能是输出10行,我要输出3列的///
如:
新闻标题 新闻标题 新闻标题
新闻标题 新闻标题 新闻标题
新闻标题 新闻标题 新闻标题
mm_line_commend = mm_line_commend&"● <a href=""../"&(youname.Fields.Item("file_name").Value)&chr(34)&" target="&chr(34)&"_blank"&chr(34)&">"&(youname.Fields.Item("productname").Value)&"
"
改成
mm_line_commend = mm_line_commend&"● <a href=""../"&(youname.Fields.Item("file_name").Value)&chr(34)&" target="&chr(34)&"_blank"&chr(34)&">"&(youname.Fields.Item("productname").Value)&"<br>
"
i=1
do while not ...
if i mod 3<>0 then
response.write("输出的内容 ")
else
response.write("输出的内容 <br>")
end if
..movenext
i=i+1
loop
<%
if youname.eof and youname.bof then
mm_line_commend = \"● 该小类还没有推荐新闻\"
else
Dim rc :rc = 0
Dim col:col = 0
Do While not youname.eof AND rc < 10
mm_line_commend = mm_line_commend&\"<td>● <a href=\"\"../\"&(youname.Fields.Item(\"file_name\").Value)&chr(34)&\" target=\"&chr(34)&\"_blank\"&chr(34)&\">\"&(youname.Fields.Item(\"productname\").Value)&\"</a></td>\"
rc= rc + 1
col= col + 1
if col=3 then
mm_line_commend=\"<tr>\" & mm_line_commend & \"</tr>\"
col=0
end if
youname.movenext
loop
end if
mm_line_commend=\"<table>\" & mm_line_commend & \"</table>\"
%>