nikostaf
Messages postés35Date d'inscriptionlundi 7 juillet 2003StatutMembreDernière intervention 5 mai 2004
-
28 juil. 2003 à 10:02
BruNews
Messages postés21040Date d'inscriptionjeudi 23 janvier 2003StatutModérateurDernière intervention21 août 2019
-
28 juil. 2003 à 15:15
bonjour,
J'ai un ptit prob de suppression dans ma base ADo
Je voudrais supprimer tt les enregistrements
voici mon code:
With VISUALISATION.Adoenr.recordset
If .State =adStateOpen Then
.Close
End If
.Open
If Reccorcount > 0 Then
.Movefirst
End If
Do While not .EOF
.delete
.Move Next
.Update
.Close
Loop
ENd With
BruNews
Messages postés21040Date d'inscriptionjeudi 23 janvier 2003StatutModérateurDernière intervention21 août 2019 28 juil. 2003 à 10:27
Utilise SQL en ce cas ira beaucoup plus vite qu'une boucle vb.
"DELETE FROM nomtable" sans clause WHERE supprime tous les enregs de la table.
BruNews, ciao...
nikostaf
Messages postés35Date d'inscriptionlundi 7 juillet 2003StatutMembreDernière intervention 5 mai 2004 28 juil. 2003 à 15:03
ok je vais tester.voulais te demander,je taffe sur les beses de données avec un controle Ado,ca marche mais je voudrai enregistrer en meme temps des données extraites sur 2 tables diff ou alors un choix soi sur l'une soi sur l'autre avec une boucle If... mais j'ai testé plusieur soluc,2 controles ado ,...mais à chaque fois il me pète un cable (variable objet ou variable bloc non def).Si t'as une idée ,je vois pas j'ai pourtant essayer pleins de soluces.