J'ai déjà ouvert un sujet (et résolu) pour ce titre mais le problème est différent. J'ai parcouru le Net (y compris bien sûr CCM) mais je n'ai pas trouvé de raison à mon problème.
Mon code est le suivant :
Private Sub Form_Load()
Set db = OpenDatabase(App.Path & "\JAM.mdb")
Set tb_auteurs = db.OpenRecordset("auteurs")
' pour tests
Set tb = db.OpenRecordset("mots")
tb.AbsolutePosition = 1740
MsgBox tb("mots")
Exit Sub
On ne peut pas plus simple. Mais sur le ligne TB.AbsolutePosition, j'ai le message suivant :
Pouvez-vous me dire pourquoi cette commande ne fonctionne pas ?
PS : l'enreg n° 1740 existe bien (il y a 8.000 enreg dans la base).
Merci pour les liens. Le premier ne m'apporte rien. Par contre, le deuxième spécifie : "Crée ton RecordSet sur la base de tes éléments préalablement triés sur les arguments qui te conviennent. ". J'ai donc codé mon OpenRecordSet comme suit :
Set tb = db.OpenRecordset("SELECT * FROM mots ORDER BY 'Absoluteposition'")
Et là, plus d'erreur ! Tordu ce truc, mais bon, ça fonctionne.
Merci VB95. Toujours de bon conseil, comme d'hab !