TESTANDO ARQUIVOS COMPACTADOS
caros colegas,
estou meio enferrujado devido à falta de tempo, mas a questão é que tenho uma lista de 500 arquivos ZIP, todos recuperados de uma formatação, ja sei que a maioria deles está corrompido, teria como pelo vb testar um a um e apagar apenas os corrompidos?
ja tentei pelo shell mas n consegui... abraço
estou meio enferrujado devido à falta de tempo, mas a questão é que tenho uma lista de 500 arquivos ZIP, todos recuperados de uma formatação, ja sei que a maioria deles está corrompido, teria como pelo vb testar um a um e apagar apenas os corrompidos?
ja tentei pelo shell mas n consegui... abraço
pessoal, to meio sem tempo, e sem net, achei alguma coisa aqui, vou testar e retorno, vlw
fala galera, me digam oq está errado:
achei um exemplo q ficaria assim:
shell [Ô]C:\Arquivos de programas\Winrar\Winrar.exe [Ô] & [Ô]C:\Teste.zip[Ô], vbNormalFocus
mas dá erro!! arquivo nao encontrado, ou arquivo sem conteúdo.
o que pode ser?
achei um exemplo q ficaria assim:
shell [Ô]C:\Arquivos de programas\Winrar\Winrar.exe [Ô] & [Ô]C:\Teste.zip[Ô], vbNormalFocus
mas dá erro!! arquivo nao encontrado, ou arquivo sem conteúdo.
o que pode ser?
quero apenas abrir o arquivo em modo normal, se eu tento manualmente ele abre normal, Ã exceção de alguns que estao corrompidos, mas via shell nenhum abre
levando-se em conta que o winrar opera com rar e zip, porque esta linha nao funfa?
gracias
shell [Ô]C:\Arquivos de programas\Winrar\Winrar.exe C:\Teste.zip[Ô], vbNormalFocus
gracias
shell [Ô]C:\Arquivos de programas\Winrar\Winrar.exe C:\Teste.zip[Ô], vbNormalFocus
Tente assim:
Dim Pasta As String
Pasta = [Ô]C:\Arquivos de Programas\WinRar[Ô]
[txt-color=#006400][ô]Extrair o arquivo Teste.rar para o diretório C:[/txt-color]
Shell Pasta & [Ô]rar e C:\Teste.rar C:\[Ô]
Tópico encerrado , respostas não são mais permitidas