OK, here's some KiX code to enumerate the folder names from the base dir. Since Dir() will also return the two folders '.' and '..', provision has been made. Also, I check to make sure they are folders with GetFileAttr(), ignoring files at that level. All you have left to do is to replace the line "? $basedir+"\"+$name" with whatever your zip utility uses for the CLI.
code:
break on$basedir = "C:\Program Files"
$Name = Dir("$basedir")
While $Name <> "" and @ERROR = 0
If ($Name <> ".") And ($Name <> "..") And (GetFileAttr($basedir+"\"+$name) & 16)
? $basedir+"\"+$name
EndIf
$Name = Dir() ; retrieve next file
Loop
get $
[ 04 December 2001: Message edited by: LLigetfa ]
_________________________
Give a man a fish and he will be back for more. Slap him with a fish and he will go away forever.
