Ungefär såhär i grova drag...
objRS.Open [i]strSql, strConnection[/i]
intCell = 1
Response.Write "<table><tr>"
While Not objRS.EOF
Response.Write "<td><img src="" & objRS("[i]sökväg[/i]") & ""></td>"
objRS.MoveNext
If intCell Mod 3 = 0 And Not objRS.EOF Then
Response.Write "</tr><tr>"
intCell = 1
Else
intCell = intCell + 1
End If
Wend
Response.Write "</tr></table>"
