Supprimer un enregistrement

Re-Bonsoir,

Je vous indique la façon dont je me suis sorti de cette situation...
Si jamais il y a une meilleure méthode, je pourrais être preneur...

Private Sub CmBSuppress_Click()

Me.ListeNoire.SourceObject = ""
Me.ListeBlanche.SourceObject = ""
DoCmd.Close acForm, "ListeBlanche"
DoCmd.Close acForm, "ListeNoire"

Forms("FormMenuUtilisateur").DossiersTechniquesSF.Controls("SFDTConceptionDetailleeDT").Controls("SFSiteGeo").Controls("FormMembresGeo").SourceObject
= ""

DoCmd.Close acForm, "Membres"

On Error GoTo Err_CmBSuppress_Click

DoCmd.SetWarnings False
DoCmd.RunCommand acCmdDeleteRecord

Me.ListeNoire.SourceObject = "ListeNoire"
Me.ListeBlanche.SourceObject = "ListeBlanche"
Forms("FormMenuUtilisateur").DossiersTechniquesSF.Controls("SFDTConceptionDetailleeDT").Controls("SFSiteGeo").Controls("FormMembresGeo").SourceObject
= "FormMembresGeo"

Forms("FormMenuUtilisateur").DossiersTechniquesSF.Controls("SFDTConceptionDetailleeDT").Controls("SFSiteGeo").Controls("ListeDesProfils").Form.Requery

Forms("FormMenuUtilisateur").DossiersTechniquesSF.Controls("SFDTConceptionDetailleeDT").Controls("SFSiteGeo").Controls("ListeDesProfilsCalendar").Form.Refresh

Me.Requery
Me.Refresh

Exit_CmBSuppress_Click:

Exit Sub

Err_CmBSuppress_Click:
MsgBox Err.Description
Resume Exit_CmBSuppress_Click

End Sub



--

Bien cordialement,

Joël GARBE
www.joelgarbe.fr
"Joël GARBE" <joel-garbe@wanadoo.fr> a écrit dans le message de news:
41eaa9f8$0$25783$8fcfb975@news.wanadoo.fr...

Bonsoir,

Dans ma base (vérouillage par défaut : générale, mode partagé) mais
utilisée sur mon seul ordinateur, j'ai des tables :

Profils
ListeB (1 Profil peut avoir musieurs ListeB)
ListeN (1 Profil peut avoir musieurs ListeB)

Je souhaiterais qu'en supprimant le profil, les ListeB et ListeN
correspondantes soient supprimées. J'ai donc déclaré l'intégrité
référentielle comme il se doit dans le schéma relationnel.

La où cela se complique, c'est que je visualise tout cela dans un
formulaire avec un controle onglet :
Un onglet pour visualiser les infos générales de ce profil sélectionné, un
onglet pour visualiser les ListeB de ce profil, et un onglet pour
visualiser les ListeN de ce profil.

Un bouton de commande permettant de supprimer le profil.

Mais la suppression est impossible, car les tables sont ouvertes par
l'interface utilisateur.

Encore une erreur de débutant ????

Vous remerciant par avance de vos lumières...
--

Bien cordialement,

Joël GARBE
www.joelgarbe.fr