Нашёл тему.. тут как-то через скрипт активируют
Const zdir = "C:\WINDOWS\system32\rserver30\"
Const dllfile = "C:\WINDOWS\system32\rserver30\newtstop.dll"
Const inifile = "C:\WINDOWS\system32\rserver30\newtstop.ini"
Const dllfilesrc = "\\Shadow\software\radmin\reg\newtstop.dll"
Const inifilesrc = "\\Shadow\software\radmin\reg\newtstop.ini"

Set FSO = CreateObject("Scripting.FileSystemObject")
Set reg = CreateObject("WScript.Shell")

Dim objService

Set objWMIService = GetObject("WinMgmts:\\localhost\Root\CIMV2")
Set colServices = objWMIService.ExecQuery("SELECT * FROM Win32_Service WHERE NAME = 'rserver3'")

If not colServices.count = 0 Then
'стопорим службу
For Each objService in colServices
objService.StopService()
Next
FSO.CopyFile dllfilesrc,zdir,1
FSO.CopyFile inifilesrc,zdir,1
reg.Run("regsvr32.exe /s " & dllfile)
For Each objService in colServices
objService.StartService()
Next
End If
Только я не пойму, откуда он берёт файлы..