pourriez vous m'indiquer un code pour effacer la totalité des enregistrement d'une table ! merci
pourriez vous m'indiquer un code pour effacer la totalité des enregistrement d'une table ! merci
Bonjour,
SE
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 Dim Bd as Database Set Bd = CurrentDb() Bd.Execute "DELETE * FROM NomTable" Bd.Close
Tiens, voici une solution:
Sinon tu en as d'autre dans la faq...
Code : Sélectionner tout - Visualiser dans une fenêtre à part DoCmd.RunSQL "DELETE FROM table1;"
merci c'est parfait, serai-ce possible d'intégrer une demande de confirmation
êtes vous sur de vouloir effacer tout les enregistrements ?
OUI --- NON
Salut,Envoyé par Davik
exemple :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3 If MsgBox ("Voulez-vous vraiment éffacer ??",,VbYesNo) = VbYes Then 'Execution du code End If
cela m'affiche un message box mais je n'ai pas le choix du oui non j'ai juste un OK ! et lorsque je clique dessus cela ne m'efface rien
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9 Private Sub Commande23_Click() Dim Bd As Database Set Bd = CurrentDb() If MsgBox("Voulez vous vraiment effacer toutes vos précédentes installations?", , vbYesNo) = vbYes Then Bd.execute "DELETE * FROM T_Installation" Bd.Close lstresultat.Requery End If End Sub
Erreur de ma part :
il y a avait une virgule de trop.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2 If MsgBox("Voulez vous vraiment effacer toutes vos précédentes installations?", _ vbYesNo) = vbYes Then
![]()
On pourrait ajouter un vbCritical
...
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2 If MsgBox("Voulez vous vraiment effacer toutes vos précédentes installations?", _ vbCritical + vbYesNo) = vbYes Then
SE
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.
Partager