Cuestión : Escritura de Vb necesaria

Tener una escritura que los trabajos maravillosos encontrar un archivo de cierre relámpago y después extraer ese archivo de cierre relámpago en una carpeta sin embargo los archivos de cierre relámpago que conseguimos de un vendedor tengan carpetas en them.
What necesito ahora hacer puedo estar en 2 diversas direcciones:
1. Si hay una manera de extraer todos los archivos de las carpetas en el cierre relámpago a una carpeta.
or
2.. Una escritura que entrará tantas carpetas creó y la búsqueda hacia fuera para los archivos de .wav y los mueven a una carpeta distinta.
class= > " claro " del
> del " codeSnippet " del class= del
class= " lineNumbers " del
class= del 
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:
50:
51:
52:
53:
54:
55:
56:
57:
58:
cierre relámpago notpretty del >set " del class= " de " codeSnippet811223 del id= del 
 del éxito 1) entonces
    MsgBox zip.LastErrorText
    WScript.Quit
Terminar si

éxito = zip.OpenZip (ziplocation)
Si (<> del éxito 1) entonces
    MsgBox zip.LastErrorText
    WScript.Quit
Terminar si

'Fijar la contraseña necesitada para desabrochar.
'Esta contraseña debe emparejar la contraseña usada cuando el cierre relámpago
'fue creado.
zip.SetPassword “Ech0p@ss”

'Vuelve el número de archivos y de directorios desabrochados.
unzipCount = cierre relámpago. Desabrochar (“c:\extractedfiles ")
Si (unzipCount < 0) entonces
    MsgBox zip.LastErrorText

    wscript.sleep (9000) 
Terminar si
Terminar el submarino
class= del

Respuesta : Escritura de Vb necesaria

Creo que primer vuelve el tamaño del arsenal (número de elementos) y segundo vuelve el tamaño de un elemento en el arsenal.
Otras soluciones  
 
programming4us programming4us