Det var ett exempel på webforum för inte så länge sedan om detta. Det kan ungefär se ut så här (någon annan hinner kanske före, men sk):
<%
x = 1 as integer
%>
<table><tr><td>
<%
Do Until RecSet.EOF
x = x + 1
If x = 3 Then
x = 0
Response.Write "</td></tr><tr><td>"
End If
%>
<=%RecSet("ettan")%>
<%
RecSet.MoveNext
Loop
' Stäng RecSet och Kopplingen
%>
</td></tr></table>
... kan behövas lite justeringar eftersom jag inte testat det. Sedan ska du nog plocka bort så många avgränsare som möjligt... bara jag som är lat! ;)
:)