bonjour à tous,,,
Je souhaiterais avoir un exemple de gestion d'erreur sur un formulaire en
utilisant les numeros d'erreur:
EX: si il ne contient pas de données, un message doit s'afficher , et le
formulaire doit se fermez à la suite de cette erreur!
Merçi d'avance.
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
André AVONS
Salut Un formulaire vide n'est pas une erreur mais tu peux toujours tester si il est vide Dans l'evevement sur ouverture du form tu mets If Me.RecordsetClone.RecordCount < 1 Then MsgBox "Il n'y a pas de données..." DoCmd.Close 'Ou 'Cancel = true End If
Ou de 3stone Compte le nombre d'enregistrement que te renvoie la requête ou table, avant d'ouvrir le formulaire...
If DCount("*","NomRequêteOuTable") > 0 then '// ouverture DoCmd.Openform "MonForm"... else '// Message éventuel MsgBox "Il n'y a pas de données..." end if
-- @+ André
Quelques liens avec des exemples, des utilitaires et des compléments pour Access http://access.seneque.free.fr/ http://www.self-access.com/ http://www.mvps.org/accessfr/ http://mypage.bluewin.ch/w.stucki/ http://access.jessy.free.fr/ "GGYAYA" a écrit dans le message de news:
bonjour à tous,,, Je souhaiterais avoir un exemple de gestion d'erreur sur un formulaire en utilisant les numeros d'erreur: EX: si il ne contient pas de données, un message doit s'afficher , et le formulaire doit se fermez à la suite de cette erreur! Merçi d'avance.
Salut
Un formulaire vide n'est pas une erreur mais tu peux toujours tester si il
est vide
Dans l'evevement sur ouverture du form
tu mets
If Me.RecordsetClone.RecordCount < 1 Then
MsgBox "Il n'y a pas de données..."
DoCmd.Close
'Ou
'Cancel = true
End If
Ou de 3stone
Compte le nombre d'enregistrement que te renvoie la requête ou table, avant
d'ouvrir le formulaire...
If DCount("*","NomRequêteOuTable") > 0 then
'// ouverture
DoCmd.Openform "MonForm"...
else
'// Message éventuel
MsgBox "Il n'y a pas de données..."
end if
--
@+
André
Quelques liens avec des exemples, des utilitaires et des compléments pour
Access
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
"GGYAYA" <ya.garrigue@wanadoo.fr> a écrit dans le message de
news:efUs5CHTDHA.2676@TK2MSFTNGP10.phx.gbl...
bonjour à tous,,,
Je souhaiterais avoir un exemple de gestion d'erreur sur un formulaire en
utilisant les numeros d'erreur:
EX: si il ne contient pas de données, un message doit s'afficher , et le
formulaire doit se fermez à la suite de cette erreur!
Merçi d'avance.
Salut Un formulaire vide n'est pas une erreur mais tu peux toujours tester si il est vide Dans l'evevement sur ouverture du form tu mets If Me.RecordsetClone.RecordCount < 1 Then MsgBox "Il n'y a pas de données..." DoCmd.Close 'Ou 'Cancel = true End If
Ou de 3stone Compte le nombre d'enregistrement que te renvoie la requête ou table, avant d'ouvrir le formulaire...
If DCount("*","NomRequêteOuTable") > 0 then '// ouverture DoCmd.Openform "MonForm"... else '// Message éventuel MsgBox "Il n'y a pas de données..." end if
-- @+ André
Quelques liens avec des exemples, des utilitaires et des compléments pour Access http://access.seneque.free.fr/ http://www.self-access.com/ http://www.mvps.org/accessfr/ http://mypage.bluewin.ch/w.stucki/ http://access.jessy.free.fr/ "GGYAYA" a écrit dans le message de news:
bonjour à tous,,, Je souhaiterais avoir un exemple de gestion d'erreur sur un formulaire en utilisant les numeros d'erreur: EX: si il ne contient pas de données, un message doit s'afficher , et le formulaire doit se fermez à la suite de cette erreur! Merçi d'avance.
