Iniciar Sesión

Ver la Versión Completa : [Aporte] OCX para descomprimir .zip


Fito
13 de abril de 2016, 23:55
Hola Amigos:

Alguien conoce un OCX para descomprimir archivos zip, freeware?

Gracias. Saludos

Fito

Kuk
14 de abril de 2016, 08:59
Fito, mira a ver estos OCX, vienen los 2, el Zip y el UnZip.

Fito
14 de abril de 2016, 23:25
Hola KUK:

Ahi bajé los ocx, pero no los pude registrar, me da un error.

Saludos. Fito...

Kuk
15 de abril de 2016, 08:44
Fito, juraría que lo había usado, aunque no me acuerdo exactamente y si es así, fue hace tiempo en XP o sea que puede ser que no sea compatible con SO posteriores.

Mira a ver esto: Ocx para comprimir archivos (http://www.recursosvisualbasic.com.ar/htm/ocx-componentes-activex-dll/99-ocx-para-trabajar-con-archivos-zip.htm)

Lascu
15 de abril de 2016, 13:06
Hola
En el enlace podés bajar el SaxZip. Es un exe que te instala el ocx y un archivo help. Es el que yo uso en mis aplicaciones, es un poco tosco en la selección de archivos a comprimir pero funciona bien.

Este es un ejemplo del metodo zip

MOVE "6110-8320691-02" TO "SerialNumber" OF SAXZIP. *> Evita la ventana que avisa que es un trial.
MOVE "*.INX" TO "IncludeFileMask" OF SAXZIP.
MOVE WK-CARPETA-ORIGEN TO "SourceDirectory" OF SAXZIP.
MOVE WK-NOMBRE-ZIP TO "ZipFileName" OF SAXZIP.
MOVE 1 TO "Action" OF SAXZIP. *> 1 es el equivalente a saxZip_Add.
*> Inicio el proceso de compresión.
INVOKE SAXZIP "Add".

Se puede bajar desde
Dropbox - saxzip.exe (https://www.dropbox.com/s/ngmt9seurdzp0vh/saxzip.exe?dl=0)

Saludos

Lascu

Paulo
13 de marzo de 2018, 13:26
Estou a precisar de um ocx para comprimir, por isso retomo este post.

Lascu, já baixei o SaxZip, mas verifiquei que já tem algum tempo, e o site do produtor já não existe.
Tenho uma questão: funciona em win 10 x64 e em Windows Server ?
Obrigado.

Joseg
13 de marzo de 2018, 16:36
Para quem quiser usar o 7zip.
Funciona muito bem.
Solução que cria uma cópia de segurança para pastas diferentes automaticamente, se for dia par ou ímpar.


ENVIRONMENT DIVISION.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 WDATA PIC 9(08).
01 WDATA0 REDEFINES WDATA.
03 WANO PIC 9999.
03 WMES PIC 99.
03 WDIA PIC 99.
01 Q PIC 9(07).
01 R PIC 9(07).

01 WDATAx PIC X(03).

01 wFolderDate pic x(200) .
01 wcmdl02 pic x(400).
01 status-code PIC S9(4) COMP-5.
PROCEDURE DIVISION.

MOVE "Text" OF CmText1 TO WDATA
DIVIDE WDIA BY 2 GIVING Q REMAINDER R.

IF R = 0
MOVE "PAR" TO WDATAx
ELSE
MOVE "IMP" TO WDATAx
END-IF

MOVE "Text" OF CmText1 TO WDATA
move SPACES TO wFolderDate

FBACKUP *> pasta predefinida

string FBACKUP delimited by " " "" delimited by size WDATAx delimited by size into wFolderDate

string "7z a -tzip -y -pMyPassword " delimited by size wFolderDate delimited by " "
"\backup.zip " delimited by size
'"' delimited by size FBACKUP delimited by " " "\f*" delimited by size
'"' delimited by size into wcmdl02
INVOKE POW-SELF "ExecuteSync" USING wcmdl02 POW-SWHIDE.


EXIT PROGRAM.

Paulo
3 de abril de 2018, 15:02
Já testei SaxZip em vários ambientes x86 e x64, em Win19 e Win Server, e funciona bem.