Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations gkittelson on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Zipping Classes or Active-X

Status
Not open for further replies.

ChrisAgius

Programmer
Sep 27, 2000
51
MT
Anybody have some idea where I can find some Active-X components or classes using the winzip or zipping procedures for backup.

AND

Can I modify the system date and if so how?

Thanks a Lot Guys [sig][/sig]
 
ChrisAgius

The following code is for PkZip25.exe which can be found at
PkZip25.exe is a 32 bit command line program and will run minimized.

Change USER.drive_lett to relevant drive, and alter relevant code.
The first block of code will zip, the second will unzip.

*---Zip
lcTemp1 = ;
[tab][/N2 ];
[tab]+SYS(5);
[tab]+SYS(2003);
[tab]+[\pkzip25 -add -speed -dir=full -temp=];
[tab]+GETENV([windir]);
[tab]+[\temp ];
[tab]+SYS(5);
[tab]+SYS(2003);
[tab]+[\backup\classes.zip ];
[tab]+SYS(5);
[tab]+SYS(2003);
[tab]+[\classes\*.*]

! &lcTemp1

*---Unzip
lcTemp2 =;
[tab][/N2 ];
[tab]+SYS(5);
[tab]+SYS(2003);
[tab]+[\pkzip25 -extract -overwrite -directories ];
[tab]+USER.drive_lett;
[tab]+[:\classes ];
[tab]+SYS(5);
[tab]+[\]

! &lcTemp2

* It's worth remembering Mr Bill Gates's FREE file compression software in the form * of CABARC.EXE and EXTRACT.EXE, which will create and extract from .CAB files.

*---

The system date can be changed in Control Panel -> Regional Settings.

Depending on what you are trying to achieve, you may be better off keeping the existing system date and using date functions to alter the date within your application.

For instance:-

SET CENTURY ON will give you 16/10/2000
SET CENTURY OFF will give you 16/10/00

Chris
[sig][/sig]
 
ChrisAgius

An better alternative would be to use WinAPI calls for the previous post.

If you feel PkZip25.exe answers your problem, e-mail me at support@lithoplas.com and I will send you some code.

Chris
[sig][/sig]
 
ChrisAgius, use DynaZIP ActiveX control. [sig]<p>Vlad Grynchyshyn<br><a href=mailto:vgryn@softserve.lviv.ua>vgryn@softserve.lviv.ua</a><br>[/sig]
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top