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
ng
Salut,
Sans utiliser Open :
Dim lTaille As Long lTaille = FileLen(CHEMIN)
(Avec Open cela donnerait : Dim lTaille As Long, k as Integer k=FreeFile Open CHEMIN For Binary as #k lTaille=LOF(k) Close #k)
-- Nicolas G. FAQ VB : http://faq.vb.free.fr API Guide : http://www.allapi.net Google Groups : http://groups.google.fr/ MZ-Tools : http://www.mztools.com/
"Nicolas" a écrit dans le message de news: 127bf01c3f6fa$a3b28b30$
Bonjour,
Je souhaiterais connaitre la taille d'un fichier sans passer par l'ouverture de celui-ci (style lopen, ...)
Merci d'avance
Nicolas
Salut,
Sans utiliser Open :
Dim lTaille As Long
lTaille = FileLen(CHEMIN)
(Avec Open cela donnerait :
Dim lTaille As Long, k as Integer
k=FreeFile
Open CHEMIN For Binary as #k
lTaille=LOF(k)
Close #k)
--
Nicolas G.
FAQ VB : http://faq.vb.free.fr
API Guide : http://www.allapi.net
Google Groups : http://groups.google.fr/
MZ-Tools : http://www.mztools.com/
"Nicolas" <nicolasheurtevin@wanadoo.fr> a écrit dans le message de news:
127bf01c3f6fa$a3b28b30$a301280a@phx.gbl...
Bonjour,
Je souhaiterais connaitre la taille d'un fichier sans
passer par l'ouverture de celui-ci (style lopen, ...)
(Avec Open cela donnerait : Dim lTaille As Long, k as Integer k=FreeFile Open CHEMIN For Binary as #k lTaille=LOF(k) Close #k)
-- Nicolas G. FAQ VB : http://faq.vb.free.fr API Guide : http://www.allapi.net Google Groups : http://groups.google.fr/ MZ-Tools : http://www.mztools.com/
"Nicolas" a écrit dans le message de news: 127bf01c3f6fa$a3b28b30$
Bonjour,
Je souhaiterais connaitre la taille d'un fichier sans passer par l'ouverture de celui-ci (style lopen, ...)
