asp补表格的Td？

来源：百度知道 编辑：UC知道 时间：2024/06/08 08:23:18
程序循环输出，最后有1个或2个，3个不等的空位，想让程序自动判断缺多少个Td，并补上，程序该怎么写？

<%
i=0:j=20:n=6 '每行n列
response.write "<table>"
do while j>0
i=i+1
if i=1 then response.write "<tr>"
response.write "<td>"&i&"</td>"
if i=n then
i=0
response.write "</tr>"
end if
j=j-1
loop
if i<n then
for j=i+1 to n
response.write "<td>空</td>"
next
response.write "</tr>"
end if
response.write "</table>"
%>

<%
do while not objrs.eof //objrs为记录集名
response.write("<tr><td >"&objrs("你的字段名")&"</td></tr>")
objrs.movenext
loop
objrs.close
%>