[AC-2007] Suppression non effective

[lucienkany]

Bonjour,

J'ai deux base de données liées. La première contient les tables et la seconde les autres objets.

Sur un formulaire de la seconde il y a un bouton pour supprimer l'enregistrement en cours.

voici le code

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
 
 
Private Sub btnSuppTicket_Click()
On Error GoTo Err_btnSuppTicket_Click
 
If MsgBox("Voulez-vous confirmer la suppression de ce Ticket", vbYesNo, "CONFIRMATION") = vbNo Then
    Exit Sub
 
  End If
 
    DoCmd.RunCommand acCmdSelectRecord
    DoCmd.RunCommand acCmdDeleteRecord
 
 
Exit_btnSuppTicket_Click:
    Exit Sub
 
Err_btnSuppTicket_Click:
    MsgBox Err.Description
    Resume Exit_btnSuppTicket_Click
 
End Sub

Voici le problème.

Sur click, le message s'affiche et sur confirmation, l'enregistrement semble supprimé mais quand je le recherche, il est toujours là.

Que dois-je modifier pour que l'enregistrement soit effectivement supprimé?

D'avance merci

[nico84]

Bonjour,
J'utilise couramment

Code :

Me.Recordset.Delete

et ça marche bien...

[lucienkany]

Bonjour Nico et merci.

Mais ça ne marche pas non plus.

Je me demande si ça ne vient pas du fait que les bases de données sont liées.

Veux-tu voir ça s'il te plait

[nico84]

C'est lié chez moi aussi. Peut-être un problème de droits ? Peux tu supprimer d'une autre façon (delete, touche suppr...) ?