Dr. J. J. "One Eyed CrackerJack" Harbaugh -----Original Message----- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of [EMAIL PROTECTED] Sent: Friday, November 21, 2003 1:57 AM To: [EMAIL PROTECTED] Subject: [REBOL] For Windows guis Hi List A little tip that can be usefull for Windows guis. I had the task to ZIP (WINZIP) a lot of folders and found no tools to do that. So I wrote this little piece of code to build the batch file that will zip all the folders from the Windows console. 8< - - - - - - - - - - - - - - - - - - - - - ; undocumented WINZIP32 syntax prog: {"c:\program files\winzip\winzip32.exe" -min -a -r -p } alldir: read %. foreach d alldir [ remove back tail d cmd: rejoin [prog {"} d {.zip" } {"} d {\*.*"}] write/lines/append %"/d/rebview/test/zipall.bat" cmd ] 8< - - - - - - - - - - - - - - - - - - - - - The result looks like this: "c:\program files\winzip\winzip32.exe" -min -a -r -p "WD7 XML.zip" "WD7 XML\*.*" "c:\program files\winzip\winzip32.exe" -min -a -r -p "WD7 Fax.zip" "WD7 Fax\*.*" ... Regards Patrick -- To unsubscribe from this list, just send an email to [EMAIL PROTECTED] with unsubscribe as the subject. -- To unsubscribe from this list, just send an email to [EMAIL PROTECTED] with unsubscribe as the subject.
