home *** CD-ROM | disk | FTP | other *** search
- @echo off
- rem Un-install ActiveCGM control script
- rem InterCAP Graphics Systems
- rem Sep 15, 1997
- rem
- rem Check to see if acgm.ocx exists
-
- set afile=%windir%\system32\acgm.ocx
- if exist %afile% goto fileexists
-
- set afile=%windir%\system\acgm.ocx
- if exist %afile% goto fileexists
-
- set afile=%windir%\occache\acgm.ocx
- if exist %afile% goto fileexists
-
- set afile=\windows\system\acgm.ocx
- if exist %afile% goto fileexists
-
- set afile=\winnt\system32\acgm.ocx
- if exist %afile% goto fileexists
-
- set afile=\windows\occache\acgm.ocx
- if exist %afile% goto fileexists
-
- set afile=\winnt\occache\acgm.ocx
- if exist %afile% goto fileexists
-
- goto nofile
-
- :fileexists
- echo The file %afile% exists
- rem
- rem Check for regsvr32
- if exist %windir%\system32\regsvr32.exe goto runcmd0
- if exist %windir%\system\regsvr32.exe goto runcmd1
- if exist \winnt\system32\regsvr32.exe goto runcmd2
- if exist \windows\system\regsvr32.exe goto runcmd3
- goto norun
-
- :runcmd0
- %windir%\system32\regsvr32.exe /u %afile%
- if errorlevel 0 del %afile%
- goto end
-
-
- :runcmd1
- %windir%\system\regsvr32.exe /u %afile%
- if errorlevel 0 del %afile%
- goto end
-
-
- :runcmd2
- \winnt\system32\regsvr32.exe /u %afile%
- if errorlevel 0 del %afile%
- goto end
-
- :runcmd3
- \windows\system\regsvr32.exe /u %afile%
- if errorlevel 0 del %afile%
- goto end
-
- :norun
- echo Cannot find regsvr32.exe
- echo Please execute regsvr32.exe /u %afile%
- goto end
-
-
-
- :nofile
- echo acgm.ocx does not exist - probably this is the first install
- goto end
-
- :end