[ShaddyR]

Kyzylorda_Gabit,
1) отключи службу Windows Audio
2) отключи звуковую карту в реестре

[Petya V4sechkin]

Kyzylorda_Gabit, можно в Управление компьютером -> меню Действие -> Подключиться к другому компьютеру -> (выбрать комп) -> Диспетчер устройств -> (отключить что угодно).

Или вам скриптом надо?

[Kyzylorda_Gabit]

Коллеги, спасибо за ответы...

сорри за тупизм, у меня домен, компов около 100, хотелось бы чтобы всем сразу убрать\восстановить звуковую карту

Раньше мы блокировали через диспетчер устройств локально, а теперь нужно наоборот - снова включить звуковые карты на всех компах! А вот как сразу - не могу додуматься....

Через удалённый реестр - можно?!

Скрипт не помешал бы

А вот через "Подключиться к другому компьютеру" щас буду пробовать привелигированным эккаунтом.

спасибо!

блин, Петя, не получается удалённо через Диспетчер устройств, ругается что режим только для чтения стоит... даже под моим админским эккаунтом.

ребята, подскажите как через удалённый реестр звуковую карту за(раз)блокировать?!

[Petya V4sechkin]

домен, компов около 100, хотелось бы чтобы всем сразу убрать\восстановить звуковую карту

Берем DevCon.exe (там нужно распаковать из архива).

Дальше, создаем вспомогательный скрипт SoundDeviceID.vbs

Код:

strComputer = "."
Set objWMIService = GetObject( _
    "winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery( _
    "Select DeviceID from Win32_SoundDevice")
For Each objItem in colItems
    WScript.Echo Left(objItem.DeviceID, InStrRev(objItem.DeviceID, "\") - 1)
Next

и основной батник SoundDeviceStatus.cmd

Код:

@Echo Off
SetLocal EnableExtensions

For /F "Delims=" %%I In ('CScript /Nologo "%~dp0SoundDeviceID.vbs"') Do (
  If /I "%1"=="Enable" (
    "%~dp0DevCon.exe" Enable "%%I"
  ) Else (
    If /I "%1"=="Disable" (
      "%~dp0DevCon.exe" Disable "%%I"
    ) Else (
      "%~dp0DevCon.exe" Status "%%I"
    )
  )
)

Сохраняем эти три файла (devcon.exe, SoundDeviceID.vbs, SoundDeviceStatus.cmd) в одну папку. Можно выполнять доменной политикой (Конфигурация компьютера -> Конфигурация Windows -> Сценарии).

Синтаксис:

Код:

SoundDeviceStatus.cmd Enable

Код:

SoundDeviceStatus.cmd Disable

(первый вариант - включить, второй - отключить).

отключи службу Windows Audio

Действительно, так будет проще (в доменной политике задать тип запуска службы).

[Kyzylorda_Gabit]

спасибо за ответ, но я не всё понял....

куда ставить последние синтаксисы Enable и Disable?!

и ещё, можно ли тупо по одному удалённо делать - указал имя машинки в консоли и вперёд?!

плиз, напиши чайнику ОЧЕНЬ доходчиво.. я в программировании - минус Ноль

[Petya V4sechkin]

куда ставить последние синтаксисы Enable и Disable?!

Когда в политике задаете скрипт автозагрузки:



Параметры сценария: Enable (или Disable).

и ещё, можно ли тупо по одному удалённо делать - указал имя машинки в консоли и вперёд?!

Если тупо по одному, придется переделать с PsExec (но я не вижу в этом смысла, ведь отключение/включение службы Windows Audio - самый простой вариант).

[Kyzylorda_Gabit]

Петя, спасибо большое за ответы, но вот копаться в политиках у нас не разрешат, да и не получится, админы выше есть!

плиз, брат, покажи как мне по ОДНОМУ можно удалённо управлять этим самым (раз)блокированием звука (а именно звуковой карты) с помощью PsExec.

В общем, дело обстоит так - мне нужно тихо "без шуму и пыли" ВКЛЮЧИТЬ обратно звуковые карты в диспетчере устройств, так как мы до этого многим (но не всем) заблокировали вручную, а теперь пошла команда "РАЗблокировать". Вот поэтому, чтобы не казаться дураками, хочу втихаря включить это устройство, ну и кто его знает, может потом опять скажут ЗАблокировать! Способ этот удалённый очень нужен.

спасибо.

[Petya V4sechkin]

Kyzylorda_Gabit, переделаем SoundDeviceID.vbs так:

Код:

If WScript.Arguments.Count = 0 Then
  strComputer = "."
Else
  strComputer = WScript.Arguments(0)
End If

Set objWMIService = GetObject( _
    "winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery( _
    "Select DeviceID from Win32_SoundDevice")
For Each objItem in colItems
    WScript.Echo Left(objItem.DeviceID, InStrRev(objItem.DeviceID, "\") - 1)
Next

Создаем EnableSoundDevice.cmd такой:

Код:

@Echo Off
SetLocal EnableExtensions

Set RemoteComp=имя_или_IP-адрес_удаленного компа
For /F "Delims=" %%I In ('CScript /Nologo SoundDeviceID.vbs %RemoteComp%') Do (
  PsExec.exe \\%RemoteComp% -c DevCon.exe Enable "%%I"
)

Меняем имя_или_IP-адрес_удаленного компа на нужное.

Записываем четыре файла (EnableSoundDevice.cmd, SoundDeviceID.vbs, devcon.exe, psexec.exe) в одну папку.
Запускаем EnableSoundDevice.cmd

[Kyzylorda_Gabit]

понял, спасибо, буду пробовать!