Hjælp til fejl i ASP kode. Udtræk fra database i kolonner

Jeg har noget kode som (i teorien) skulle udskrive nogle data fra en tabel i 3 kolonner.
Men jeg får fejlmeddelelsen "Expected statement" ved "End if". Hvad gør jeg forkert ?

Her er koden:
<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ="& Server.MapPath ("../../../fpdb/Fravaer.mdb")

Conn.Open DSN
strSQL = "Select * From tbl_Fravaer Order by Person ASC"
Set rs = Conn.Execute(strSQL)

response.Write("<table>")

do until rs.eof

response.Write("<tr>")
for i = 1 to 3
response.Write("<td>")
if not rs.eof then rs("Person")
response.Write(rs("Person"))
rs.MoveNext
End if
response.Write("</td>")
next
response.Write("</tr>")
loop
response.Write("</table>")
%>