TAMANHO DE DIRETORIOS...

PAULOHSV 14/03/2005 16:21:42
#72972

msgbox FileLen (caminho)

USUARIO.EXCLUIDOS 14/03/2005 16:45:10
#72977

Agradeço a sua atenção mais naum eh o que eu quero...
Eu quero algo que me retorne o tamanha de um DIRETÓ“RIO, naum de um arquivo.

MACQUAID 14/03/2005 16:54:57
#72978 Resposta escolhida

Dim FSO As New FileSystemObject
Dim vFolder As Folder

Private Sub Form_Load()
Set vFolder = FSO.GetFolder("c:\windows")
MsgBox vFolder.Size
End Sub

MACQUAID 14/03/2005 16:56:50
#72979

esquece, pra usar o FileSystemObject é necessario referenciar a
Microsoft Scripting RunTime

USUARIO.EXCLUIDOS 15/03/2005 10:59:56
#73044

E como faço pra referenciar a Microsoft Scripting RunTime?

USUARIO.EXCLUIDOS 15/03/2005 11:03:33
#73045

Aí MACQUAID, consegui! Valeu cara! Deu certin! Brigadão!