ASP mostrare le dimensioni di un file

[SuperMariano81]

ciao a tutti, dovrei mostrare le dimnesioni di un file in una pagina asp. Ho trovato in rete questo bellissimo script per la data:

<%
function datafile(nf)
  Dim fDoc 'filesystem 
  Dim rootpath 'percorso fisico
  Dim ObjFile 'oggetto file
  datafile="null"
  
  Set fDoc = CreateObject("Scripting.FileSystemObject")			
  rootpath = nf
  			
  If fDoc.FileExists(rootpath) Then	
    'response.write("Esiste")
    Set ObjFile = fDoc.GetFile(rootpath)	
       'response.write ObjFile.DateLastModified
       datafile = ObjFile.DateLastModified
    Set ObjFile = Nothing
  end if   
  
  Set fDoc = nothing
end function
%>

Posso usarla per la dimensione dei file?

[4everskiff]

DimensioneFile = ObjFile.Size

ti da la dimensione in Byte

se vuoi la dim in KB:

DimensioneInKB = formatnumber((DimensioneFile/1024),2)

se vuoi la dim in MB:

DimensioneInMB = formatnumber(((DimensioneFile/1024)/1024),2)

ti ho dato la soluzione con il troncamento a 2 decimali perchè altrimenti ti da tutti i decimali... e non è bello!!

Ciao

[SuperMariano81]

Originariamente inviato da 4everskiff
DimensioneFile = ObjFile.Size

ti da la dimensione in Byte

se vuoi la dim in KB:

DimensioneInKB = formatnumber((DimensioneFile/1024),2)

se vuoi la dim in MB:

DimensioneInMB = formatnumber(((DimensioneFile/1024)/1024),2)

ti ho dato la soluzione con il troncamento a 2 decimali perchè altrimenti ti da tutti i decimali... e non è bello!!

Ciao

grazie 1000 mi funziona alla grade!