Alguem sabe como faço para extrair o conteudo de um arquivo ZIP? pelo VB.

 

 

Abraços

Dica: Existe alguns exemplos de programa neste mesmo site (link projetos - VB) que gera e descompacta arquivos zip, via dll do winzip.

 

Att,

Diego Croda

acho a maneira mais fácil:

1) crie um objeto ole

 se não for um arquivo fixo peça num textbox caminho e nome do arquivo zipado

no evento

Private text1_Lostfocus()
    OLE1.Class = "Package"
    OLE1.SourceDoc = text1.text
    OLE1.Action = 1 ' ---- serve p/lincar o arquivo ao objeto ole

    OLE1.Action = 7 ' ---- abre o objeto
End Sub