LOOP og ELSE tinh

Hejsa,

jeg sidder og er ved at lave en side, som på baggrund af indhold i min database opstiller stillingen i SAS-ligaen i fodbold...

men jeg har lidt små problemer...

min kode er som følger...

<%
DIM CONNECT, ANTAL
SET CONNECT = SERVER.CREATEOBJECT("ADODB.CONNECTION")
CONNECT.OPEN "DRIVER={Microsoft ACCESS DRIVER (*.MDB)}; DBQ=" & Server.MapPath ("../../Database/tabellen.mdb")
%>
<table width=253 cellspacing=0 border=0 cellpadding=0>
<tr>
<td colspan='8' bgcolor="#CCCCFF"><IMG height=1 src='pics/bgdot.gif' width=1><br></td>
</tr>
<tr>
<td colspan='7' class='overskrift'>STILLINGEN I SAS LIGAEN</td>
<td class='genvej'><!----</td><A href='stats/stats0203/liga_stillingen.asp'><IMG border=0 src='pics/pil.gif'></A>-----></td>
</tr>
<tr>
<td colspan='8' bgcolor="#CCCCFF"><IMG height=1 src='pics/bgdot.gif' width=1><br></td>
</tr>
<tr>
<td colspan='8'><IMG height=2 src='pics/bgdot.gif' width=1><br></td>
</tr>
<tr>
<td width='23' valign='bottom'><IMG height=5 src='pics/nr.gif' vspace=1 width=12></td>
<td width='85' height='8' valign='bottom'><IMG height=5 src='pics/hold.gif' vspace=1 width=26></td>
<td width='23' align='center' height='8' valign='bottom'><IMG height=5 src='pics/kmp.gif' vspace=1 width=20></td>
<td width='23' align='right' height='8' valign='bottom'><IMG height=5 src='pics/v.gif' vspace=1 width=6></td>
<td width='23' align='right' height='8' valign='bottom'><IMG height=5 src='pics/u.gif' vspace=1 width=6></td>
<td width='23' align='right' height='8' valign='bottom'><IMG height=5 src='pics/t.gif' vspace=1 width=6></td>
<td width='50' align='center' height='8' valign='bottom'><IMG height=5 src='pics/score.gif' vspace=1 width=30></td>
<td width='23' align='right' height='8' valign='bottom'><IMG height=5 src='pics/pnt.gif' vspace=1 width=19></td>
</tr>
<tr>
<td width='253' colspan='8' height='1' bgcolor='#CC0033'><IMG height=1 src='pics/bgdot.gif' width=1><br></td>
<%
SET OnTabel = CONNECT.EXECUTE (_
"SELECT * FROM Tabel order by Placering ASC")
%>
<!-- Sætter løkken op til at køre -->
<%
DO UNTIL OnTabel.EOF %>

<% VB = OnTabel("VBhighlight") %>

<% if VB = "YES" then %>
<tr>
<td class='11pxRight-VB'><%=OnTabel("Placering")%><IMG height=1 src='pics/bgdot.gif' width=3></td>
<td class='11px-VB'><%=OnTabel("Hold")%></td>
<td class='11pxRight-VB'><%=OnTabel("Kampe")%></td>
<td class='11pxRight-VB'><%=OnTabel("Vundne")%></td>
<td class='11pxRight-VB'><%=OnTabel("Uafgjorte")%></td>
<td class='11pxRight-VB'><%=OnTabel("Tabte")%></td>
<td class='11pxCenter-VB'><%=OnTabel("Score")%></td>
<td class='11pxRight-VB'><%=OnTabel("Point")%></td>
</tr>

<% else %>
<tr>
<td class='11pxRight'><%=OnTabel("Placering")%><IMG height=1 src='pics/bgdot.gif' width=3></td>
<td class='11px'><%=OnTabel("Hold")%></td>
<td class='11pxRight'><%=OnTabel("Kampe")%></td>
<td class='11pxRight'><%=OnTabel("Vundne")%></td>
<td class='11pxRight'><%=OnTabel("Uafgjorte")%></td>
<td class='11pxRight'><%=OnTabel("Tabte")%></td>
<td class='11pxCenter'><%=OnTabel("Score")%></td>
<td class='11pxRight'><%=OnTabel("Point")%></td>
</tr>
<!-- Her sættes løkken til at køre igen, hvis dette er nødvendigt -->
<% OnTabel.MOVENEXT
LOOP %>
<%
OnTabel.close
connect.close
set OnTabel=nothing
set connect=nothing
%>

</table>

Jeg udtrækker mine data fra en access-database, som er opbygget som følger:

Databasenavn: tabellen
Tabelnavn: tabel
Feltnavne:
ID - autonumber
Placering - text
Hold - text
Kampe - text
Vundne - text
Uafgjorte - text
Tabte - text
Score - text
Point - text
VBHighlight - text

når jeg kører min side får jeg flg. fejlmelding:
Microsoft VBScript compilation error '800a040e'

'loop' without 'do'

/forside_stilling.asp, line 67

LOOP
^

men som jeg ser det har jeg da et "DO" længere oppe

i denne linie:
<%
DO UNTIL OnTabel.EOF %>

og mit loop sættes jo op til at køre her:
<% OnTabel.MOVENEXT
LOOP %>

så jeg kan ikke helt gennemskue den del...

den anden del, som måske er lidt "optimistisk" er min If - then - else sætning...

må blankt indrømme at jeg så godt som aldrig har arbejdet med if-sætninger og asp - så jeg skal, muligvis, have lidt vejledning på det punkt også...

håber at der sidder en eller flere derude, som har lyst til at hjælpe mig med at komme videre :-)