Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Développement Développement Visual Basic erreur volontaire

erreur volontaire

7 réponses
Avatar
Bismark Prods
bonjour,

J'ai un peu perdue la main en VB6, depuis que j'ai migrer sur VB.Net et je
ne sais plus/pas comment faire pour déclencher une erreur volontaire ? J'ai
un gestion d'erreur et je veux selon une certaine condition y parvenir par
l'erreur...

Merci
Signaler un problème avec ce contenu

7 réponses

Supprimer
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
Avatar
Laurent Castagnetti
vois du coté de :

err.raise

Laurent


"Bismark Prods" a écrit dans le message de news:
OAFM$
bonjour,

J'ai un peu perdue la main en VB6, depuis que j'ai migrer sur VB.Net et je
ne sais plus/pas comment faire pour déclencher une erreur volontaire ?


J'ai
un gestion d'erreur et je veux selon une certaine condition y parvenir par
l'erreur...

Merci




Avatar
Yan
bonjour,
en faisant err.raise ...


-----Message d'origine-----
bonjour,

J'ai un peu perdue la main en VB6, depuis que j'ai migrer


sur VB.Net et je
ne sais plus/pas comment faire pour déclencher une erreur


volontaire ? J'ai
un gestion d'erreur et je veux selon une certaine


condition y parvenir par
l'erreur...

Merci


.



Avatar
Zoury
Salut Simon! :O)

Pour ajouter aux réponses des autres, tu peux te créer des erreurs customs
en utilisant la constante vbObjectError

'***
Option Explicit

Private Sub Main()

' Déclenche la très populaire
' erreur 91
Call Err.Raise(91, App.Title)

' Déclenche la peu connue
' erreur custom
Call Err.Raise(vbObjectError + 1, App.Title, "Mon erreur custom!")

End Sub
'***

--
Cordialement
Yanick Lefebvre - MVP pour Visual Basic
http://faq.vb.free.fr/?rubrique=0 - http://www.mvps.org/vbnet/
http://www.mentalis.org/agnet/apiguide.shtml - http://www.mztools.com/

Merci de poster les réponses au groupe afin d'en faire profiter à tous
"Bismark Prods" wrote in message
news:OAFM$
bonjour,

J'ai un peu perdue la main en VB6, depuis que j'ai migrer sur VB.Net et je
ne sais plus/pas comment faire pour déclencher une erreur volontaire ?


J'ai
un gestion d'erreur et je veux selon une certaine condition y parvenir par
l'erreur...

Merci




Avatar
Bismark Prods
oui oui Pierre, c'est évident ... je n'ai jamais songé a faire autrement que
try catch !


"Pierre Alexis" a écrit dans le message de
news:
Salut Zoury, Simon,

Sachez qu'en .Net la gestion d'erreur "On Error ..." est désormais


obsolète et
ne devrait plus être employée. A la place, il faut travailler avec les
"exceptions". Notion qui est utilisée dans la majorité des languages


actuels
(dont Java par exemple).

Alors voilà un exemple de "traquage" d'exception :

Try
x = x 0
Catch ex As OverflowException
MessageBox.Show(ex.Message)
End Try

Maintenant pour déclancher une erreur, il faut employer la commande Throw.
Exemple :

Throw New System.IO.FileNotFoundException()

Et pour créer sa propre exception, il suffit de créeer une classe qui
hériteras de System.ApplicationException. Mais bon, c'est plutôt


déconseillé
(notamment si l'exception nouvellement créée doit être employée entre
plusieurs assemblies, il va falloir la rendre seréalisable).

Vous trouverez plus d'infos sur les exceptions dans la MSDN ou dans des


livre
consacrés au .Net.

--
Pierre ALEXIS - MVP Visual Basic
Courriel & messenger :
FAQ Visual Basic : http://faq.vb.free.fr/




Avatar
Pierre Alexis
:-)

--
Pierre ALEXIS - MVP Visual Basic
Courriel & messenger :
FAQ Visual Basic : http://faq.vb.free.fr/
Avatar
Jérôme Prioux
Pourquoi faire simple quand on peut faire compliqué, hein ?
Moi, je ferais :
Error 91

