Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Dynazip UNZIP Problem
Message
From
17/09/2012 15:40:30
 
General information
Forum:
Visual FoxPro
Category:
ActiveX controls in VFP
Environment versions
Visual FoxPro:
VFP 9 SP2
OS:
Windows XP SP2
Network:
Windows 2008 Server
Database:
Visual FoxPro
Application:
Desktop
Miscellaneous
Thread ID:
01553060
Message ID:
01553084
Views:
56
I checked your code, and I see that you miss a backslash after client_download_path. In other words
.Destination = SYS(5) + Addbs(ALLTRIM(remote_config.client_download_path))
>>AFAIK Dynazip is obsolete. I suggest the free VFPCompression as an alternative. http://www.sweetpotatosoftware.com/spsblog/2008/12/08/VFPCompressionUpdateACoupleOfFixesAndASlightEnhancement.aspx
>>
>
>Thanks!
>
>>>Hi Gang! This is for the DYNAZIP gurus on here......
>>>
>>>I have some code to extract a ZIP file called IMAGES.ZIP.
>>>
>>>IMAGES.ZIP has 9 sub folders in it....
>>> DISK1
>>> DISK2
>>> DISK3
>>> DISK4
>>> DISK5
>>>...
>>> DISK9
>>>
>>>each subfolder has many JPG files in it.
>>>
>>>
>>>so when I unzip the IMAGES.ZIP file, I want to have this...
>>>
>>>C:\PHARMACY\DOWNLOAD\IMAGES\DISK1 with JPG's in it
>>>C:\PHARMACY\DOWNLOAD\IMAGES\DISK2 ditto
>>>C:\PHARMACY\DOWNLOAD\IMAGES\DISK3 ditto
>>>...
>>>C:\PHARMACY\DOWNLOAD\IMAGES\DISK9 ditto
>>>
>>>But when I run my DYNAZIP code, I get the folders ok.... but NO FILES in them!! Here is the code
>>>
>>>
>>>lcMainImageZipFile = 'C:\PHARMACY\DOWNLOAD\IMAGES.ZIP'
>>>remote_config.client_download_path = "DOWNLOAD"
>>>WITH ThisForm.oleUnZip
>>>	.ActionDZ = 0	&& No Action
>>>	.ZipFile = lcMainImageZipFile
>>>	.FileSpec = "*.*"
>>>	.Destination = SYS(5) + ALLTRIM(remote_config.client_download_path)
>>>	.ActionDZ = 8	&& Extract
>>>ENDWITH
>>>
>>>
>>>Any ideas ???
>>>Thanks!!
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform