Determinar o tamanho de um arquivo

Para arquivos, retorna o tamanho, em bytes, do arquivo especificado. Para pastas, retorna o tamanho, em bytes, de todas as subpastas e arquivos contidos na pasta.

O object é sempre um objeto File ou Folder.

O código a seguir ilustra o uso da propriedade Size com um objeto Folder:

Sub ShowFileSize(filespec)
    Dim fs, f, s
    Set fs = CreateObject("Scripting.FileSystemObject")
    Set f = fs.GetFile(filespec)
    s = UCase(f.Name) & " uses " & f.size & " bytes."
    response.write s
End Sub

Postado em uol.mundodigital.linguagens.asp por Cyber Walker

Esta matéria foi postada originalmente no ASP4Developers por Rubens N. Farias (site), que na época era "pós-graduado em análise de sistemas orientados a objetos, MCP, MCSD, MCAD, MCSD.NET e consultor em TI, além de idealizador do projeto ASP4Developers. Desenvolve sistemas sob medida, focados na satisfação do usuário, com qualidade e custo realista.". Hoje, vai saber...