loop virker ikke

Hejsa NG.

Når jeg kører koden virker loop ikke, men det står blot som tekst i browseren:
placering = placering + 1 rs.MoveNext loop %>

Hvad er der galt?

Her er koden:
<%

strConnect = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.Mappath("../../db/data.mdb")
Set objConn = Server.CreateObject ("ADODB.Connection")
objConn.Open strConnect


strSQL = "SELECT TOP 6  * FROM arkiv  ORDER BY id DESC"
Set rs = objConn.Execute(strSQL)

'Udskriv top 6
placering = 1

If Not rs.EOF Then
    overskrift = rs("overskrift")
    tekst = rs("tekst")
    navn = rs("navn")
    kilde = rs("kilde")
    link = rs("link")
    pic = rs("pic")

Else
    Response.Write "<b>Der er noget galt med id'et</b><br><br>"
End If


%>

<div id="boxnews">
<table border="0" width="435" cellspacing="0" cellpadding="0">
 
  <tr>
    <td width="398" colspan="2" class="headline"><font color="#FF9C00">»</font><%=overskrift%></td>
  </tr>
  <tr>
    <td width="337" class="text">
      <table width="100%" height="100%" cellpadding="2">
        <tr>
          <td class="font"><%=tekst%></td>
        </tr>
      </table>
    </td>
    <td width="100" valign="top" class="tom">
      <table border="0" width="100%" cellspacing="0" cellpadding="2">
        <tr>
          <td width="100" height="100" class="pic" align="center" valign="bottom"><img border="0" src="pics/<%=pic%>" width="65" height="80"><br><img src="gfx/nyhedbar.gif"></td>
        </tr>
        <tr>
          <td width="100%" class="info" valign="middle">
            &nbsp;&nbsp;<font color="#FF9C00">»</font> <a href="newscom.asp?id="<%=link%>">Diskuter</a><br>
        &nbsp;&nbsp;<font color="#FF9C00">»</font> <a href="<%=kilde%>">Kilde</a><br>
            &nbsp;&nbsp;<font color="#FF9C00">»</font> <a href="<%=link%>">Læs mere</a><br>
            &nbsp;&nbsp;<font color="#FF9C00">Af:</font> <%=navn%>       
          </td>
        </tr>
      </table><br>
    </td>
  </tr>
</table>
</div>
<br>



  placering = placering + 1
  rs.MoveNext
loop

%>