"Bismark Prods" a écrit dans le message de news:

merci ! tu touche à .net de ton coté ? Zoury ?

"Zoury" a écrit dans le message de
news:
> Salut Simon! :O)
>
> Pour ajouter aux réponses des autres, tu peux te créer des erreurs


customs
> en utilisant la constante vbObjectError
>
> '***
> Option Explicit
>
> Private Sub Main()
>
> ' Déclenche la très populaire
> ' erreur 91
> Call Err.Raise(91, App.Title)
>
> ' Déclenche la peu connue
> ' erreur custom
> Call Err.Raise(vbObjectError + 1, App.Title, "Mon erreur custom!")
>
> End Sub
> '***
>
> --
> Cordialement
> Yanick Lefebvre - MVP pour Visual Basic
> http://faq.vb.free.fr/?rubrique=0 - http://www.mvps.org/vbnet/
> http://www.mentalis.org/agnet/apiguide.shtml - http://www.mztools.com/
>
> Merci de poster les réponses au groupe afin d'en faire profiter à tous
> "Bismark Prods" wrote in message
> news:OAFM$
> > bonjour,
> >
> > J'ai un peu perdue la main en VB6, depuis que j'ai migrer sur VB.Net


et
je
> > ne sais plus/pas comment faire pour déclencher une erreur volontaire ?
> J'ai
> > un gestion d'erreur et je veux selon une certaine condition y parvenir
par
> > l'erreur...
> >
> > Merci
> >
> >
>
>




Avatar
Zoury
Salut Jérôme! :O)

l'instruction Error est fournie pour des raisons de compatibilité avec les
versions antérieurs. Err.Raise devrait désormais être utilisé.

Voici l'extrait de la MSDN :
"The Error statement is supported for backward compatibility. In new code,
especially when creating objects, use the Err object's Raise method to
generate run-time errors."

--
Cordialement
Yanick Lefebvre - MVP pour Visual Basic
http://faq.vb.free.fr/?rubrique=0 - http://www.mvps.org/vbnet/
http://www.mentalis.org/agnet/apiguide.shtml - http://www.mztools.com/

Merci de poster les réponses au groupe afin d'en faire profiter à tous
"Jérôme Prioux" wrote in message
news:3f6dae99$0$28894$
Pourquoi faire simple quand on peut faire compliqué, hein ?
Moi, je ferais :
Error 91

"Bismark Prods" a écrit dans le message de news:

> merci ! tu touche à .net de ton coté ? Zoury ?
>
> "Zoury" a écrit dans le message de
> news:
> > Salut Simon! :O)
> >
> > Pour ajouter aux réponses des autres, tu peux te créer des erreurs
customs
> > en utilisant la constante vbObjectError
> >
> > '***
> > Option Explicit
> >
> > Private Sub Main()
> >
> > ' Déclenche la très populaire
> > ' erreur 91
> > Call Err.Raise(91, App.Title)
> >
> > ' Déclenche la peu connue
> > ' erreur custom
> > Call Err.Raise(vbObjectError + 1, App.Title, "Mon erreur custom!")
> >
> > End Sub
> > '***
> >
> > --
> > Cordialement
> > Yanick Lefebvre - MVP pour Visual Basic
> > http://faq.vb.free.fr/?rubrique=0 - http://www.mvps.org/vbnet/
> > http://www.mentalis.org/agnet/apiguide.shtml - http://www.mztools.com/
> >
> > Merci de poster les réponses au groupe afin d'en faire profiter à tous
> > "Bismark Prods" wrote in message
> > news:OAFM$
> > > bonjour,
> > >
> > > J'ai un peu perdue la main en VB6, depuis que j'ai migrer sur VB.Net
et
> je
> > > ne sais plus/pas comment faire pour déclencher une erreur volontaire


?
> > J'ai
> > > un gestion d'erreur et je veux selon une certaine condition y


parvenir
> par
> > > l'erreur...
> > >
> > > Merci
> > >
> > >
> >
> >
>
>