Discussion :

[SenSosistim]

Bonjour,

voilà, je souhaite à partir d'un bouton radio, pouvoir permuter un formulaire ACCESS entre un mode "consultation" et un mode "modification".
j'avais l'intention de modifier les propriétés depuis le bouton radio "MODE_FORMULAIRE" mais une fois passé en mode consultation, je ne peux revenir à un mode "modification", mon bouton radio devient inaccessible...
Quelqu'un peut il m'aider ???
le code ci dessous ne fonctionne donc pas, j'utilise ACCESS 2000

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
Private Sub MODE_FORMULAIRE_Click()
If Me!MODE_FORMULAIRE.Value = False Then
Me.AllowEdits = False
Me.AllowDeletions = False
Me.AllowAdditions = False
Me!MODE_FORMULAIRE.Enabled = True
Else
Me.AllowEdits = True
Me.AllowDeletions = True
Me.AllowAdditions = True
End If
End Sub

[jfc]

Effectivement, dès que ton formulaire passe en mode consultation, les boutons radios ne sont plus disponibles. Deux solutions :

Solution 1 la plus simple:
En lieu et place d'un bouton radio, place un bouton de commande. Tu changes le caption du bouton à chaque clic.

Solution 2 un peu lourd:
tu verrouilles chaque contrôle séparément. Pour accélerer le traitement, tu ajoutes un tag(remarque) identique à tes contrôles que tu veux verrouiller. Ensuite en parcourant la collection des controls, il te suffit d'examiner si le tag correspond à ton choix et de verrouiler, resp. libérer tes contrôles.

Une autre solution serait de mettre les cases à option dans un autre formulaire (p. ex un formulaire principal). Ce que je ne me souviens pas, c'est si les allowsedits sont hérités par les sous-formulaires

[SenSosistim]

Effectivement , l'accès à la propriété "caption" m'a permis de résoudre ce petit problème !

j'ai pu trouver l'info ci dessous complémentaire, qui m'a permis de finaliser le code :

Modifier par programme la valeur d'un champ rend l'enregistrement en cours modifiable, indépendamment de la valeur de la propriété AllowEdits. Si vous voulez empêcher l'utilisateur de modifier un enregistrement (AllowEdits est égal à Non) que vous devez modifier par programme, enregistrez l'enregistrement après toutes les modifications par programme ; la valeur de la propriétéAllowEdits sera respectée à nouveau après l'enregistrement de toutes les modifications à l'enregistrement en cours qui n'avaient pas été enregistrées.

voici le code final :

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
Private Sub Bouton_ModeFormulaire_Click()
If Me!Bouton_ModeFormulaire.Caption = "Mode Consultation" Then
 
    Me.AllowEdits = True
    Me.AllowDeletions = True
    Me.AllowAdditions = True
    Me!Bouton_ModeFormulaire.Caption = "Mode Modification"
    DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
Else
    Me!Bouton_ModeFormulaire.Caption = "Mode Consultation"
    DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
    Me.AllowEdits = False
    Me.AllowDeletions = False
    Me.AllowAdditions = False
 
End If

[lvz00]

Sur la meme problematique (switch consultation/saisie grace à .allowedit/del/add), j'experimentais un probleme légèrement différent:
-fonctionnement correct lorsque la valeur modifiée était associée à une zone de texte
-ne fonctionnait pas lorsque la valeur modifiée était associée une zone de liste modifiable.
Dans ce dernier cas, il etait alors possible de modifier des données meme avec .allowedit/del/add=false.

La soluce de sensosistim resoud ce probleme =>> merci*10^25 à lui