Discussion :

[@rkane]

bjr,
j'ai un probleme de requery sur un sous formulaire.
form pere : EntreeEvenement
form fils : ListeEvenement

j'entre un nouvel evenement dans entete du form pere et sur le click enregistrement je rajoute

Code :

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

Forms![ListeEvenement].Form.Requery

dans le sous formulaire "ListeEvenement" s'affiche la liste des evenements mis à jour de la nouvelle entree... enfin c'est ce que je voulais faire mais ça coince sur mon script de rafraichissement .
quelqu'un peut-il me dire pourquoi ?
merci d'avance.

[pgz]

Bonjour,

Essaie plutôt

Code :

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

Me.ListeEvènement.requery

Bon courage,

pgz

[Alexandre Sahli]

Essaye de la manière suivante:

Code :

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

Forms![EntreeEvenement]![ListeEvenement].Form.Requery

Cependant si le sous formulaire est lié de façon correcte par un champs la relation fils-père se fait automatiquement

A+

[thb74]

ou peut etre cela

Code :

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

Forms![EntreeEvenement].Form![ListeEvenement].Form.Requery

Thierry

A+

[@rkane]

Bon... ben ça ne veut rien savoir...

j'ai mis en PJ le fichier, c'est plus parlant, si quelqu'un a la gentillesse de regarder.
Merci d'avance.
Patrick

[Renardo]

Bonjour
Forms![entreeEvenement]![ListeEvenement].Requery
il faut changer le nom du sous form dans la proprieté il s'appel (Liste des evenements)

[lucky01]

Bonjours, Suivez bien mes instructions et cela fonctionnera :
1) Formulaire EntreeEvenement : Retirer le RecordSource.
2) TextBox evenement, retirer le controlsource, le champ devient Unbound.
3) Renommer le TextBox evenement en TxtEvenement.
4) Renommer le bouton Commande3 en BtSauver.
5) Private Sub BtSauver_Click()
Dim strToInsert As String
strToInsert = Me.TxtEvenement.Value

Dim MyQuery As String
MyQuery = "Insert into Evenements(evenement) VALUES ('" & strToInsert & "');"
DoCmd.RunSQL (MyQuery)

Me.Liste_des_évenements.Requery

End Sub

ET VOILA, C'est tout ...

[@rkane]

pour mettre Enabled à True, j'ai resolu avec :

Code :

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

1
2
3
Forms![entreeEvenement]![ListeEvenement]![NomEvenement].Enabled = True
Forms![entreeEvenement]![ListeEvenement]![NomEvenement].Locked = False
Forms![entreeEvenement]![ListeEvenement]![NomEvenement].SetFocus

Merci à tous