<% Set = rs …………………… '循环前提省略 Response.Write("<table width=""100%"" border=""1"" align=""center"" cellpadding=""4"" cellspacing=""4"">") Response.Write("<tr><td valign=""top"" width=""50%"">") i=1 Do While not rs.eof Response.Write("输出内容") if i mod 2 = 0 then Response.Write("</td></tr><tr><td>") else Response.Write"</td><td>" end if rs.MoveNext i = i + 1 Loop Response.write"</td></tr>" Response.Write("</table>") %>
