[VB6] capter une erreur

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : [VB6] capter une erreur

manson69

Bonjour,

Je voudrais savoir comment est ce que je peux capter une erreur spécifique.

Par exemple :
J'ai une form pour la copie d'un fichier d'un emplacement source vers un emplacement de destination.

FileCopy Source.Text, Dest.Text

Si il y a une erreur dans les chemins pour la copie j'ai cette erreur :

Run-time error '53'
File not found

J'aimerais pouvoir capter rien que l'erreur 53 pour pouvoir afficher un message spécifique pour cette erreur.

Comment dois-je faire ?

Merci d'avance.

Publicité

knakes

Code :

On Error Goto quelquechose
'
'lignes de code
'
Exit Sub
'Comme cela, on est sur qu'il ne passe pas dans la boucle
Select Case Err.Numbre
Case 0 'Tout est ok
Exit Sub
Case 1
Msgbox "Erreur détectée de Type 1"
Exit Sub
Case 2 '....
Msgbox "Erreur : " & Err.Number & Chr(10) & Err.Description , , "Erreur"
Case Else 'Si l'erreur n'est pas une référencée
End Select ' a ne pas oublier

Voilà

Message édité par knakes le 25-03-2005 à 11:49:25

tigrou libre

knakes a écrit :

on error goto quelquechose

ensuite tu mets :

quelquechose:
Select Case Err.Number
case 'mets le n° de ton erreur
'traitement
Case Else

end select

knakes

Désolé tigrou libre, j'étais en train d'écrire ...

tigrou libre

menteur je t'ai grilléééé!!!!

t'as vu l'heure de ton edit!!!!

en plus c'est pas la peine de mettre

case 0

!!!! tu n'aura jamais ce cas la!

Message édité par tigrou libre le 25-03-2005 à 12:06:36

knakes

Pour quelques secondes ... humm ...
Pour le "Case 0", c'est rare mais tu peux en avoir besoin si ta gestion d'erreur est centralisée. Défois aussi, il faut que l'erreur retournée soit -1 -> l'erreur 0 est bien une erreur.

FORUM HardWare.fr

Programmation

VB/VBA/VBS

[VB6] capter une erreur

Sujets relatifs
[jsp] erreur import	erreur vb
erreur JCombobox ?	[Delphi + MySQL] Erreur E_FAIL, comment contourner ?
Comment interpreter cette erreur en java?	[VB6] Ouvrir EXCEL
Erreur KeycodeV2.dll	Erreur d'exécution inconnue
[VB6] question ftp (api windows)	erreur
Plus de sujets relatifs à : [VB6] capter une erreur

Page générée en 0.036 secondes