Nombre de Fichiers dans un dossier

Question

Bonjour, voila mon problème:
J'aimerais avoir le nombre de fichier contenu dans un dossier (c:\Ini)?
Pouvez vous m'aider ou me diriger vers une source car je n'en est pas trouvé sur ce site qui le faisé.
Merci d'avance de vos réponses.

cs_CanisLupus · Answer

Salut, 
je sais que le FileSystemObject ne plait pas à tout le monde mais ça peut être une soluce à ton pb.

Avec "Microsoft Scripting Runtime" coché ds Projet/Références...  :

Private Sub Command1_Click()
Dim fso As FileSystemObject
Dim fld As Folder

  ' Set du FileSystemObject
  Set fso = CreateObject("Scripting.FileSystemObject")
  ' Set du dossier à parcourir
  Set fld = fso.GetFolder("C:\ini")
  
  MsgBox fld.Files.Count
  
End Sub

Cordialement

CanisLupus

cs_rene38 · Answer

Bonsoir
ou bien tu ajoutes une FileListBox File1 sur ta Form
Tu lui donnes les propriétés :
File1.Visible = False
File1.Path = "C:\Ini"

et NombreDeFichiers = File1.ListCount

zelze · Answer

Merci a vous deux.
Et je viens de me randre compte que je suis vraiemement bête de ne pas avoir pensé a un FileListBox  :big) .
Encore merci...