bonjour Enzobob, MichelXld, le forum,
D'abord, merci Enzobob, mais le problème ne vient pas de la boucle mais du fait que le recordcount reste à -1.
MichelXLD, j'ai été voir ton lien et après une matinée a essayer tout, dans tous les sens, je n'y arrive pas ! :unsure:
j'ai essayé :
Dim Cnx As Connection, requete As String, resultat As Recordset
requete = 'SELECT * FROM table WHERE incidence='1''
Set Cnx = CreateObject('ADODB.Connection')
Cnx.ConnectionString = 'table;'
With Cnx
.ActiveConnection = Cnx
.Open requete, , adOpenStatic, adLockOptimistic, adCmdText
End With
Set resultat = Cnx.Execute(requete)
Il me dit que le nombre d'argument est incorect ou affectation incorect pour le .open requete...
j'ai essayé :
Dim Cnx As Connection, requete As String, resultat As Recordset
requete = 'SELECT * FROM table WHERE incidence='1''
Set Cnx = CreateObject('ADODB.Connection')
Cnx.ConnectionString = 'table;'
With resultat
.ActiveConnection = Cnx
.Open requete, , adOpenStatic, adLockOptimistic, adCmdText
End With
Set resultat = Cnx.Execute(requete)
là, il me dit que Variable objet ou variable de bloc With non défini !
Ca doit te paraitre évident mais moi je nage un peu (beaucoup)
Bref, si tu peux encore m'aider un petit peu, ça serait très sympa !
Merci beaucoup