home *** CD-ROM | disk | FTP | other *** search
/ Programming Languages Suite / ProgLangD.iso / DbaseIII / UNINSTAL.BAT < prev   
DOS Batch File  |  1986-07-29  |  3KB  |  112 lines
  1. echo off
  2. cls
  3. echo 
  4. echo                dBASE III PLUS VERSION 1.1
  5. echo              HARD DISK UNINSTALL PROCEDURE 
  6. echo 
  7. echo The UNINSTAL procedure allows you to remove a copy of dBASE III
  8. echo PLUS and dBASE ADMINISTRATOR from your hard disk.
  9. echo 
  10. if "%1==" goto Help
  11. for %%f in (C:,c:,D:,d:,E:,e:,F:,f:,G:,g:,H:,h:,Y:,y:) do if %1.==%%f. goto START
  12. for %%f in (I:,i:,J:,j:,K:,k:,L:,l:,M:,m:,N:,n:,O:,o:,P:,p:,Z:,z:) do if %1.==%%f. goto START
  13. for %%f in (Q:,q:,R:,r:,S:,s:,T:,t:,U:,u:,V:,v:,W:,w:,X:,x:) do if %1.==%%f. goto START
  14. goto BADDRIVE
  15. :START
  16. if "==%2" goto DBASE
  17. if %2.==DBA. goto DBA
  18. if %2.==dba. goto DBA
  19. goto Help
  20. :DBASE
  21. echo dBASE III PLUS will be uninstalled from drive %1
  22. echo 
  23. yn Y N 30 Do you want to continue (Y/N)?
  24. if ERRORLEVEL 1 goto DBASE1
  25. goto END
  26. :DBASE1
  27. if not exist %1dbase.exe goto NotXit
  28. echo 
  29. echo Removing files from drive %1 . . .
  30. echo 
  31. del %1dbase.exe
  32. del %1dbaseinl.ovl
  33. del %1dbase.msg
  34. if exist %1config.db del %1config.db
  35. if exist %1config.sys del %1config.sys
  36. del %1dbase.ovl
  37. del %1assist.hlp
  38. del %1help.dbs
  39. echo 
  40. echo dBASE III PLUS has been successfully uninstalled.
  41. echo 
  42. goto End
  43. :DBA
  44. echo dBASE ADMINISTRATOR will be uninstalled from drive %1
  45. echo 
  46. yn Y N 30 Do you want to continue (Y/N)?
  47. if ERRORLEVEL 1 goto Ad1
  48. goto END
  49. :Ad1
  50. if not exist %1dba.com goto NotDBA
  51. if exist dba.lod goto AD3
  52. :AD2
  53. echo 
  54. echo Insert the Administrator #1 disk in drive A
  55. echo 
  56. pause
  57. echo 
  58. if not exist dba.lod goto AD2
  59. :AD3
  60. echo Erasing files from drive %1 . . .
  61. echo 
  62. del %1dba.com
  63. del %1dbase.msg
  64. if exist %1help.dbs del %1help.dbs
  65. if exist %1assist.hlp del %1assist.hlp
  66. if exist %1protect.exe del %1protect.exe
  67. del %1dba.ovl
  68. if exist %1adduser.com del %1adduser.com
  69. if exist %1login.db del %1login.db
  70. %1
  71. del \dbnetctl.300\*.vdw
  72. del \dbnetctl.300\*.com
  73. del \dbnetctl.300\*.hcl
  74. del \dbnetctl.300\dba.ctl
  75. del \dbnetctl.300\dba.lod
  76. a:
  77. echo 
  78. echo dBASE ADMINISTRATOR has been successfully uninstalled
  79. echo 
  80. goto END
  81. :Help
  82. echo You entered the command incorrectly.  The correct syntax is:
  83. echo 
  84. echo     "UNINSTAL <drive:>"        To uninstall dBASE III PLUS.
  85. echo 
  86. echo     "UNINSTAL <drive:> DBA"        To uninstall dBASE ADMINISTRATOR.
  87. echo 
  88. echo Uninstall is aborted.
  89. goto End
  90. :NotXit
  91. echo 
  92. echo dBASE III PLUS does not exist in the destination drive.
  93. goto ABORT
  94. :NotDBA
  95. echo 
  96. echo dBASE ADMINISTRATOR does not exist in the destination drive.
  97. goto  ABORT
  98. :BADDRIVE
  99. echo 
  100. echo Invalid drive letter specified.  Uninstall is aborted.
  101. echo 
  102. goto Help
  103. :ErrDBA
  104. echo 
  105. echo dBASE ADMINISTRATOR uninstall has been aborted.
  106. echo 
  107. goto END
  108. :ABORT
  109. echo Uninstall is aborted.
  110. echo 
  111. :End
  112.