BOF per due cicli while annidati

[eng]

Ciao a tutti, ho due cicli while annidati.
Quello piu' interno serve per creare lo stesso menu a tendina, tramite una select,
per ogni item del primo ciclo.
Per crearlo accedo allo sempre allo stesso recordset, ma, una volta teminata la costuzione di un menu, per il successivo, devo riposizionare il "puntatore" sul primo elemento del recordset.
é la prima volta (sono un neofita) che ho questa esigenza e non penso (mi da l'errore " Necessario oggetto: 'False'") che la sintassi adottata per riposizionare il "puntatore" sul primo elemento del recordset (riga marcata con <<<<<<<) sia corretta...

mi sapete indicare dove sbaglio ?
grazie
EnG

<%      Dim SQL_author_name
      SQL_author_name = "SELECT * FROM bookauthor, author " &_
      "WHERE ([bookauthor].[id_book]="& rec("id_book") &_
      ") AND ([bookauthor].[id_author]=[author].[id_author]) " &_
      "ORDER BY [author].[surname]" 

       Dim rec_author_name
      Set rec_author_name = Server.CreateObject("ADODB.Recordset")
      Set rec_author_name = Conn.Execute(SQL_author_name)%>
      

      <%WHILE Not rec.EOF%>
      <SELECT name="_selected">
      <OPTION value="<%=rec("id_author")%>" SELECTED> <%=rec("surname")%>, <%=rec("name")%>
      <% 
      rec_author_name=rec_author_name.BOF '<<<<<<<<<<<<<<<<<<
          WHILE Not rec_author_name.EOF%>
          <OPTION value="<%=rec_author_name("id_author")%>"> <%=rec_author_name("surname")%>, <%=rec_author_name("surname")%>
          <%rec_author_name.MoveNext
          WEND%>      
      <%rec.MoveNext%>
    </SELECT>

      
<%      WEND
      rec.close
%>