diff options
| author | Jörg Frings-Fürst <debian@jff.email> | 2020-09-14 12:27:56 +0200 |
|---|---|---|
| committer | Jörg Frings-Fürst <debian@jff.email> | 2020-09-14 12:27:56 +0200 |
| commit | cce57c35b301d83ded5e5eaed9705744cffcfb56 (patch) | |
| tree | 29dc5c93b1bc45be42e68f00b81c1106c3935862 /setup/delsvc.vbs | |
| parent | 13dc8738dcd4739941735eab4d1956ccce770525 (diff) | |
| parent | 808dd89a2beae6ab1d29d35f6119ad5b36969589 (diff) | |
Merge branch 'feature/upstream' into develop
Diffstat (limited to 'setup/delsvc.vbs')
| -rw-r--r-- | setup/delsvc.vbs | 27 |
1 files changed, 27 insertions, 0 deletions
diff --git a/setup/delsvc.vbs b/setup/delsvc.vbs new file mode 100644 index 0000000..35fd264 --- /dev/null +++ b/setup/delsvc.vbs @@ -0,0 +1,27 @@ +' This VBScript should run before any files are actually removed
+
+On Error Resume Next
+
+Set sh = CreateObject("WScript.Shell")
+' Set fso = CreateObject("Scripting.FileSystemObject")
+
+Dim installer : Set installer = Nothing
+Set installer = CreateObject("WindowsInstaller.Installer")
+
+'key = "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SystemRoot"
+'SysLoc = sh.RegRead(key) & "\system32"
+
+' remove the showsel EventLog source entries
+keybase = "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\EventLog\Application\showsel"
+key1 = keybase & "\EventMessageFile"
+key2 = keybase & "\TypesSupported"
+sh.RegDelete key1
+sh.RegDelete key2
+sh.RegDelete keybase
+
+' remove the sdiskmon service
+sh.Run "net stop autoexnt", 0, True
+sh.Run "instexnt remove", 0, True
+' do not need to explicitly remove the autoexnt.bat file.
+
+
|