none
Utuliser FileSystem.FileExists RRS feed

 > 

  • Question

  • Question
    Connectez-vous pour voter
    0
    Connectez-vous pour voter

    Bonjour,

    Je me demande commer vérifier l'exsistence d'un fichier qui est dans le

     FolderBrowserDialog1.SelectedPath

    Je veux vérifier que level.dat exsiste dans le dossier que l'utulisateur a fourni. Le code du bouton "choisir"

     Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Me.FolderBrowserDialog1.Description = "Choissisez le dossier extrait..."
        Me.FolderBrowserDialog1.RootFolder = Environment.SpecialFolder.MyDocuments
        Me.FolderBrowserDialog1.ShowNewFolderButton = False

        If FolderBrowserDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then
            TextBox1.Text = FolderBrowserDialog1.SelectedPath
        Else
            TextBox1.Text = "Rien n'a été selectionné!"

        End If

    End Function

    Merci de votre aide!

    samedi 2 août 2014 22:31
    |

Réponses

  • Question
    Connectez-vous pour voter
    1
    Connectez-vous pour voter

    Bonjour,

    Voici la solution a ton problème :

    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        Dim open As New FolderBrowserDialog
        open.Description = "Choissisez le dossier extrait..."
        open.RootFolder = Environment.SpecialFolder.MyDocuments
        open.ShowNewFolderButton = False
        If open.ShowDialog = Windows.Forms.DialogResult.OK Then
            If My.Computer.FileSystem.FileExists(open.SelectedPath & "//level.dat") Then
                TextBox1.Text = open.SelectedPath
            Else
                TextBox1.Text = "Rien n'a été selectionné!"
            End If
        End If
    End Sub

    cordialement,

    dimanche 3 août 2014 05:46
    |