Originariamente inviato da Rossella_75
Cosi non va..


codice:
If Data.Recordset.EOF Then
    MsgBox "sono arrivata alla fine"
End If
Data.Recordset.MoveNext
autore = (Data.Recordset.Fields("autore"))
descrizione = (Data.Recordset.Fields("descrizione"))
url = (Data.Recordset.Fields("url"))
Flsmovie.SetVariable "autore", autore
Flsmovie.SetVariable "descrizione", descrizione
Flsmovie.SetVariable "url", url
certo che non va... anche dopo aver controllato se sei alla fine tu continui le istruzioni che seguono. devi uscire dalla sub o dal ciclo in cui ti trovi...
quindi, ammesso che tu sia in una sub dovrai scrivere:
codice:
If Data.Recordset.EOF Then
    MsgBox "sono arrivata alla fine"
    exit sub
End If
...