OVH Cloud OVH Cloud

Ouverture d'état

3 réponses
Avatar
Stéphane
Bonjour,

J'ai un formulaire sur lequel j'ai cr=E9e un bouton qui me=20
permet d'imprimer l'=E9tat correspondant. il m'affiche=20
l'enr=E9gistrement courant ... mon probleme c'est que si=20
l'utilisateur a modifier une information dans le=20
formulaire ce n'est pas mis a jour sur l'=E9tat, donc il=20
affiche les anciennes donn=E9es. J'avais cr=E9e une macro qui=20
renvoyais au meme enregistrement .. mais la mise a jour de=20
l'enregistrement ne se fait pas. J'ai essayer de faire la=20
meme chose en vba .. mais je ne connais pas si il existe=20
une fonction pour la mise =E0 jour de l'enregistrement.=20
Voici mon code vba=20

Private Sub Commande129_Click()
On Error GoTo Err_Commande129_Click

Dim stDocName As String
Dim stLinkCriteria As String

stDocName =3D "rptbon_commande"
=20
stLinkCriteria =3D "[Id_Bon]=3D" & Me![Id_Bon]
DoCmd.OpenReport stDocName, acViewPreview, ,=20
stLinkCriteria
frmclient
Exit_Commande129_Click:
Exit Sub

Err_Commande129_Click:
MsgBox Err.Description
Resume Exit_Commande129_Click
End Sub

merci de votre aide

St=E9phane

3 réponses

Avatar
Jessy Sempere [MVP]
Bonjour

Essais en mettant au début de ton code :

Me.Requery

@+
Jessy Sempere - Access MVP

------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"Stéphane" a écrit dans le message news:
2649701c4625d$e93f5920$
Bonjour,

J'ai un formulaire sur lequel j'ai crée un bouton qui me
permet d'imprimer l'état correspondant. il m'affiche
l'enrégistrement courant ... mon probleme c'est que si
l'utilisateur a modifier une information dans le
formulaire ce n'est pas mis a jour sur l'état, donc il
affiche les anciennes données. J'avais crée une macro qui
renvoyais au meme enregistrement .. mais la mise a jour de
l'enregistrement ne se fait pas. J'ai essayer de faire la
meme chose en vba .. mais je ne connais pas si il existe
une fonction pour la mise à jour de l'enregistrement.
Voici mon code vba

Private Sub Commande129_Click()
On Error GoTo Err_Commande129_Click

Dim stDocName As String
Dim stLinkCriteria As String

stDocName = "rptbon_commande"

stLinkCriteria = "[Id_Bon]=" & Me![Id_Bon]
DoCmd.OpenReport stDocName, acViewPreview, ,
stLinkCriteria
frmclient
Exit_Commande129_Click:
Exit Sub

Err_Commande129_Click:
MsgBox Err.Description
Resume Exit_Commande129_Click
End Sub

merci de votre aide

Stéphane
Avatar
Salut,

Ca fonctionne .... un seul petit hic ... en fermant l'état
je reviens au formulaire ... mais comme il est
actualiser .... ils revient au premier enregistrement ....
est-ce possible de le faire revenir a l'enregistrement ou
j'était avant.

Merci
-----Message d'origine-----
Bonjour

Essais en mettant au début de ton code :

Me.Requery

@+
Jessy Sempere - Access MVP

------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"Stéphane" a écrit
dans le message news:

2649701c4625d$e93f5920$
Bonjour,

J'ai un formulaire sur lequel j'ai crée un bouton qui me
permet d'imprimer l'état correspondant. il m'affiche
l'enrégistrement courant ... mon probleme c'est que si
l'utilisateur a modifier une information dans le
formulaire ce n'est pas mis a jour sur l'état, donc il
affiche les anciennes données. J'avais crée une macro qui
renvoyais au meme enregistrement .. mais la mise a jour de
l'enregistrement ne se fait pas. J'ai essayer de faire la
meme chose en vba .. mais je ne connais pas si il existe
une fonction pour la mise à jour de l'enregistrement.
Voici mon code vba

Private Sub Commande129_Click()
On Error GoTo Err_Commande129_Click

Dim stDocName As String
Dim stLinkCriteria As String

stDocName = "rptbon_commande"

stLinkCriteria = "[Id_Bon]=" & Me![Id_Bon]
DoCmd.OpenReport stDocName, acViewPreview, ,
stLinkCriteria
frmclient
Exit_Commande129_Click:
Exit Sub

Err_Commande129_Click:
MsgBox Err.Description
Resume Exit_Commande129_Click
End Sub

merci de votre aide

Stéphane



.



Avatar
Raymond [mvp]
Bonjour.

remplace Me.requery par Me.Refresh
Voir l'aide en ligne pour bien faire la différence entre les deux.

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


a écrit dans le message de
news:25c9b01c46261$06125130$
Salut,

Ca fonctionne .... un seul petit hic ... en fermant l'état
je reviens au formulaire ... mais comme il est
actualiser .... ils revient au premier enregistrement ....
est-ce possible de le faire revenir a l'enregistrement ou
j'était avant.

Merci