asp表格换行问题,麻烦可否帮我改一下,我想表格内容两列输出,谢谢哈

来源:百度知道 编辑:UC知道 时间:2024/06/06 20:47:38
<%
dim Nclasslie,sql,classlie,classid,id
Set Nclasslie =Server.CreateObject("ADODB.Recordset")
sql="select * from FOX_class1"
Set classlie = Server.CreateObject("ADODB.Recordset")
classlie.open sql,conn,1,1
if not classlie.eof then
do while not classlie.eof
classid=classlie("id")%>
<tr>
<td width="42%"> <TABLE width="300" border=0 cellpadding="0" cellSpacing=1 style="border-collapse: collapse">
<TBODY>
<TR>
<TD height="24"> <table width="100%" border="0" cellpadding="0" cellspacing="0" id="table63">
<tr>
<td vAlign=&

<%
dim Nclasslie,sql,classlie,classid,id
Set Nclasslie =Server.CreateObject("ADODB.Recordset")
sql="select * from FOX_class1"
Set classlie = Server.CreateObject("ADODB.Recordset")
classlie.open sql,conn,1,1
if not classlie.eof then
dim flagX:flagX=1
do while not classlie.eof
classid=classlie("id")
flagX=flagX+1
if flagX mod 2 = 1 then response.write("<tr>")
%>
<td width="42%"> <TABLE width="300" border=0 cellpadding="0" cellSpacing=1 style="border-collapse: collapse">
<TBODY>
<TR>
<TD height="24"> <table width="100%" border="0" cellpadding="0" cellspacing="0" id="table63">
<tr>
<td vAlign="bottom"> <img src="images/d2.gif" width="5" heigh