Изменение данных реестра
Класс поставщика системного реестраStdRegProv для WMI содержит методы, которые выполняют следующие действия:
Создание или удаление разделов реестра.
Создание или удаление именованных значений, которые называются записями, когда они находятся под ключами.
Используйте имя нового значения и SetBinaryValue, SetDWORDValue, SetExpandedStringValue, SetMultiStringValue или SetStringValue для создания именованного значения. Используйте DeleteValue для удаления именованного значения.
Изменение именованных значений.
Используйте имя значения и методы Set (указанные в предыдущем маркированных элементах), чтобы изменить существующие именованные значения под ключом. Чтобы изменить его, необходимо знать имя значения. Если вы не знаете имена значений в ключе, используйте метод EnumValues для получения имен.
В этой статье рассматриваются следующие разделы:
- Создание раздела реестра с помощью VBScript
- Создание именованного значения реестра с помощью PowerShell и VBScript
Создание раздела реестра с помощью VBScript
Так как реестр является центральной базой данных конфигурации для операционной системы, приложений и служб, соблюдайте осторожность при записи изменений в значения реестра или удалении разделов.
Примечание
Вы не можете отслеживать подраздел HKEY_CLASSES_ROOTHKEY_CURRENT_USER(HKCU). Мониторинг HKEY_USERS не рекомендуется, так как подразделы отображаются и исчезают при загрузке кустов.
В следующих примерах кода показано, как создать раздел реестра и подраздел .
HKEY_LOCAL_MACHINE = &H80000002
strComputer = "."
Set ObjRegistry = GetObject("winmgmts:{impersonationLevel = impersonate}!\\" & strComputer & "\root\default:StdRegProv")
strPath = "SOFTWARE\MyKey\MySubKey"
Return = objRegistry.CreateKey(HKEY_LOCAL_MACHINE, strPath)
If Return <> 0 Then
WScript.Echo "The operation failed." & Err.Number
WScript.Quit
Else
wScript.Echo "New registry key created" & VBCRLF & "HKLM\SOFTWARE\MYKey\"
End If
$HKEY_LOCAL_MACHINE = 2147483650
$strComputer = "."
$strPath = "SOFTWARE\MyKey\MySubKey"
$reg = [wmiclass]"\\$strComputer\root\default:StdRegprov"
[void]$reg.CreateKey($HKEY_LOCAL_MACHINE, $strPath)
Создание именованного значения реестра с помощью PowerShell и VBScript
В следующем примере кода показано, как создать именованное значение с именем MultiStringValue вразделеmySubKeyHKEY_LOCAL_MACHINE\SOFTWARE\\, который создает предыдущий скрипт. Скрипт вызывает StdRegProv.SetMultiStringValue для записи строковых значений в новое именованное значение.
const HKEY_LOCAL_MACHINE = &H80000002
strComputer = "."
Set objRegistry = _
GetObject("winmgmts:{impersonationLevel=impersonate}!\\" _
& strComputer & "\root\default:StdRegProv")
strKeyPath = "SOFTWARE\MyKey\MySubKey"
strValueName = "MultiStringValue"
arrStringValues = Array("one", "two","three", "four")
objRegistry.SetMultiStringValue HKEY_LOCAL_MACHINE, strKeyPath,_
strValueName, arrStringValues
' Read the values that were just written
objRegistry.GetMultiStringValue HKEY_LOCAL_MACHINE, strKeyPath,_
strValueName, arrStringValues
For Each strValue in arrStringValues
WScript.Echo strValue
Next
$HKEY_LOCAL_MACHINE = 2147483650
$strComputer = "."
$strPath = "SOFTWARE\MyKey\MySubKey"
$strValueName = "MultiStringValue"
$arrStringValues = @("one", "two","three", "four")
$reg = [wmiclass]"\\$strComputer\root\default:StdRegprov"
[void]$reg.SetMultiStringValue($HKEY_LOCAL_MACHINE, $strKeyPath, $strValueName, $arrStringValues)
$multiValues = $reg.GetMultiStringValue($HKEY_LOCAL_MACHINE, $strKeyPath, $strValueName)
$multiValues.sValue
С помощью инструментария WMI невозможно настроить безопасность доступа для раздела реестра. Однако метод StdRegProv.CheckAccess сравнивает параметры безопасности текущего пользователя с дескриптором безопасности в разделе реестра, чтобы определить, имеет ли пользователь определенное разрешение, например KEY_SET_VALUE.