Compresor

Yo tengo WinZip y no tengo esos archivos en mi maquina.

Apoya a Visual FoxPro usándolo legalmente
ž,ø€º°`°º€ø,žž,ø€º°`°º€ø,žž,ø€º°`°º€ø,žž,ø€º°`°º
Espartaco Palma Martínez
SysOp PortalFox ( http://www.PortalFox.com )
email:
Acapulco, Guerrero. México


Lucas Tasso wrote:

Hola Oliver, quiza esta rutona te pueda servir... utiliza el azip.dll del
winzip (tenes que tenerlo en el windows\system)

* cargar azip.dll
DECLARE short addZIP_Initialise IN "azip32.dll"
DECLARE short addZIP_ArchiveName IN "azip32.dll" string zipfile
DECLARE short addZIP_Include IN "azip32.dll" string sourcefile
DECLARE short addZIP IN "azip32.dll"
=addZIP_Initialise() &&
comprimir ficheros
=addZIP_ArchiveName("c:\backup\copia.zip") && archivo a crear
=addZIP_Include("*.dbf") && ficheros a
incluir
=addZIP() && hacer
el zip

Espero que te sea util.
Lucas A. Tasso.-



"Oliver Manrique" escribió en el mensaje
news:098b01c347b4$e5a00220$
Saludos al Grupo

Alguien por alli tendrá un procedimiento para comprimir
archivos hecho en Visual Fox, Fox, si la tienen me la
envian a mi correo privado o me dan una idea de como
hacerlo, gracias.


Saludos

Oliver

Necesitas una DLL o ActiveX, aquí te comento sobre una gratuita.

EEVA ZIPMASTER
http://www.eetasoft.ee/zipmaster.htm

Pero tambien hay de paga y muuuy buenos:

DynaZip
http://www.dynazip.com/

Xceed Zip Compresion Library
http://www.xceedsoft.com/products/ZipCompL/

Espero te sirva.

Apoya a Visual FoxPro usándolo legalmente
ž,ø€º°`°º€ø,žž,ø€º°`°º€ø,žž,ø€º°`°º€ø,žž,ø€º°`°º
Espartaco Palma Martínez
SysOp PortalFox ( http://www.PortalFox.com )
email:
Acapulco, Guerrero. México


Oliver Manrique wrote:

Saludos al Grupo

Alguien por alli tendrá un procedimiento para comprimir
archivos hecho en Visual Fox, Fox, si la tienen me la
envian a mi correo privado o me dan una idea de como
hacerlo, gracias.


Saludos

Oliver

Hola Oliver, quiza esta rutona te pueda servir... utiliza el azip.dll del
winzip (tenes que tenerlo en el windows\system)

* cargar azip.dll
DECLARE short addZIP_Initialise IN "azip32.dll"
DECLARE short addZIP_ArchiveName IN "azip32.dll" string zipfile
DECLARE short addZIP_Include IN "azip32.dll" string sourcefile
DECLARE short addZIP IN "azip32.dll"
=addZIP_Initialise() &&
comprimir ficheros
=addZIP_ArchiveName("c:\backup\copia.zip") && archivo a crear
=addZIP_Include("*.dbf") && ficheros a
incluir
=addZIP() && hacer
el zip

Espero que te sea util.
Lucas A. Tasso.-



"Oliver Manrique" escribió en el mensaje
news:098b01c347b4$e5a00220$
Saludos al Grupo

Alguien por alli tendrá un procedimiento para comprimir
archivos hecho en Visual Fox, Fox, si la tienen me la
envian a mi correo privado o me dan una idea de como
hacerlo, gracias.


Saludos

Oliver

No, gracias, lo que pasa es que tu mencionas que dichos archivos vienen
con WinZip, lo cual no es cierto, deberán ser de algún otro aplicativo o
ActiveX.

Apoya a Visual FoxPro usándolo legalmente
ž,ø€º°`°º€ø,žž,ø€º°`°º€ø,žž,ø€º°`°º€ø,žž,ø€º°`°º
Espartaco Palma Martínez
SysOp PortalFox ( http://www.PortalFox.com )
email:
Acapulco, Guerrero. México


Lucas Tasso wrote:

si queres te lo paso por email.


"Esparta Palma" escribió en el
mensaje news:

Yo tengo WinZip y no tengo esos archivos en mi maquina.

Lucas Tasso wrote:

Hola Oliver, quiza esta rutona te pueda servir... utiliza el azip.dll

del

winzip (tenes que tenerlo en el windows\system)

* cargar azip.dll
DECLARE short addZIP_Initialise IN "azip32.dll"
DECLARE short addZIP_ArchiveName IN "azip32.dll" string zipfile
DECLARE short addZIP_Include IN "azip32.dll" string sourcefile
DECLARE short addZIP IN "azip32.dll"
=addZIP_Initialise() &&
comprimir ficheros
=addZIP_ArchiveName("c:\backup\copia.zip") && archivo a crear
=addZIP_Include("*.dbf") && ficheros a
incluir
=addZIP() &&

hacer

el zip

Espero que te sea util.
Lucas A. Tasso.-



"Oliver Manrique" escribió en el mensaje
news:098b01c347b4$e5a00220$
Saludos al Grupo

Alguien por alli tendrá un procedimiento para comprimir
archivos hecho en Visual Fox, Fox, si la tienen me la
envian a mi correo privado o me dan una idea de como
hacerlo, gracias.


Saludos

Oliver

Enviamos a mi correo ... me gustaria conocerlos. ...

David Amador Tapia
Webmaster de "La Web de Davphantom"
www.davphantom.cjb.net
Cartagena. Colombia
Tel (5) 6621502 - 6581523


"Lucas Tasso" escribió en el mensaje
news:

si queres te lo paso por email.


"Esparta Palma" escribió en el
mensaje news:
> Yo tengo WinZip y no tengo esos archivos en mi maquina.
>
> Apoya a Visual FoxPro usándolo legalmente
> ¸,ø¤º°`°º¤ø,¸¸,ø¤º°`°º¤ø,¸¸,ø¤º°`°º¤ø,¸¸,ø¤º°`°º
> Espartaco Palma Martínez
> SysOp PortalFox ( http://www.PortalFox.com )
> email:
> Acapulco, Guerrero. México
>
>
> Lucas Tasso wrote:
> > Hola Oliver, quiza esta rutona te pueda servir... utiliza el azip.dll
del
> > winzip (tenes que tenerlo en el windows\system)
> >
> > * cargar azip.dll
> > DECLARE short addZIP_Initialise IN "azip32.dll"
> > DECLARE short addZIP_ArchiveName IN "azip32.dll" string zipfile
> > DECLARE short addZIP_Include IN "azip32.dll" string sourcefile
> > DECLARE short addZIP IN "azip32.dll"
> > =addZIP_Initialise() &&
> > comprimir ficheros
> > =addZIP_ArchiveName("c:\backup\copia.zip") && archivo a crear
> > =addZIP_Include("*.dbf") && ficheros

a

> > incluir
> > =addZIP() &&
hacer
> > el zip
> >
> > Espero que te sea util.
> > Lucas A. Tasso.-
> >
> >
> >
> > "Oliver Manrique" escribió en el mensaje
> > news:098b01c347b4$e5a00220$
> > Saludos al Grupo
> >
> > Alguien por alli tendrá un procedimiento para comprimir
> > archivos hecho en Visual Fox, Fox, si la tienen me la
> > envian a mi correo privado o me dan una idea de como
> > hacerlo, gracias.
> >
> >
> > Saludos
> >
> > Oliver
> >
> >
>