Access2003 aide vb ou sql

bartone Messages postés 19 Date d'inscription   Statut Membre Dernière intervention   -  
Le Pingou Messages postés 12249 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,

Dans un formulaire j’ai crée un bouton « supprimer » (à l’aide de l’assistant) qui me permet de supprimer l’enregistrement en cours.

Actuellement le code est le suivant :

Private Sub Étiquette71_Click()
On Error GoTo Err_Commande40_Click


DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70

Exit_Commande40_Click:
Exit Sub

Err_Commande40_Click:
MsgBox Err.Description
Resume Exit_Commande40_Click
End Sub

Cette fonction fonctionne parfaitement mais je souhaiterais historiser les enregistrements supprimés. Merci de me dire òu et comment je dois ajouter du code à cette procédure pour copier certains champs de l'enregistrement en cours (table "contacts") avant sa suppression dans une nouvelle table ("contacts_ supprimés")

En clair, je voudrais avoir une table "contacts_supprimés" reprenant : numéro / nom / prénom / adresse de ma table "contacts".


Merci
A voir également:

3 réponses

Le Pingou Messages postés 12249 Date d'inscription   Statut Contributeur Dernière intervention   1 458
 
Bonjour ,
Juste au passage, ne serait-il pas plus judicieux de marquer l'enregistrent comme suprimer, cela vous évitera de le recopier dans une autre table. Il vous suffit d'une requête qui filtre les bons enregistremnts ....!
0
bartone Messages postés 19 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour,

N'ayant pas de réponse pertinente à ma question, je vais reformuler une nouvelle requête en explorant cette piste.

ça me parait une très bonne idée

merci beaucoup
0
Le Pingou Messages postés 12249 Date d'inscription   Statut Contributeur Dernière intervention   1 458
 
Bonjour bartone,
Merci.
Pour bien préciser mon idée, il suffit d'ajouter un champ dans votre table (par exemple Valable = oui/non) et ainsi vous basez votre formulaire de travail sur une requête qui filtre les enregistrements [Valable = oui].
Et dans le formulaire vous avez le champ [Valable] qui vous permet de modifier le statut de l'enregistrement en cour.
0