Я хочу добавить раздел реестра (DWORD = 1) в HKEY_LOCAL_MACHINE \SYSTEM\CurrentControlSet\Control\StorageDevicePolicies
с использованием VBScript. Как я могу это сделать?
-1
2 ответа
4
Примером создания записи реестра будет:
Const HKEY_CURRENT_USER = &H80000001
strComputer = "."
Set objRegistry = GetObject("winmgmts:\\" & strComputer & "\root\default:StdRegProv")
strKeyPath = "SOFTWARE\Script Center"
strValueName = "My DWORD Value"
dwValue = 13
objRegistry.SetDWORDValue HKEY_CURRENT_USER, strKeyPath, strValueName, dwValue
где цели могут быть изменены в соответствии с вашими потребностями.
0
Некоторые примеры:
Пример 1. Установите флажок реестра для отображения скрытых и системных файлов в проводнике Windows:
Set WshShell = CreateObject("WScript.Shell")
myKey = "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\Hidden"
WshShell.RegWrite myKey,1,"REG_DWORD"
Set WshShell = Nothing
Пример 2. Установите флаг реестра, чтобы скрыть скрытые и системные файлы в проводнике Windows (по умолчанию):
Set WshShell = CreateObject("WScript.Shell")
myKey = "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\Hidden"
WshShell.RegWrite myKey,0,"REG_DWORD"
Set WshShell = Nothing
Пример 3. Создайте "значение по умолчанию" в KCU\KeyName\
Примечание. Конечная косая черта обязательна:
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.RegWrite "HKCU\KeyName\","", "REG_SZ"
Set WshShell = Nothing
Кредит http://ss64.com