Mettre le path dans une variable [Résolu]

Messages postés
39
Date d'inscription
mardi 26 novembre 2013
Dernière intervention
29 mars 2018
- - Dernière réponse : jordane45
Messages postés
23619
Date d'inscription
mercredi 22 octobre 2003
Statut
Modérateur
Dernière intervention
16 décembre 2018
- 14 nov. 2014 à 17:02
Bonjour, j'aimerais récupérer le chemin de la variable "Path" pour compter le nombre de caractères qu'il y a. Je bloque sur le "Path" car il me dit que c'est un type qui ne peut pas être utilisé comme expression. Qu'est-ce que je dois faire pour être capable d'avoir le nombre de caractères?

Imports System
Imports System.IO
Public Class Form1
    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click

        LireRep("c:\")

    End Sub
    Private Sub LireRep(ByVal Rep As String)

        Dim dlg As New FolderBrowserDialog()
        Dim Repertoire As String = path

        If dlg.ShowDialog() = DialogResult.OK Then
            Dim path As String = dlg.SelectedPath
        End If

        
        MsgBox(Len(Repertoire))

    End Sub

End Class<code>
</code>


merci de votre aide!
Afficher la suite 

Votre réponse

2 réponses

Messages postés
23619
Date d'inscription
mercredi 22 octobre 2003
Statut
Modérateur
Dernière intervention
16 décembre 2018
0
Merci
Bonjour,

Path est un mot "réservé" par VB.NET
As tu essayé de renommer ta variable autrement ?


Commenter la réponse de jordane45
Messages postés
39
Date d'inscription
mardi 26 novembre 2013
Dernière intervention
29 mars 2018
0
Merci
bonjour, j'ai trouvé merci de votre conseil. J'ai renommé ma variable mais je l'ai aussi sortie de la boucle et ça a régler mon problème.

merci pour l'aide.

voilà le final si jamais ça peut aider...

Imports System
Imports System.IO
Public Class Form1
    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click

        LireRep("c:\")

    End Sub
    Private Sub LireRep(ByVal Rep As String)

        Dim dlg As New FolderBrowserDialog()

        Cursor.Current = Cursors.WaitCursor

        If dlg.ShowDialog() = DialogResult.OK Then
        End If

        Dim MyPath As String = dlg.SelectedPath

        MsgBox(Len(MyPath))

        Cursor.Current = Cursors.Default
 
        Application.Exit()

    End Sub

End Class
jordane45
Messages postés
23619
Date d'inscription
mercredi 22 octobre 2003
Statut
Modérateur
Dernière intervention
16 décembre 2018
-
Si la question est résolue..
Merci de ne pas oublier de clôturer le sujet
(en cliquant sur le lien "Marquer comme résolu" qui se trouve sous le titre de la question)

Cordialement,
Jordane
Commenter la réponse de infodes

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.