J'ex=E9cute une requ=EAte d'insertion =E9crite en VBA =E0 partir=20
d'un formulaire.
Si la requ=EAte n'est pas valide (ex: int=E9grit=E9 non=20
respect=E9e car le nom doit =EAtre unique), je n'ai aucun=20
message d'erreur m'indiquant que l'insertion a =E9chou=E9.
Pourriez-vous me dire s'il y a une possibilit=E9 pour=20
v=E9rifier que la requ=EAte s'est bien ex=E9cut=E9e ?
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Raymond [mvp]
Bonjour.
contrairement au message précédent, places : DoCmd.SetWarnings True devant le début de ta procédure
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"david" a écrit dans le message de news:9edb01c43450$f5c6c8d0$ Bonjour,
J'exécute une requête d'insertion écrite en VBA à partir d'un formulaire. Si la requête n'est pas valide (ex: intégrité non respectée car le nom doit être unique), je n'ai aucun message d'erreur m'indiquant que l'insertion a échoué.
Pourriez-vous me dire s'il y a une possibilité pour vérifier que la requête s'est bien exécutée ?
Merci d'avance pour vos réponses
Bonjour.
contrairement au message précédent, places : DoCmd.SetWarnings True devant
le début de ta procédure
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"david" <anonymous@discussions.microsoft.com> a écrit dans le message de
news:9edb01c43450$f5c6c8d0$a501280a@phx.gbl...
Bonjour,
J'exécute une requête d'insertion écrite en VBA à partir
d'un formulaire.
Si la requête n'est pas valide (ex: intégrité non
respectée car le nom doit être unique), je n'ai aucun
message d'erreur m'indiquant que l'insertion a échoué.
Pourriez-vous me dire s'il y a une possibilité pour
vérifier que la requête s'est bien exécutée ?
contrairement au message précédent, places : DoCmd.SetWarnings True devant le début de ta procédure
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"david" a écrit dans le message de news:9edb01c43450$f5c6c8d0$ Bonjour,
J'exécute une requête d'insertion écrite en VBA à partir d'un formulaire. Si la requête n'est pas valide (ex: intégrité non respectée car le nom doit être unique), je n'ai aucun message d'erreur m'indiquant que l'insertion a échoué.
Pourriez-vous me dire s'il y a une possibilité pour vérifier que la requête s'est bien exécutée ?
Merci d'avance pour vos réponses
Voilà mon code, mais j'avais déjà essayé de mettre l'instruction DoCmd.SetWarnings True devant et ce ne marche pas.
Dim db As DAO.Database Set db = CurrentDb db.Execute (requete)
Raymond [mvp]
avec execute tu peux utiliser l'option dbFailOnError tu peux aussi simplifier ta procédure:
Dim requête As String requete = "INSERT INTO societe ........................... CurrentDb.Execute requete, dbFailOnError
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
a écrit dans le message de news:9f5401c43453$2448b090$ Voilà mon code, mais j'avais déjà essayé de mettre l'instruction DoCmd.SetWarnings True devant et ce ne marche pas.
Dim db As DAO.Database Set db = CurrentDb db.Execute (requete)
avec execute tu peux utiliser l'option dbFailOnError
tu peux aussi simplifier ta procédure:
Dim requête As String
requete = "INSERT INTO societe ...........................
CurrentDb.Execute requete, dbFailOnError
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
<anonymous@discussions.microsoft.com> a écrit dans le message de
news:9f5401c43453$2448b090$a301280a@phx.gbl...
Voilà mon code, mais j'avais déjà essayé de mettre
l'instruction DoCmd.SetWarnings True devant et ce ne
marche pas.
avec execute tu peux utiliser l'option dbFailOnError tu peux aussi simplifier ta procédure:
Dim requête As String requete = "INSERT INTO societe ........................... CurrentDb.Execute requete, dbFailOnError
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
a écrit dans le message de news:9f5401c43453$2448b090$ Voilà mon code, mais j'avais déjà essayé de mettre l'instruction DoCmd.SetWarnings True devant et ce ne marche pas.