home *** CD-ROM | disk | FTP | other *** search
/ PC Online 1998 September / PCO_0998.ISO / filesbbs / os2 / filefr20.arj / FILEFR20.ZIP / Update.cmd < prev    next >
Encoding:
Text File  |  1998-06-22  |  1.2 KB  |  36 lines
  1. /*--File Freedom Version Update--*/
  2. SAY " "
  3. SAY "If you have File Freedom running, you must shut it down before"
  4. SAY "continuing with this update!"
  5. SAY "Make sure that the current directory that contains this update is"
  6. SAY "not the same as the directory where File Freedom is installed."
  7. SAY " "
  8. SAY "To exit this update procedure, type 'X' and then press ENTER."
  9. SAY "Otherwise, press ENTER to continue."
  10. PARSE PULL RESPONSE
  11. X = TRANSLATE(SUBSTR(RESPONSE,1,1))
  12.    IF X = "X" THEN SAY "Update aborted!"
  13.    else do
  14.       SAY " "
  15.       SAY "Enter the full Drive\path where File Freedom is Installed .."
  16.       PARSE PULL PATHNAME
  17.       xcopy filefrdm.exe PATHNAME
  18.       if RC=0 then
  19.       do
  20.          xcopy filefrdm.hlp PATHNAME
  21.          if RC=0 then
  22.          do
  23.             xcopy ffinstal.exe PATHNAME
  24.             xcopy uninstal.exe PATHNAME
  25.             xcopy readme PATHNAME
  26.             xcopy orderfrm PATHNAME
  27.             xcopy BMTMicro.frm PATHNAME
  28.             xcopy Tutorial.doc PATHNAME
  29.             SAY "Updating of File Freedom was Successful!"
  30.          end
  31.          else
  32.             SAY "Update was unsuccessful.  Check directory path!"
  33.       end
  34.       else SAY "Update was unsuccessful.  Check directory path!"
  35.    end
  36.