home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: WPS_PM / WPS_PM.zip / dw1410.zip / DW141.ZIP / MAKEZIP.CMD < prev    next >
OS/2 REXX Batch file  |  1996-12-13  |  564b  |  23 lines
  1. /* Make or recreate Desktop Wizard ZIP template object - MAKEZIP.CMD */
  2.  
  3. call RxFuncAdd 'SysLoadFuncs', 'RexxUtil', 'SysLoadFuncs'
  4. call SysLoadFuncs
  5.  
  6. res = SysCreateObject('newzip',,
  7.                          'new.zip',,
  8.                          '<WP_TEMPS>',,
  9.                          'TEMPLATE=YES',,
  10.                          'Fail')
  11.                          
  12. Say ' '
  13. Say ' '
  14.  
  15. if res = 1 then 
  16.    Say 'Template creation successful! Press any key .....'
  17. else 
  18.    Say 'Template creation NOT successful! (May already exist) Press any key .....'
  19.  
  20. CharIn()
  21. call SysDropFuncs
  22.  
  23.