GETFILESIZE - RÉCUPÉRER LA TAILLE DE FICHIERS, MÊME > 4 GO
Renfield
Messages postés
17287
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
27 septembre 2021
-
13 juil. 2006 à 13:42
cs_clad87 Messages postés 42 Date d'inscription samedi 28 décembre 2002 Statut Membre Dernière intervention 24 août 2015 - 11 sept. 2008 à 17:30
cs_clad87 Messages postés 42 Date d'inscription samedi 28 décembre 2002 Statut Membre Dernière intervention 24 août 2015 - 11 sept. 2008 à 17:30
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/38545-getfilesize-recuperer-la-taille-de-fichiers-meme-4-go
https://codes-sources.commentcamarche.net/source/38545-getfilesize-recuperer-la-taille-de-fichiers-meme-4-go
11 sept. 2008 à 17:30
3 nov. 2007 à 15:41
C'est génial.
15 juil. 2006 à 09:22
14 juil. 2006 à 14:49
13 juil. 2006 à 18:55
13 juil. 2006 à 17:31
sacré fichier !
13 juil. 2006 à 16:39
testé sur un fichier de 175 Go (188 978 560 980 octets)
et ca renvoi la bonne taille :)
13 juil. 2006 à 14:36
la première chose a faire, c'est de changer d'API...
comme me l'a indiqué notre ami BruNews, CreateFile peux violer un partage de droits d'accès, et se planter.
FindFirstFile ferait donc mieux l'affaire...
je verrai cette petite modif au retour des vacances ^^
13 juil. 2006 à 14:30
;)
@+
13 juil. 2006 à 13:50
13 juil. 2006 à 13:42
utilisez le code suivant, pour générer un fichier de 28Go ...
Dim hFile As Long
Dim i As Long
hFile = CreateFile("i:\a.big", GENERIC_WRITE, 0, ByVal 0&, OPEN_ALWAYS, 0, 0)
If hFile <> INVALID_HANDLE_VALUE Then
For i = 0 To 3
SetFilePointer hFile, &HFFFFFFFF, 0, FILE_CURRENT
Next i
SetEndOfFile hFile
CloseHandle hFile
End If