Maybe you have an extra properties.
If you use DLL declarations then this can help you
I use the following code to run p.e
Dzip=("c:\temp\myzip.zip","c:\data\*.*")
********************************************************************************
* The code in this module is copyrighted code. *
* Please refer to the DynaZIP 3.0 License Agreement for terms and conditions *
* regarding its use. *
* *
* Copyright (c) 1996 by Inner Media, Inc *
* 60 Plain Road *
* Hollis, NH 03049 *
* All Rights Reserved. *
********************************************************************************
* Function: DZIP(zipfile, itemlist, spandisks)
* Purpose: create a zip file from a given item list, defaulted to
* multi-volume option disabled unless otherwise specified.
* Return: If successful, 0 is return
******************************************************************************
*-- Modified by Juan C. Zuluaga
*- February 8/2000
*- Include Passwords
PARAMETERS zipfile, itemlist, lPassword
PRIVATE m.regstr_id, m.retn_code, m.retn_code1, mvsettings
DECLARE INTEGER dzipstart IN dz_ez32.DLL
DECLARE INTEGER setzipvalue IN dz_ez32.DLL INTEGER ID, INTEGER iValue, INTEGER theValue
DECLARE INTEGER getzipvalue IN dz_ez32.DLL INTEGER ID, INTEGER iValue
DECLARE INTEGER setzipstring IN dz_ez32.DLL INTEGER ID, INTEGER iValue, STRING@lpTheString
DECLARE INTEGER getzipstring IN dz_ez32.DLL INTEGER ID, INTEGER iValue, STRING@lpTheString, INTEGER stringLen
DECLARE INTEGER dzipeasy IN dz_ez32.DLL INTEGER ID
DECLARE INTEGER dzipend IN dz_ez32.DLL INTEGER ID
#DEFINE ZIP_ADD 4
#DEFINE MV_USEMULTI 32768
#DEFINE MV_FORMAT 1
#DEFINE MV_LOWDENSE 2
#DEFINE MV_WIPE 256
#DEFINE MV_SUBDIR 512
#DEFINE MV_SYSHIDE 1024
#DEFINE MV_CDFIRST 4096
#DEFINE zip_function 0
#DEFINE zip_zipfile 1
#DEFINE zip_itemlist 2
#DEFINE zip_quiet 6
#DEFINE zip_multivol 32
#DEFINE zip_cryptflag 30
#DEFINE zip_cryptcode 31
#DEFINE zip_nomsgs 36
m.regstr_id = dzipstart()
m.retn_code = -1
IF(m.regstr_id <> -1)
m.retn_code = setzipvalue(m.regstr_id, zip_function, ZIP_ADD)
IF(m.retn_code <> -1) and lpassword
m.retn_code = setzipvalue(m.regstr_id, zip_cryptflag, .T.)
ENDIF
IF(m.retn_code <> -1)
m.retn_code = setzipvalue(m.regstr_id, zip_nomsgs, .T.)
ENDIF
IF(m.retn_code <> -1) and lpassword
m.retn_code = setzipstring(m.regstr_id, zip_cryptcode, "Password")
ENDIF
IF(m.retn_code <> -1)
m.retn_code = setzipstring(m.regstr_id, zip_zipfile, ALLTRIM(zipfile))
ENDIF
IF(m.retn_code <> -1)
m.retn_code = setzipstring(m.regstr_id, zip_itemlist, ALLTRIM(itemlist))
ENDIF
IF(m.retn_code <> -1)
m.retn_code = dzipeasy(m.regstr_id)
lerror= m.retn_code
ENDIF
m.retn_code1 = dzipend(m.regstr_id)
IF(m.retn_code1 = -1)
m.retn_code = -1
ENDIF
ENDIF
cErrmsg=""
IF m.retn_code<>0 OR lerror<>0
cErrmsg=dziperr(m.retn_code)
ENDIF
RETURN(cErrmsg)
"Anyone who has never made a mistake has never tried anything new." A.E
"The important thing is not to stop questioning. Curiosity has its own reason for existing." A.E