ThomasCo
Messages postés15Date d'inscriptionmardi 12 avril 2005StatutMembreDernière intervention20 septembre 2007
-
8 août 2006 à 16:18
ThomasCo
Messages postés15Date d'inscriptionmardi 12 avril 2005StatutMembreDernière intervention20 septembre 2007
-
9 août 2006 à 11:25
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
cs_DARKSIDIOUS
Messages postés15814Date d'inscriptionjeudi 8 août 2002StatutMembreDernière intervention 4 mars 2013130 8 août 2006 à 16:36
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