Pergunta : Como unzip uma única lima de um sub-directório fechado

Caros peritos,

after que procurara por um looooong, tempo longo, eu controlei finalmente escrever o código para unzip UMA ÚNICA LIMA de um fecho de correr file.

However, quando eu tenho uma lima de FECHO DE CORRER com sub-directórios, este código não faço minha pergunta de work.

So sou, posso você mostrar (ou para reescrever o meu) o código da amostra assim que mim poderá unzip uma única lima (chamada A.TXT), de um sub-directório fechado?

Here é como recrear minha situação específica: >
  • create da " bala " do class= do

    • put da " bala " do class= de C:\TEMP

    • paste da " bala " do class= de directory


  • try para extrair A.TXT


Thank você por seu tempo!
Keimpe Wiersma
class= > " desobstruído " do
> do " codeSnippet " do class= do
class= " lineNumbers " do
class= do
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
id= " codeSnippet797401 " class= " do
 ' UnzipTEST “C:\TEMP\ZIPFILE.ZIP”, “C:\TEMP” que ISTO TRABALHA
'UnzipTEST “C:\TEMP\ZIPFILE.ZIP”, “C:\TEMP”, “SUBDIR” que ISTO TRABALHA
'UnzipTEST “C:\TEMP\ZIPFILE.ZIP”, “C:\TEMP”, “A.TXT” que ISTO NÃO TRABALHA
'UnzipTEST “C:\TEMP\ZIPFILE.ZIP”, “C:\TEMP”, “SUBDIR \ A.TXT” que ISTO NÃO TRABALHA
'UnzipTEST “C:\TEMP\ZIPFILE.ZIP”, “C:\TEMP”,” \ SUBDIR \ A.TXT " que ISTO NÃO TRABALHA
'UnzipTEST “C:\TEMP\ZIPFILE.ZIP”, “C:\TEMP”, “C:\TEMP\SUBDIR\A.TXT” que ISTO NÃO TRABALHA
UnzipTEST secundário (strZIPfile como a corda, o strOutputFolder como a corda, o strSingleFileName opcional como a corda)
    FSO não ofuscante como o objeto
    oApp não ofuscante como o objeto

    'Extrair as limas no dobrador recentemente criado
    Ajustar o oApp = o CreateObject (“Shell.Application”)

    Se "" do <> do strSingleFileName então
        oApp.Namespace ((strOutputFolder)).CopyHere oApp.Namespace ((strZIPfile)). Items.item ((strSingleFileName))
    Mais
        oApp.Namespace ((strOutputFolder)).CopyHere oApp.Namespace ((strZIPfile)). Artigos
    Terminar se
        
Terminar o submarino
class= do " lastRow do
>Attachments do " nome " do class= do class= " valor " do
>

nome de arquivo " do class= do >ZIPFILE.ZIP " fileSize " > (222 bytes) Javascript " do href= o " dos " attachmentDetails do class= de (tipo de lima detalhes)
FECHO DE CORRER file
do >Sample da " descrição " do class= do
o class= de
do >
class= do

Resposta : Como unzip uma única lima de um sub-directório fechado

Seu código trabalha muito bem para mim que está extraindo um único do fecho de correr em um dobrador secundário. Você pôde querer verific se você tem permissões copiar a lima à posição ou se certificar da lima não é fechado ou sendo usado por uma outra aplicação.

Outras soluções  
 
programming4us programming4us