none
ajuda em vbs RRS feed

Respostas

  •  

    Code Block

    Set objFSO = CreateObject("Scripting.FileSystemObject")
    Set objFolder = objFSO.GetFolder("C:\pasta")

    If objFolder.Size <> 0 Then

     wscript.echo "A pasta não está vazia o seu tamanho é " & objFolder.Size & " KB."
    Else
     wscript.echo "A pasta está vazia."
    End If

     

     


     

    terça-feira, 18 de dezembro de 2007 12:27

Todas as Respostas

  •  

    Post movido para área Scripts Administrativos.

     

    domingo, 16 de dezembro de 2007 21:47
  •  

    Code Block

    Set objFSO = CreateObject("Scripting.FileSystemObject")
    Set objFolder = objFSO.GetFolder("C:\pasta")

    If objFolder.Size <> 0 Then

     wscript.echo "A pasta não está vazia o seu tamanho é " & objFolder.Size & " KB."
    Else
     wscript.echo "A pasta está vazia."
    End If

     

     


     

    terça-feira, 18 de dezembro de 2007 12:27