Ciao ragazzi.
Vorrei creare un menù a tendina che pesca i valori in una tabella.
Ho fatto questo:

codice:
<html>
<form name="form1" method="post" action="">
<% SET Connessione= Server.CreateObject("ADODB.Connection")
   Connessione.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mapPath("\rubrica\rubrica.mdb")
   sql="SELECT * FROM Citta "
   rsCitta=Connessione.Execute(sql)
   %>
   
    <%Do Until rsCitta.Eof %>
  <select name="ElencoCitta" >
    <option value="<%rsCitta.Fields("Id Citta")%>"><%rsCitta.Fields("Citta")%></option>
	<% rsCitta.MoveNext
	    Loop 
		rsCitta.Close
		%>
  </select>
</form>


</html>
solo che mi genera il seguente errore:

Tipo di errore:
Errore di run-time di Microsoft VBScript (0x800A01B6)
Proprietà o metodo non supportati dall'oggetto: 'Eof'
/rubrica/selectdinamico.asp, line 9

Come posso sistemarlo?
Grazie!