Probleme "Movelast"

Résolu
Messages postés
15
Date d'inscription
mardi 12 avril 2005
Statut
Membre
Dernière intervention
20 septembre 2007
-
Messages postés
15
Date d'inscription
mardi 12 avril 2005
Statut
Membre
Dernière intervention
20 septembre 2007
-
Salut à tous,
Est ce que vous pouvez m'aider à résoudre un problème que j'ai cherché la solution sur internet depuis des jours , mais j'ai rien trouvé, mon probleme est le suivant : - Comment savoir le dernier enregistrement dans une table ?  biensur avec (Movelast) mais comment?????
je vous donne mon code que j'ai utilisé, mais il me donne toujours le même erreur:

Set REC = New ADODB.Recordset
REC.Open "Select * From Pays", Db
If REC.EOF = False Then
REC.MoveLast
T1 = REC.Fields(0)
End If

l'erreur qui m'apparait est :

erreur d'execution -2147217884 (80040e24)



l'ensemble de lignes ne prend pas en charge les récupérations arriére

Et merci à vous tous....

2 réponses

Messages postés
15814
Date d'inscription
jeudi 8 août 2002
Statut
Modérateur
Dernière intervention
4 mars 2013
133
A mon avis, c'est le mode d'ouverture de ton recordset qui ne va pas, essaye avec :
Set REC = New ADODB.Recordset
REC.Open "Select * From Pays", Db , adOpenDynamic, adLockOptimistic
If REC.EOF = False Then
REC.MoveLast
T1 = REC.Fields(0)
End If

Ou encore :

Set REC = New ADODB.Recordset
REC.Open "Select * From Pays", Db , adOpenDynamic, adLockOptimistic
If REC.EOF = False Then
REC.MoveLast
REC.MovePrevious
T1 = REC.Fields(0)
End If
Messages postés
15
Date d'inscription
mardi 12 avril 2005
Statut
Membre
Dernière intervention
20 septembre 2007

Merci
DARKSIDIOUS
(Membre Club)
(Admin CS) votre réponse est bonne;

Toujours les (Membre Club) donnent les bonnes réponses;

Merci encore...