ED - Caret
não registrado
|
|
ENUNCIADA !
|
|
|
Postada em 09/11/2007 16:00 hs
Olá amigos Como faço via código para saber o tamanho de um arquivo? Muito obrigado por qualquer ajuda...abraços |
|
|
|
|
|
|
|
Postada em 09/11/2007 16:20 hs
Fala Ed blz primeiro faça um referencia a biblioteca FileSystemObjects e roda o codigo blz Private Sub Form_Load()
Dim fso As FileSystemObject
Set fso = New FileSystemObject
Debug.Print fso.GetFile("c: op.java").Size
End Sub abraços Na natureza nada se cria.. tudo se compila!!! |
|
|
|
ED - Caret
não registrado
|
|
|
ENUNCIADA !
|
|
|
Postada em 09/11/2007 16:22 hs
BLZ meu amigo, mas como faço isso usando uma barra de progresso ou aquele quadro de copia com animação do windows??? qualquer um serve, porque preciso mostrar ao usuario que a coisa não travou |
|
|
|
|
|
Postada em 11/11/2007 10:42 hs
Para mostrar o tamanho do arquivo vc pode usar assim também: MsgBox FileLen("c:BANCO2.mdb") & " bytes" & vbNewLine & _
FileLen("c:BANCO2.mdb") / 1024 & " KBytes" & vbNewLine & _
(FileLen("c:BANCO2.mdb") / 1024) / 1024 & " MBytes" Se vc quer mostrar uma barra de progresso copiando um arquivo veja se esta dica serve: at+ |
|
|
|
ED - Caret
não registrado
|
|
|
ENUNCIADA !
|
|
|
Postada em 12/11/2007 14:42 hs
Valeu amigos, muito obrigado Só continuo com um probleminha..... usando a rotina sugerida pela dica do ghost e junto com ela eu coloquei uma animação.avi, mas se o usuario clicar no formluario da animação ou em qualquer outro lugar do MDIFORM, a animação para e o progresso também Como evitar isso? Muito obrigado pela ajuda |
|
|
|
|
|
Postada em 12/11/2007 22:20 hs
hummm, tenta o seguinte, chame um formulário modal e acione o processo neste form modal. Enqüanto o form não for fechado ele não continua o programa. Só lembre-se de chamar de forma modal para o seu sistema inteiro: form1.show 1 at+ |
|
|
|
