Hente fil-størrelse

Hey team !
Dette returnerer størrelsen på c:\fil.txt i bytes :
Du kan så opsætte et regnestykke, hvis du vil have KB eller MB :O)

on error resume Next
Set objFSO = CreateObject("Scripting.FileSystemObject")
Const ForReading = 1, ForWriting = 2, ForAppending = 8
Set objFile = objFSO.GetFile("c:\fil.txt")
MsgBox objfile.size

/Killer

Hey team !
Virkede det ?

/Killer

Hey killerclown!
JA - det virker helt fint :-)
Bare ærgerligt, at team ikke har "tid" til at give dig dine retmæssige point for det ;o>