Discussion :

[stephan1932]

Bonjour a tous ,

Je programme depuis assez longtemps en VB.NET et il y a 3 jours je suis tomber sur une erreur :

Caractères non conformes dans le chemin d'accès.

Voici la ligne erronée :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
Dim lignes As String() = File.ReadAllLines(Directory.GetCurrentDirectory & "\Infos_sur_client\" & nom_client & ".txt"

J'ai dfait ue serie de tests :

--> si je remplace le "Directory.GetCurrentDirectory" par le repertoire cilbler, ca ne fonctionne pas.

--> si par contre je remplace le "nom_client" par un nom de client ca fonction.

hors, j'ai verifier en placeant un espion sous visual studio et "nom_client" a bien la bonne valeur.

PS : J'ai bien verifier et "nom_client" est bien une variable de type string .

quelqu'un pourrait -il m'aider? svp

[Pol63]

windows interdit certains caractères dans les fichiers comme ? : * / \ etc...

[stephan1932]

et donc? coment je fait? par quoi je remplace?
j'ai deja essayer le "\\" comme en C mas ca ne marche pas et de plus c'est bizerd car a d'autres endroit ca fonction normalement ...

[sevyc64]

Windows interdit ces caractères. Tu les remplace par ce que tu veux comme caractère autorisé. Ces caractères interdits doivent disparaitre du chemin d'accès

[stephan1932]

L'erreur ne doit pas venir de la pour plusieur raison :

--> si je remplace "nom_client" par sa valeur ca fonctionne hors ces caractere sont toujour la

--> je croit que ces caracteres sont interdit dans un nom de dossier ou de fichier pas pour separer les different dossier.

--> j'utilise ces caractere dans d'autre chemin d'acces et ca fonctionne ...

d'autres idee?

[sevyc64]

Modifie ton code comme ceci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Dim chemin as String = Directory.GetCurrentDirectory & "\Infos_sur_client\" & nom_client & ".txt"
Dim lignes As String() = File.ReadAllLines(chemin)

Met un point d’arrêt sur la seconde ligne, et dit nous ce que contient la variable chemin

[Bluedeep]

Accesoirement, quand on doit fabriquer des path à l'aide de chaines de caractères dans un programme, et qu'on veut programmer un tant soit peu proprement,on ne concatène jamais les chaines de caractères mais on utilise les méthodes statiques de la class Path, comme Path.Combine par exemple. Cela évite bien des sources d'erreurs.

[Shadam]

Essaies de faire des .Trim sur tes String récupéré peut être

[ostenhard]

Bonjour,

Il existe la méthode GetInvalidPathChars qui te permet de connaître les caractères non autorisés.

Tu mets ça dans un Replace en remplaçant par le caractère autorisé que tu veux.

Sinon peut-on voir le contenu de la variable Chemin ?

[Shadam]

Moi j'utilise ça dans mon appli en cours et ça marche très bien

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Private Function generationCheminPDF(ByVal langue As String)
        'Génération du chemin du pdf
        pdf = "\\ServeurW\" & CBMarque.Text.Trim & "\" & CBGamme.Text.Trim & "\" + DGVModele.SelectedCells.Item(3).Value.ToString.Trim &
                    "\Galerie_photos_MX\Fiche_tracteur\" & DGVModele.SelectedCells.Item(4).Value.ToString.Trim & "_" & langue & ".pdf"
        Return pdf
    End Function

[stephan1932]

bon, merci pour vos reponse.

j'ai fait plusieur test :

si je fait :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
Dim chemin As String = Directory.GetCurrentDirectory & "\Infos_sur_client\" & nom_client & ".txt"
        Dim lignes() As String = File.ReadAllLines(chemin)

la valeur de chemin est :
"C:\Users\Moi\Desktop\Doc\Programmation\Projets\VB.NET\Gestion_client\Gestion_client\bin\Debug\Infos_sur_client\test.txt"

Le chemin est juste mais ca ne fonctionne pas, j'ai de nouveau la meme erreur.



si je fait :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
Dim lignes() As String = File.ReadAllLines(Path.Combine(Directory.GetCurrentDirectory, "\Infos_sur_client\", nom_client, ".txt"))

J'obtien toujours la meme erreur

je suis un peut perdu ....

[sevyc64]

LE chemin semble correct.

Tu es sûr que l'erreur vient bien de cette ligne ? Elle ne serait pas déclenchée par une autre ligne dans ton code ?

[stephan1932]

je ne voit pas de ou ça peut venir d'autre...

- chemin est initialiser dans la sub

- lignes est initialiser aussi dans la sub

- nom_client, qui est utiliser dans dans "chemin" est un paramètre de la sub et je rappelle que ça valeur est correct et que si je remplace la variable par sa valeur pour déterminer "nom_client", il n'y a aucune erreur...


PS : depuis tout a l'heure on parle d'erreur, mais ça aparait comme une exception... :

ArgumentException
Caractères non conformes dans le chemin d'accès.

[Shadam]

Bonjour,

Je remonte ce topic parce que j'ai à peu près le même souci... J'ai déjà posté sur ce sujet (Cf un peu plus haut), parce que ma solution marchait très bien mais comme le mieux est l'ennemi du bien en voulant faire ça :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
Private Function generationCheminPDF(ByVal langue As String)
        'Génération du chemin du pdf
        Dim titreFr As String = ""
        For Each row As DataGridViewRow In DGVTitres.Rows
            If row.Cells.Item(0).Value = 1 Then
                titreFr = row.Cells.Item(2).Value.ToString.Trim.Replace(Path.GetInvalidPathChars, "_")
            End If
        Next
 
        pdf = "\\mailleux.com\doc\BASE_TRACTEURS\" & CBMarque.Text.Trim & "\" & CBGamme.Text.Trim & "\" + DGVModele.SelectedCells.Item(3).Value.ToString.Trim &
                    "\Galerie_photos_MX\Fiche_tracteur\" & titreFr & "_" & langue & ".pdf"
        Return pdf
    End Function

le .Replace(Path.GetInvalidPathChars, "_") ne fonctionne pas du tout et je me retrouve avec l'exception

ArgumentException
Caractères non conformes dans le chemin d'accès.

Or ce fameux replace devrait résoudre cette exception...

Une idée ?

[ostenhard]

Et en faisant le .Replace(Path.GetInvalidPathChars, "_") sur ta variable pdf ?

[Shadam]

En relisant mon post j'ai eu la même idée

Mais ça ne change rien, l'exception est quand même levée...

[Pol63]

Et en faisant le .Replace(Path.GetInvalidPathChars, "_") sur ta variable pdf ?

Path.GetInvalidPathChars retourne un tableau de caractères
il faudrait donc faire une boucle pour faire un replace par caractère du tableau, sinon le replace va chercher une sous chaine de tous les caractères interdit à la suite ce qui n'est pas le cas

[ostenhard]

Path.GetInvalidPathChars retourne un tableau de caractères
il faudrait donc faire une boucle pour faire un replace par caractère du tableau, sinon le replace va chercher une sous chaine de tous les caractères interdit à la suite ce qui n'est pas le cas

Ah ben oui !!!

[Shadam]

Ok Pol63 donc j'en suis rendu là :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Private Function generationCheminPDF(ByVal langue As String)
        'Génération du chemin du pdf
        Dim titreFr As String = ""
        For Each row As DataGridViewRow In DGVTitres.Rows
            If row.Cells.Item(0).Value = 1 Then
                titreFr = row.Cells.Item(2).Value.ToString.Trim
            End If
        Next
        pdf = "\\mailleux.com\doc\BASE_TRACTEURS\" & CBMarque.Text.Trim & "\" & CBGamme.Text.Trim & "\" + DGVModele.SelectedCells.Item(3).Value.ToString.Trim &
                    "\Galerie_photos_MX\Fiche_tracteur\" & titreFr & "_" & langue & ".pdf"
        For Each s As Char In Path.GetInvalidPathChars
            pdf.Replace(s, "_")
        Next        
        Return pdf
    End Function

Mais j'ai toujours la même exception de levée, je commence vraiment à être perdu là

[ostenhard]

Et en faisant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 For Each s As Char In Path.GetInvalidPathChars
            pdf = pdf.Replace(s, "_")
        Next

Au lieu de

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 For Each s As Char In Path.GetInvalidPathChars
            pdf.Replace(s, "_")
        Next