ACS 書き込みアクションの無効化

Microsoft.SystemCenter.DisableACSAction (WriteActionModuleType)

ACS サービスを無効にします。

Element properties:

Member Modules:

Source Code:

<WriteActionModuleType ID="Microsoft.SystemCenter.DisableACSAction" Accessibility="Internal" Batching="false">

  <Configuration/>

  <ModuleImplementation Isolation="Any">

    <Composite>

      <MemberModules>

        <WriteAction ID="DisableACS" TypeID="System!System.CommandExecuter">

          <ApplicationName>%windir%\system32\cscript.exe</ApplicationName>

          <WorkingDirectory/>

          <CommandLine>//NoLogo $File/DisableACSAction.vbs$</CommandLine>

          <TimeoutSeconds>30</TimeoutSeconds>

          <RequireOutput>true</RequireOutput>

          <Files>

            <File>

              <Name>DisableACSAction.vbs</Name>

              <Contents><Script>



strComputer = "."



Set oRegistry = GetObject("winmgmts:\\" &amp; strComputer &amp; "\root\default:StdRegProv")

Set oSWbemServices = GetObject("winmgmts:{impersonationLevel=impersonate}\\" &amp; strComputer &amp; "\root\cimv2")

REM The {impersonationLevel=impersonate} clause might not be necessary when running as LocalSystem



set oService = oSWbemServices.Get("Win32_Service.Name='AdtAgent'")



returnCode = oService.Change(,,,,"Disabled")

WScript.Echo "Service change return code: " &amp; returnCode



returnCode = oService.StopService()

WScript.Echo "Service stop return code: " &amp; returnCode



                                        </Script></Contents>

            </File>

          </Files>

        </WriteAction>

      </MemberModules>

      <Composition>

        <Node ID="DisableACS"/>

      </Composition>

    </Composite>

  </ModuleImplementation>

  <InputType>System!System.BaseData</InputType>

</WriteActionModuleType>