File size

Hey Jon !
Dette er fra MS script repository :

strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
    & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colFiles = objWMIService.ExecQuery _
    ("Select * from CIM_Datafile Where name = 'c:\\script\\fil.txt'")
For Each objFile in colFiles
    Wscript.Echo "File size: " & objFile.FileSize
Next

Der er mange andre fede VBS funktioner her :
http://www.microsoft.com/technet/scriptcenter/scripts/default.mspx

/Killer

Jeg klarede den selv. Men tak alligevel. Du får point.