OVH Cloud OVH Cloud

Probleme de rafraichissement de formulaire

1 réponse
Avatar
dopamind
bonjour,

Sur un formulaire ,un bouton de commande me lance une requete de MAJ puis un
requery sur ce formulaire.
Sur certaine config, pas de probleme , le formulaire se rafraichi.
Sur d'autre j'ai l'erreur suivante "l'objet est incorrect ou n'est plus
defini"

Je seche un peu sur le probleme.

Voici le code :

Private Sub Cmd_valid_Click()
On Error GoTo Err_Cmd_valid_Click

Dim stDocName As String
stDocName = "Qry_MAJ"
DoCmd.OpenQuery stDocName, acNormal, acEdit
Me.Requery

Exit_Cmd_valid_Click:
Exit Sub

Err_Cmd_valid_Click:
MsgBox Err.Description
Resume Exit_Cmd_valid_Click

End Sub

Merci d'avance.

1 réponse

Avatar
Raymond [mvp]
Bonsoir.

Essaie de mettre un DoEvents antre la requête et le requery ( sans
conviction)

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour une meilleure
efficacité de tes interventions sur MPFA


"dopamind" a écrit dans le message de
news:3fbb9ab9$0$228$
bonjour,

Sur un formulaire ,un bouton de commande me lance une requete de MAJ puis
un

requery sur ce formulaire.
Sur certaine config, pas de probleme , le formulaire se rafraichi.
Sur d'autre j'ai l'erreur suivante "l'objet est incorrect ou n'est plus
defini"

Je seche un peu sur le probleme.

Voici le code :

Private Sub Cmd_valid_Click()
On Error GoTo Err_Cmd_valid_Click

Dim stDocName As String
stDocName = "Qry_MAJ"
DoCmd.OpenQuery stDocName, acNormal, acEdit
Me.Requery

Exit_Cmd_valid_Click:
Exit Sub

Err_Cmd_valid_Click:
MsgBox Err.Description
Resume Exit_Cmd_valid_Click

End Sub

Merci d'avance.