Suppression d'enregistrement

nikostaf Messages postés 35 Date d'inscription lundi 7 juillet 2003 Statut Membre Dernière intervention 5 mai 2004 - 28 juil. 2003 à 10:02
BruNews Messages postés 21040 Date d'inscription jeudi 23 janvier 2003 Statut Modérateur Dernière intervention 21 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

3 réponses

BruNews Messages postés 21040 Date d'inscription jeudi 23 janvier 2003 Statut Modérateur Dernière intervention 21 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...
0
nikostaf Messages postés 35 Date d'inscription lundi 7 juillet 2003 Statut Membre Derniè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.
0
BruNews Messages postés 21040 Date d'inscription jeudi 23 janvier 2003 Statut Modérateur Dernière intervention 21 août 2019
28 juil. 2003 à 15:15
Les controles ADO ou autre, pas mon truc. Tire un Recordset depuis une requete SQL.
BruNews, ciao...
0
Rejoignez-nous