Set objFSO = CreateObject("Scripting.FileSystemObject") Set objShell = CreateObject("WScript.Shell") objShell.Run "net stop DWMRCS", 0, True objShell.Run "net stop DNTUS26", 0, True 'For the DNTU Client Agent Service: objShell.Run "cmd /c ""c:\Program Files\DameWare Development\DameWare NT Utilities\DNTUS26.exe"" -remove", 0, True 'For the DMRC Client Agent Service: objShell.Run "cmd /c ""c:\Program Files\DameWare Development\DameWare NT Utilities\DWRCS.EXE"" -remove", 0, True arrDWFiles = Array( _ "C:\Windows\System32\DWRCS.exe", _ "C:\Windows\System32\DWRCK.dll", _ "C:\Windows\System32\DWRCSET.dll", _ "C:\Windows\System32\DWRCShell.dll", _ "C:\Windows\System32\DWRCS.ini") For Each strFile In arrDWFiles If objFSO.FileExists(strFile) = True Then objFSO.DeleteFile strFile, True Next If objFSO.FolderExists("c:\Program Files\DameWare Development") = True Then objFSO.DeleteFolder "c:\Program Files\DameWare Development", True objShell.Run "reg delete ""HKLM\SOFTWARE\DameWare Development"" /f", 0, True MsgBox "Done"Ĭan you run this and see what the output of each command is as it tries to stop the services? I've pieced together the service removal, the file deletion, and the registry deletion from the links these guys posted.
0 kommentar(er)
