Discussion :

[Triguns]

Bonsoir à toutes et à tous.

Voila je veux effectuer une recherche de toutes mes vidéos possédant l'extension ".avi" sur mon répertoire j'utilise donc ce code

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
16
17
18
19
20
21
Private Sub btnSubmit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSubmit.Click
        Dim NewPath As String
        Dim ErrorMessage As String
        Dim fileList As System.Collections.ObjectModel.ReadOnlyCollection(Of String)
        NewPath = txtDirectory.Text
        Try
            My.Computer.FileSystem.CurrentDirectory = NewPath
        Catch ex As Exception When NewPath = ""
            ErrorMessage = "Vous devez entrer un chemin."
        Catch
            ErrorMessage = "Veuillez entrez un chemin valide"
        Finally
            If ErrorMessage <> Nothing Then
                MsgBox(ErrorMessage)
            End If
        End Try
        fileList = My.Computer.FileSystem.GetFiles(My.Computer.FileSystem.CurrentDirectory, FileIO.SearchOption.SearchAllSubDirectories, "*.avi")
        For Each foundFile As String In fileList
            lstFilePick.Items.Add(foundFile)
        Next
    End Sub

Mon problème viens du fait que je suis sous seven et j'ai donc une erreur lors de la recherche qui m'indique que l'accès à C:\Documents and Settings\ met refusée.

J'ai également un probléme sur D:\System Volume Information\ dont l'accés met également refusée

Auriez-vous une solution à me proposer.

Merci par avance de votre aide

[Shadam]

Est ce que ton application a les droits administrateurs sur ton poste ? Parce que si c'est le cas tu as des services fournis par VB pour accéder aux dossiers spéciaux

[Pol63]

éviter ces dossiers

sinon prendre les droits (chercher impersonate .net (et des aspirines selon tomlev))

[Danyel]

éviter ces dossiers

Peux tu developper ?
L'utilisation des specialfolders est quasi indispensable dans certaines conditions ...

[Pol63]

Code :

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

if path.contains("System Volume Information") then continue for/while

c'était plus une blague qu'autre chose, là aussi du coup

enfin System Volume Information\ on peut s'en passer en général mais les autres je dis pas ...

[Danyel]

looooooooooooooooool