J'utilise le code :
sFiles = Directory.GetFileSystemEntries(sDirectory)
pour récupérer la liste des fichiers de mon répertoire.
Ce moment qu'il dans ce code ou avant pour le recteur et que les fichiers
JPG ou AVI?
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Jacquouille14
Dan a écrit :
Bonjour à tous.
J'utilise le code : sFiles = Directory.GetFileSystemEntries(sDirectory) pour récupérer la liste des fichiers de mon répertoire. Ce moment qu'il dans ce code ou avant pour le recteur et que les fichiers JPG ou AVI?
D'avance merci de votre aide
Bonjour, Un exemple pour détecter les fichiers jpg: NFIC%=0 For Each foundFile As String In My.Computer.FileSystem.GetFiles( _
My.Computer.FileSystem.CurrentDirectory,FileIO.SearchOption.SearchTopLevelOnly, "*.jpg") NFIC%=NFIC% + 1 :ReDim preserve Nfil$(0 to NFIC%) Nfil$(NFIC%)=foundFile Next
NFIC% est le compteur de fichiers foundFile contient le chemin et le nom de fichier Nfil$(0 to NFIC%) est un tableau contenant tous les fichiers jpg -- Jacques dit Jacquouille
Dan a écrit :
Bonjour à tous.
J'utilise le code :
sFiles = Directory.GetFileSystemEntries(sDirectory)
pour récupérer la liste des fichiers de mon répertoire.
Ce moment qu'il dans ce code ou avant pour le recteur et que les
fichiers JPG ou AVI?
D'avance merci de votre aide
Bonjour,
Un exemple pour détecter les fichiers jpg:
NFIC%=0
For Each foundFile As String In My.Computer.FileSystem.GetFiles( _
My.Computer.FileSystem.CurrentDirectory,FileIO.SearchOption.SearchTopLevelOnly,
"*.jpg")
NFIC%=NFIC% + 1 :ReDim preserve Nfil$(0 to NFIC%)
Nfil$(NFIC%)=foundFile
Next
NFIC% est le compteur de fichiers
foundFile contient le chemin et le nom de fichier
Nfil$(0 to NFIC%) est un tableau contenant tous les fichiers jpg
--
Jacques dit Jacquouille
J'utilise le code : sFiles = Directory.GetFileSystemEntries(sDirectory) pour récupérer la liste des fichiers de mon répertoire. Ce moment qu'il dans ce code ou avant pour le recteur et que les fichiers JPG ou AVI?
D'avance merci de votre aide
Bonjour, Un exemple pour détecter les fichiers jpg: NFIC%=0 For Each foundFile As String In My.Computer.FileSystem.GetFiles( _
My.Computer.FileSystem.CurrentDirectory,FileIO.SearchOption.SearchTopLevelOnly, "*.jpg") NFIC%=NFIC% + 1 :ReDim preserve Nfil$(0 to NFIC%) Nfil$(NFIC%)=foundFile Next
NFIC% est le compteur de fichiers foundFile contient le chemin et le nom de fichier Nfil$(0 to NFIC%) est un tableau contenant tous les fichiers jpg -- Jacques dit Jacquouille
Dan
Merci beaucoup, je teste dès que possible et je te tiens au courant. A+. Dan "Jacquouille14" a écrit dans le message de news:490c0fe2$0$13984$
Dan a écrit :
Bonjour à tous.
J'utilise le code : sFiles = Directory.GetFileSystemEntries(sDirectory) pour récupérer la liste des fichiers de mon répertoire. Ce moment qu'il dans ce code ou avant pour le recteur et que les fichiers JPG ou AVI?
D'avance merci de votre aide
Bonjour, Un exemple pour détecter les fichiers jpg: NFIC%=0 For Each foundFile As String In My.Computer.FileSystem.GetFiles( _
My.Computer.FileSystem.CurrentDirectory,FileIO.SearchOption.SearchTopLevelOnly, "*.jpg") NFIC%=NFIC% + 1 :ReDim preserve Nfil$(0 to NFIC%) Nfil$(NFIC%)=foundFile Next
NFIC% est le compteur de fichiers foundFile contient le chemin et le nom de fichier Nfil$(0 to NFIC%) est un tableau contenant tous les fichiers jpg -- Jacques dit Jacquouille
Merci beaucoup, je teste dès que possible et je te tiens au courant.
A+.
Dan
"Jacquouille14" <lameme@free.fr> a écrit dans le message de
news:490c0fe2$0$13984$426a74cc@news.free.fr...
Dan a écrit :
Bonjour à tous.
J'utilise le code :
sFiles = Directory.GetFileSystemEntries(sDirectory)
pour récupérer la liste des fichiers de mon répertoire.
Ce moment qu'il dans ce code ou avant pour le recteur et que les fichiers
JPG ou AVI?
D'avance merci de votre aide
Bonjour,
Un exemple pour détecter les fichiers jpg:
NFIC%=0
For Each foundFile As String In My.Computer.FileSystem.GetFiles( _
My.Computer.FileSystem.CurrentDirectory,FileIO.SearchOption.SearchTopLevelOnly,
"*.jpg")
NFIC%=NFIC% + 1 :ReDim preserve Nfil$(0 to NFIC%)
Nfil$(NFIC%)=foundFile
Next
NFIC% est le compteur de fichiers
foundFile contient le chemin et le nom de fichier
Nfil$(0 to NFIC%) est un tableau contenant tous les fichiers jpg
--
Jacques dit Jacquouille
Merci beaucoup, je teste dès que possible et je te tiens au courant. A+. Dan "Jacquouille14" a écrit dans le message de news:490c0fe2$0$13984$
Dan a écrit :
Bonjour à tous.
J'utilise le code : sFiles = Directory.GetFileSystemEntries(sDirectory) pour récupérer la liste des fichiers de mon répertoire. Ce moment qu'il dans ce code ou avant pour le recteur et que les fichiers JPG ou AVI?
D'avance merci de votre aide
Bonjour, Un exemple pour détecter les fichiers jpg: NFIC%=0 For Each foundFile As String In My.Computer.FileSystem.GetFiles( _
My.Computer.FileSystem.CurrentDirectory,FileIO.SearchOption.SearchTopLevelOnly, "*.jpg") NFIC%=NFIC% + 1 :ReDim preserve Nfil$(0 to NFIC%) Nfil$(NFIC%)=foundFile Next
NFIC% est le compteur de fichiers foundFile contient le chemin et le nom de fichier Nfil$(0 to NFIC%) est un tableau contenant tous les fichiers jpg -- Jacques dit Jacquouille
Jo
Bonsoir Dan,
on peut aussi faire:
Dim files As ObjectModel.ReadOnlyCollection(Of String) files = My.Computer.FileSystem.GetFiles( LeDossier , FileIO.SearchOption.SearchTopLevelOnly, "*.jpg", "*.avi")
For i = 0 To files.Count - 1 .............=files.Item(i) next
Cordialement Jo
"Dan" a écrit dans le message de groupe de discussion : 490b0d19$0$28672$
Bonjour à tous.
J'utilise le code : sFiles = Directory.GetFileSystemEntries(sDirectory) pour récupérer la liste des fichiers de mon répertoire. Ce moment qu'il dans ce code ou avant pour le recteur et que les fichiers JPG ou AVI?
D'avance merci de votre aide
Bonsoir Dan,
on peut aussi faire:
Dim files As ObjectModel.ReadOnlyCollection(Of String)
files = My.Computer.FileSystem.GetFiles( LeDossier ,
FileIO.SearchOption.SearchTopLevelOnly, "*.jpg", "*.avi")
For i = 0 To files.Count - 1
.............=files.Item(i)
next
Cordialement
Jo
"Dan" <antispam@mediacd.fr> a écrit dans le message de groupe de discussion
: 490b0d19$0$28672$7a628cd7@news.club-internet.fr...
Bonjour à tous.
J'utilise le code :
sFiles = Directory.GetFileSystemEntries(sDirectory)
pour récupérer la liste des fichiers de mon répertoire.
Ce moment qu'il dans ce code ou avant pour le recteur et que les fichiers
JPG ou AVI?
Dim files As ObjectModel.ReadOnlyCollection(Of String) files = My.Computer.FileSystem.GetFiles( LeDossier , FileIO.SearchOption.SearchTopLevelOnly, "*.jpg", "*.avi")
For i = 0 To files.Count - 1 .............=files.Item(i) next
Cordialement Jo
"Dan" a écrit dans le message de groupe de discussion : 490b0d19$0$28672$
Bonjour à tous.
J'utilise le code : sFiles = Directory.GetFileSystemEntries(sDirectory) pour récupérer la liste des fichiers de mon répertoire. Ce moment qu'il dans ce code ou avant pour le recteur et que les fichiers JPG ou AVI?
