从SQL Server数据库显示记录到ASP Classic表中

我能够从表中的SQL Server数据库中显示我的记录。而现在，我正试图将它们放置在3列& 2列表中。这意味着如果总共有两条记录，它们应该并排出现，而不是一个接一个地出现。我可以使用下面的代码重复记录。从SQL Server数据库显示记录到ASP Classic表中

<% 
Sub B00_DisplayRecords() 
Do while not registerRS.eof 
counter=counter+1 
if counter=41 then 
counter=0 
counter=counter+1 
end if 
%> 

<tr>  
    <th width="50" font class="tblhdr" style="width:400px;"><%=registerRS.Fields("SchoolId")%> - <%=registerRS.Fields("Organization")%></td> 
    <th width="50" font class="tblhdr" style="width:400px;"><%=registerRS.Fields("SchoolId")%> - <%=registerRS.Fields("Organization")%></td> 
</tr>  
<tr> 
    <td width="50" font class="pgcont" valing=left style="width:400px;" align="left">ProductId: <%=registerRS.Fields("ProductId")%></td> 
    <td width="50" font class="pgcont" valing=left style="width:400px;" align="left">ProductId: <%=registerRS.Fields("ProductId")%></td> 
</tr> 
<tr> 
    <td width="50" font class="pgcont" valing=left style="width:400px;" align="left">Qty: <%=registerRS.Fields("Qty")%></td> 
    <td width="50" font class="pgcont" valing=left style="width:400px;" align="left">Qty: <%=registerRS.Fields("Qty")%></td> 
</tr> 
<tr> 
    <td width="50" font class="pgcont" valing=left style="width:400px;" align="left">Class: <%=registerRS.Fields("class")%></td> 
    <td width="50" font class="pgcont" valing=left style="width:400px;" align="left">Class: <%=registerRS.Fields("class")%></td> 
</tr>   

<% 
registerRS.movenext 
loop 
registerRS.close 
set registerRS=nothing 
End sub 
%>

来源

2011-11-29 JohnDoe4136

你可以只使用换行符。看起来不像任何记录会包装。按照下面所述制作专栏，但将每条记录放在一个单独的td中 –

Do until rs.eof 

    r = r + 1 

    If r = 1 then 
     Response.write "<tr>" 
    End if 

    ' data display 

    If r = 3 then 
     Response.write "</tr>" 
    End if 

    If r = 3 then r = 1 

Rs.movenext 
Loop 

If r = 2 ' write extra td and end tr 
If r = 1 ' write 2 td and end tr

来源

2011-11-29 04:13:48

从SQL Server数据库显示记录到ASP Classic表中

回答

相关问题