长沙市雨花区康和医院:asp 转换 html程序问题.如何实现每行显示2个标题?

来源:百度文库 编辑:神马品牌网 时间:2024/05/03 08:51:59
While Not Rs.Eof
Result=Result & "<li><a href=""../../" &Rs("FilePath")&""">"&Rs("Title")&"</a>"
Result=Result & " " & "</li>"
Rs.MoveNext
Wend

While Not Rs.Eof
Result=Result & "<li><a href=""../../" &Rs("FilePath")&""">"&Rs("Title")&"</a>"

Rs.MoveNext
if not rs.eof then
Result = Result &" "& "<a href=""../../" &Rs("FilePath")&""">"&Rs("Title")&"</a>"
end if
Result=Result & "" & "</li>"
Rs.MoveNext
Wend

这样应该就对了。

一个循环里面加两次,中间加 Rs.MoveNext ,再判断一下有没有Rs.EOF就可以了