OVH Cloud OVH Cloud

Position de mon enregistrement

1 réponse
Avatar
Jacques \(Be\)
Bonjour,

Comment se positionner sur le dernier enregistrement que l'on a fait

Dans un premier temps

J'ouvre la BD et j'ajoute un enregistrement


With rsTrans
.AddNew
.Fields("date") = Date
.Fields("rec_deb") = OctetsRecuDeb
.Fields("exp_deb") = OctetsExpDeb
.Update
End With

c'est le seul enregistrement qu'il y aura

avant de fermer l'application, je veux mettre l'enregistrement à jour

With rsTrans
.Edit
.Fields("rec_fin") = OctetsRecuFin
.Fields("exp_fin") = OctetsExpFin
.Update
End With

mais j'ai un message me disant "Aucun enregistrement en cours.

Suffit-il de faire rsTrans.movelast pour me positionner sur l'enregistrement
que j'ai fait un peu plus tôt ?

Merci de vos réponses


Jacques

1 réponse

Avatar
Josselin JOUANNET
Bonjour Jacques,
Si pour ton problème tu utilise un recordset ADO,
Tu peut te déplacer par movefirst, movelast, movenext,....
Tu peut aussi connaitre le nombre d'enregistrements dans ton recordset avec
"Monrecordset.recordcount".
Tu peut rafraichir ton composant Ado avec "refresh" aprés ton update, je
pense que ton problème vient de la .
Enfin tu peut parametrer finement ton recordset (statique/dynamique,Forward
only, etc...
----------------------------
Cordialement
Joss


"Jacques (Be)" a écrit :

Bonjour,

Comment se positionner sur le dernier enregistrement que l'on a fait

Dans un premier temps

J'ouvre la BD et j'ajoute un enregistrement


With rsTrans
.AddNew
.Fields("date") = Date
.Fields("rec_deb") = OctetsRecuDeb
.Fields("exp_deb") = OctetsExpDeb
.Update
End With

c'est le seul enregistrement qu'il y aura

avant de fermer l'application, je veux mettre l'enregistrement à jour

With rsTrans
.Edit
.Fields("rec_fin") = OctetsRecuFin
.Fields("exp_fin") = OctetsExpFin
.Update
End With

mais j'ai un message me disant "Aucun enregistrement en cours.

Suffit-il de faire rsTrans.movelast pour me positionner sur l'enregistrement
que j'ai fait un peu plus tôt ?

Merci de vos réponses


Jacques