Discussion :

[kabikou]

Bonjour,

Sur une base de facturation, j'ai un formulaire pour l'entête avec un sous-formulaire pour les lignes d'articles.

J'ai inséré une corbeille dans le sous form en face de chaque ligne d'article, afin de pouvoir en supprimer un.

Mon problème :

Lorsqu'il ne reste qu'un seul article et que je fais la corbeille, j'aimerais qu'il me dise "Attention la facture va être supprimée..."

Comment faire pour supprimer la commande de l'entête en même temps?

Ci-joint mon code pour la suppression d'un article :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
 
Private Sub suppression_Click()
On Error GoTo Err_suppression_Click
 
If MsgBox("Confirmez-vous la suppression de cet article ?  ", vbYesNo + vbInformation, "Confirmation") = vbYes Then
    DoCmd.SetWarnings False
    DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
    DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70
    Cancel = True ' annule l'opération
 
End If
Exit_suppression_Click:
    Exit Sub
 
Err_suppression_Click:
    MsgBox Err.Description
    Resume Exit_suppression_Click
 
End Sub

Merci

[pgz]

Bonjour,

Pour effacer des enregistrements, les commandes d'interface, c'est peut-être pas le mieux. Tu pourrais t'intéresser à l'instruction DELETE en SQL.
Pour savoir, s'il reste des lignes dans une facture, regarde DCount. ET pour effacer la facture, re DELETE.

En espérant que cela te sera utile,
pgz