Carissimi,
ho cercato nel forum, ma nulla che mi possa aiutare a riguardo.
Scorro un recordset con dei bottoni e quando sono all'inizio o alla fine vorrei che non si spostasse e comparisse un msgbox di errore.
Ogni volta che mi sposto aggiorno un picturebox dal db.

Questo è ciò che scrivo:

Private Sub cmdPrecedente_Click()
If dbFilm.Recordset.BOF Then
msgStr = MsgBox("Sei già al primo record!", vbCritical)
Else
dbFilm.Recordset.MovePrevious
str = dbFilm.Recordset.Fields("Locandina")
Picture1 = LoadPicture(str)
End If
End Sub

La stringa in rosso mi da errore.


Ho notato che prima del primo record e dopo l'ultimo c'è un record vuoto e penso sia quello a darmi casini.

Posso fare una cosa del tipo:

If (dbFilm.Recordset.BOF + 1) Then.....
o è una stupidaggine?

Grazie