Connaitre la taille d'un fichier sans l'ouvrir ? [Résolu]

Signaler
Messages postés
56
Date d'inscription
vendredi 31 janvier 2003
Statut
Membre
Dernière intervention
26 mai 2013
-
Messages postés
56
Date d'inscription
vendredi 31 janvier 2003
Statut
Membre
Dernière intervention
26 mai 2013
-
D'habitude, lorsque je veux connaitre la taille d'un fichier, je fait simplement
Open "fichier" for input as #1
Longueur= LOF(1)
Close #1

C'est mignon, mais je voudrait faire un programme récuperant la taille d'un grand nombre de fichiers (+/- 5000), le problème, c'est que ouvrir chaque fichier, ca fait pas mal d'accès disques, et ca ralentit fortement mon programme...

Donc peut on connaitre la longueur d'un fichier sans l'ouvrir ?

Merci !

2 réponses

Messages postés
14008
Date d'inscription
samedi 29 décembre 2001
Statut
Modérateur
Dernière intervention
28 août 2015
70
Salut
   Dim Taille As Long
   Taille = FileLen("C:\mon fichier")
mais n'acceptera pas les fichiers de plus d' 1 Go (type Long)
 
Si tu tapes "taille fichier" dans le moteur de recherche, tu auras des exemples.
Dans le forum, j'ai vu passer des solutions pour les plus gros fichiers, faut chercher.

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

<hr />Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)
Messages postés
56
Date d'inscription
vendredi 31 janvier 2003
Statut
Membre
Dernière intervention
26 mai 2013

Ca me suffit, car je n'ai aucun besoin de voir les fichiers de plus de 300Mo, donc je rajoute juste une petite fonction If...Then filtrant les FileLen>400Mo ou <0 ^^

Merci beaucoup