[ASP] errore banale while dentro un while

[eng]

ciao a tutti e buona pasquetta

il server mi rileva un errore (Previsto 'Wend')
proprio alla penultima riga del codice, conn l'istruzione rec.wend

Mi riuscite a spiegare che errore commetto ? Si vede che sono talmente fuso da non riuscire a vederlo...
grazie
ciao

While Not rec.EOF%>
    <tr>
      <td bgcolor="#CED8DF" align="center">    <font size="1" face="Verdana">
      While Not rec_author_name.EOF%>
          <%=rec("[author].[surname]")%> <%=rec("[author].[name]")%>

      <%rec_author_name.MoveNext
      rec_author_name.Wend
      rec_author_name.close%>
      </font></td>
      
      <td bgcolor="#F9F9F9"><font size="1" face="Verdana"><%=rec("[book].[title]")%></font></td>
      
      <td bgcolor="#F9F9F9"><font size="1" face="Verdana"><%=rec("[editor].[editor]")%></font></td>
      
      <% IF ((Right(rec("[_date].[_date]"),2) <> "00") AND (Right(rec("[_date].[_date]"),2) <> "0")) THEN%>
      <%=Right(rec("[_date].[_date]"),2)%>/<% END IF %>
      
      <%=Right(Left(rec("[_date].[_date]"),6),2)%>/<%=Left(rec("[_date].[_date]"),4)%></font></td>
      
      <td bgcolor="#F9F9F9"  ><font size="1" face="Verdana"><%=rec("[city].[_city]")%></font></td>
      
      <td bgcolor="#F9F9F9"  ><font size="1" face="Verdana"><%=rec("[_type].[_type]")%></font></td>
      
      <td bgcolor="#F9F9F9"  ><font size="1" face="Verdana"><%=rec("[note].[_note]")%></font></td>
    </tr>
  <% rec.MoveNext
rec.Wend
rec.close%>