home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / tolkit45.zip / os2tk45 / samples / wps / wsfile / dinstall.cmd next >
OS/2 REXX Batch file  |  1999-05-11  |  608b  |  20 lines

  1. /* */
  2. call RxFuncAdd 'SysLoadFuncs', 'RexxUtil', 'SysLoadFuncs'
  3. call SysLoadFuncs
  4.  
  5. if SysDestroyObject("<WSFILE>") then
  6.    say 'Workplace Shell File Example successfully uninstalled.'
  7. else
  8.    say 'Error, Workplace Shell File Example not uninstalled properly.'
  9.  
  10. if SysDestroyObject("<WSFOLDER>") then
  11.    say 'Workplace Shell Folder Example successfully uninstalled.'
  12. else
  13.    say 'Error, Workplace Shell Folder Example not uninstalled properly.'
  14.  
  15. if SysDestroyObject("<EXAMPLE>") then
  16.    say 'Example Folder removed successfully.'
  17. else
  18.    say 'Error, Example Folder not removed properly.'
  19.  
  20.