2011-11-29 74 views
0

我能夠從表中的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 
%> 
+0

你可以只使用換行符。看起來不像任何記錄會包裝。按照下面所述製作專欄,但將每條記錄放在一個單獨的td中 –

回答

3
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