Soucis de gestion d'Exeption en VB2010

Question

Bonjour,

Je suis en train de faire un gestionnaire de fichiers, dedans il y  une fonctionnalité toute simple qui me permet de lister les fichiers de dossiers et de sous-dossiers. Lorsque je met un filtre par extension (uniquement les .jpg par exemple) tout marche très bien, mais lorsque je veux tout (*.*) alors là :

"System.ArgumentExeption:Caractères non conformes dans le chemin d'accès"

J'utilise un Try pour faire ma boucle et je ne sais pas quoi mettre dans le Catch pour gérer cette erreur

       [i]         Catch ex As Exception
                    LblPath.Text = ex.ToString
                End Try
/i

Si quelqu'un peut m'aider

NHenry · Answer

Bonjour, 

Quel est le code de recherche incriminé ?

Quand vous postez un code, merci d'utiliser la coloration syntaxique (3ième icône en partant de la droite : ).

---------------------------------------------------------------------
[list=ordered][*]Pour poser correctement une question et optimiser vos chances d'obtenir des réponses, pensez à lire le règlement CS, celui-ci pour bien poser votre question ou encore celui-ci pour les PFE et autres exercices.[*]Quand vous postez un code, merci d'utiliser la coloration syntaxique (3ième icône en partant de la droite : ).[*]En VB.NET pensez à activer Option Explicit et Option Strict (propriété du projet) et à retirer l'import automatique de l'espace de nom Microsoft.VisualBasic (onglet Références dans les propriétés du projet).[*]Si votre problème est résolu (et uniquement si c'est le cas), pensez à mettre "Réponse acceptée" sur le ou les messages qui vous ont aidés/list
---
Mon site

phenX · Answer

Pardon, je n'avais pas vu l'icone.

Le code est justement celui là. 
Le code du Try en lui même fonctionne très bien, c'est la gestion de l'exeption sur les caractères non conformes que je n'arrive pas à faire. J'imagihne qu'il faut que je le mette dans le Catch mais c'est tout.  

Catch ex As Exception 
LblPath.Text = ex.ToString 
End Try 




------------
Analyses et réflexions politiques sur http://bit.ly/LHou84

NHenry · Answer

Bonjour, 

Quel est le chemin qui pose le problème de 
"Caractères non conformes dans le chemin d'accès" ?

---------------------------------------------------------------------
[list=ordered][*]Pour poser correctement une question et optimiser vos chances d'obtenir des réponses, pensez à lire le règlement CS, celui-ci pour bien poser votre question ou encore celui-ci pour les PFE et autres exercices.[*]Quand vous postez un code, merci d'utiliser la coloration syntaxique (3ième icône en partant de la droite : ).[*]En VB.NET pensez à activer Option Explicit et Option Strict (propriété du projet) et à retirer l'import automatique de l'espace de nom Microsoft.VisualBasic (onglet Références dans les propriétés du projet).[*]Si votre problème est résolu (et uniquement si c'est le cas), pensez à mettre "Réponse acceptée" sur le ou les messages qui vous ont aidés/list
---
Mon site

Utilisateur anonyme · Answer

Bonsoir,

J'utilise un Try pour faire ma boucle
Pour information, tu n'as pas besoin de passer par une boucle pour lister tes fichiers.
Jette un coup d'oeil sur les classes DirectoryInfo, sa méthode GetFiles (sur laquelle tu peux placer tes filtres en paramètres) et FileInfo pour récupérer tes fichiers.

Utilisateur anonyme · Answer

Petite erreur de lien pour la méthode GetFiles

phenX · Answer

J'utilise bien la méthode GEtFiles, mon problème viens de la gestion de l'Exeption DirectoryNotFoundException


Merci à vous,

Analyses et réflexions politiques sur http://bit.ly/LHou84

phenX · Answer

Pardon, je parlais de l'Exeption ArgumentException



------------

Analyses et réflexions politiques sur http://bit.ly/LHou84

Utilisateur anonyme · Answer

Le moment est venu de poster le bout de code incriminé. Surtout la partie placée entre 'Try' et 'Catch'. Parce que, finalement, la partie du bloc Catch que tu à posté 2 fois déjà, n'est pas très parlante, et est inutile pour la compréhension de ton problème.

phenX · Answer

Oui pardon, le voici :



Try
S:
                        BtValider.Enabled = False
                        monStreamWriter = New StreamWriter(ListePath & "Liste" & Date.Today.Year & Date.Today.Month & Date.Today.Day & ".txt")
                        Dim dossiersTrouvé = Directory.GetDirectories(LblPath.Text)
                        For Each ligneD In dossiersTrouvé
                            monStreamWriter.WriteLine(ligneD)
                        Next
                        Dim fichiersTrouvé = Directory.GetFiles(LblPath.Text, ext, Chk)
                        For Each ligneF In fichiersTrouvé
                            monStreamWriter.WriteLine(ligneF)
                            LigneStreamer = fichiersTrouvé
                        Next
                        monStreamWriter.Close()
                        LblPath.Text = "Opération terminé"
                        LblPath.ForeColor = Color.Green

                    Catch ex As ArgumentException
                        Console.WriteLine("Caractère invalide")
                        monStreamWriter.Close()
                        GoTo S
                    End Try



--------------------
Analyses et réflexions politiques sur

Utilisateur anonyme · Answer

1 - Tu ne peux pas mettre un goto dans un bloc try/catch. (code à revoir)
Dim dossiersTrouvé = Directory.GetDirectories(LblPath.Text)
        For Each ligneD In dossiersTrouvé

2 - Tes variables ne sont pas typées (active Option Strict dans les propriétés de ton projet et corrige les erreurs).
3 - Utilise ex.Message pour lire la véritable erreur.
4 - Evite les accents dans les noms des variables.

phenX · Answer

Voilà, j'ai corrigé les quelques points cités :

 Try
                    BtValider.Enabled = False
                    monStreamWriter = New StreamWriter(ListePath & "Liste" & Date.Today.Year & Date.Today.Month & Date.Today.Day & ".txt")
                    Dim dossiersTrouve = Directory.GetDirectories(LblPath.Text)
                    For Each ligneD In dossiersTrouve
                        monStreamWriter.WriteLine(ligneD)
                    Next
                    Dim fichiersTrouve = Directory.GetFiles(LblPath.Text, ext, Chk)
                    For Each ligneF In fichiersTrouve
                        monStreamWriter.WriteLine(ligneF)
                        LigneStreamer = fichiersTrouve
                    Next
                    monStreamWriter.Close()
                    LblPath.Text = "Opération terminé"
                    LblPath.ForeColor = Color.Green

                Catch ex As ArgumentException
                    Console.WriteLine(ex.Message)
                End Try


Le programme plante avec cette erreur dans la console :

Une exception de première chance de type 'System.ArgumentException' s'est produite dans mscorlib.dll


Merci,


-------------------------
Analyses et réflexions politiques sur Mon blog

NHenry · Answer

Bonjour, 

Il "plante" sur quelle ligne ?

---------------------------------------------------------------------
[list=ordered][*]Pour poser correctement une question et optimiser vos chances d'obtenir des réponses, pensez à lire le règlement CS, celui-ci pour bien poser votre question ou encore celui-ci pour les PFE et autres exercices.[*]Quand vous postez un code, merci d'utiliser la coloration syntaxique (3ième icône en partant de la droite : ).[*]En VB.NET pensez à activer Option Explicit et Option Strict (propriété du projet) et à retirer l'import automatique de l'espace de nom Microsoft.VisualBasic (onglet Références dans les propriétés du projet).[*]Si votre problème est résolu (et uniquement si c'est le cas), pensez à mettre "Réponse acceptée" sur le ou les messages qui vous ont aidés/list
---
Mon site

phenX · Answer

Bonjour,

il ne plante pas sur "une ligne" mais sur un passage de boucle.

Comme je l'ai dit plus haut, le soucis viens de la gestion de l'Exception System.ArgumentException, le truc c'est que je ne sais pas comment la gérer. 



-------------------------
Analyses et réflexions politiques sur Mon blog

NHenry · Answer

Bonjour, 

"mais sur un passage de boucle"
Tu veux dire quoi par cela ?

Quelles sont les valeurs en cause ?

---------------------------------------------------------------------
[list=ordered][*]Pour poser correctement une question et optimiser vos chances d'obtenir des réponses, pensez à lire le règlement CS, celui-ci pour bien poser votre question ou encore celui-ci pour les PFE et autres exercices.[*]Quand vous postez un code, merci d'utiliser la coloration syntaxique (3ième icône en partant de la droite : ).[*]En VB.NET pensez à activer Option Explicit et Option Strict (propriété du projet) et à retirer l'import automatique de l'espace de nom Microsoft.VisualBasic (onglet Références dans les propriétés du projet).[*]Si votre problème est résolu (et uniquement si c'est le cas), pensez à mettre "Réponse acceptée" sur le ou les messages qui vous ont aidés/list
---
Mon site

phenX · Answer

En fait lorsqu'il passe là :

Dim fichiersTrouve = Directory.GetFiles(LblPath.Text, ext, Chk)
                    For Each ligneF In fichiersTrouve
                        monStreamWriter.WriteLine(ligneF)
                        LigneStreamer = fichiersTrouve
                    Next

Il plante sur la première ligne avec cette erreur :

Une exception de première chance de type 'System.ArgumentException' s'est produite dans mscorlib.dll 

C'est donc à un des passage dans la boucle For Each que ça coince, j'imagine qu'il y a un nom de fichier qui ne lui plait pas. Je cherche donc à gérer cette exeption

-------------------------
Analyses et réflexions politiques sur Mon blog

NHenry · Answer

Bonjour,

L'idéal est de ne pas avoir d'exception, pour comprendre d'où vient le problème tu peux retirer temporairement le Try/Catch et voir ce qu'il ne lui plait pas.

Ensuite, que te retourne le ex.ToString ?

Normalement, tu Catch bien l'exception, je ne vois pas l'objet de la question.

On est pas devant ton écran, on ne peut pas tout savoir.

Mon site

Utilisateur anonyme · Answer

Au risque de me répéter, active Option Strict et Option Explicit dans les propriétés de ton projet et corrige les erreurs.

Soucis de gestion d'Exeption en VB2010

17 réponses

Votre réponse

Discussions similaires