Response.Write "<table>"
n = 0
Do Until RS.EOF
If n MOD 2 = 0 Then
Response.Write "<tr><td>" & RS("produkten") & "</td>"
Else
Response.Write "<td>" & RS("produkten") & "</td></tr>"
End If
n = n + 1
RS.MoveNext
Loop
If (n-1) MOD 2 = 0 Then
Response.Write "<td></td></tr>"
End If
Response.Write "</table>
Eller något liknande borde väll fungera om jag har förstått dig rätt.
