Valek271183, я просил выложить именно файл реестра, дабы не создавать у себя ручками.
Попробуйте так (скрипт VBScript):
Код:
Option Explicit
Const HKEY_LOCAL_MACHINE = &H80000002
Dim strComputer
Dim strValue
Dim lngProcessID
strComputer = "."
With WScript.CreateObject("WbemScripting.SWbemLocator")
If .ConnectServer(strComputer, "root\default").Get("StdRegProv").GetStringValue(HKEY_LOCAL_MACHINE, "SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\NIS", "UninstallString", strValue) = 0 Then
If .ConnectServer(strComputer, "root\cimv2").Get("Win32_Process").Create(strValue, Empty, Nothing, lngProcessID) = 0 Then
WScript.Echo "Process [" & strValue & "] (PID:" & lngProcessID & ") executing successfully"
Else
WScript.Echo "Can't execute process [" & strValue & "]"
End If
Else
WScript.Echo "Can't find parameter [HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\NIS\UninstallString]"
End If
End With
WScript.Quit 0
Можете добавить его в политику (тогда закомментируйте все «WScript.Echo» или добавьте параметр «//b»). Можете, слегка модифицировав, просто перебрать в цикле все потребные машины, исполняя скрипт на своём компьютере.
