Dimensioni files dal bytes a....

[fastrick]

Non riesco a trasformare il valore in bytes che mi fornisce il codice qui sotto, in KB, MB, GB in base alle reali dimensioni.

<%
Function getSize(NOMEFILE)'Determine the size of the file

Set fsobj=Server.CreateObject("Scripting.FileSystemObj ect")
Set auto=fsobj.GetFile(server.mappath(NOMEFILE))
getSize=auto.size

End Function
%>

Questo codice mi da le dimensioni in bytes del file, ma io non riesco a trasformale in kb , mb, o gb.... cioè se il file è di 100KB lo script così mi da 102400 bytes, ma non riesco a cenvertirli in modo che mi mostr 100 kb.... Qulacuno mi può aiutare????? perfavore....

[Roby_72]

Devi dividere per 1024...

Roby

[fastrick]

Si, ci avevo pensato ;P, ma il mio problema è che se allo script viene passato un file di 102400 bytes lo divido x 1024 e mi da 100kb, ma se gli viene passatoun file di 1024000 come fa a dirmi che è di 1 MB e non di 1024 kb? Come faccio?

[Roby_72]

Devi fare un controllo in base al numero.
Se inferiore a 1024 ragioni in byte
Se invece è superiore ma inferiore a 1048576 ragioni in Kb
Se invece è superiore ma inferiore a 1099511627776 ragioni Gb

Ma ti renderai conto che ci devi lavorare per i valori intermedi in modo da rappresentarli degnamente.

Roby

[fastrick]

Si ma il problema è proprio questo, non so come fare x fargli capire che a 1024 bytes si passa a un kb, ma a 1024 KB come faccio per farlo passare a MB?

[fastrick]

UP

Nessuna sa darmi una mano.... plz!

[fastrick]

UP nessuno ha una mezza idea di come fare?

[optime]

direi che per mezzo della nuovissima istruzione IF dovresti riuscirci

[fastrick]

Si, avevo provato, solo che non so forse ho sbagliato qlks perchè non mi dava alcuna conversione e generava pure errore....