информационная безопасность
без паники и всерьез
 подробно о проекте 		Spanning Tree Protocol: недокументированное применениеСетевые кракеры и правда о деле ЛевинаАтака на Internet
BugTraq.Ru
 Русский BugTraq
 Анализ криптографических сетевых... 
 Модель надежности двухузлового... 
 Специальные марковские модели надежности... 
 Мощные индийские ключи 
 Срочные патчи для критических уязвимостей... 
 Очередной рекордный патч Microsoft 
главная обзор RSN блог библиотека закон бред форум dnet о проекте
bugtraq.ru / форум / programming
Имя Пароль
ФОРУМ
если вы видите этот текст, отключите в настройках форума использование JavaScript
регистрация





Легенда:
  новое сообщение
  закрытая нитка
  новое сообщение
  в закрытой нитке
  старое сообщение
  • Напоминаю, что масса вопросов по функционированию форума снимается после прочтения его описания.
  • Новичкам также крайне полезно ознакомиться с данным документом.
Пример работы с реестром на VBScript 11.02.06 12:47  Число просмотров: 6221
Автор: jiZo <Александр> Статус: Member
<"чистая" ссылка>
Пример работы с реестром на VBScript
set WSHShell = WScript.CreateObject("WScript.Shell")
WSHShell.Popup "Создаем раздел"
WSHShell.RegWrite "HKCU\\MyRegKey\\", "Primer"
WSHShell.Popup "Создаем строковый параметр"
WSHShell.RegWrite "HKCU\\MyRegKey\\String", 1
WSHShell.Popup "Создаем параметр DWORD"
WSHShell.RegWrite "HKCU\\MyRegKey\\DWORD", 2, "REG_DWORD"
WSHShell.Popup "Создаем двоичный параметр"
WSHShell.RegWrite "HKCU\\MyRegKey\\Binary", 3, "REG_BINARY"
WSHShell.Popup "Удаляем все параметры"
WSHShell.RegDelete "HKCU\\MyRegKey\\String"
WSHShell.RegDelete "HKCU\\MyRegKey\\DWORD"
WSHShell.RegDelete "HKCU\\MyRegKey\\Binary"
WSHShell.Popup "Удаляем раздел"
WSHShell.RegDelete "HKCU\\MyRegKey\\"

20 секунд, в любом из поисковиков
<programming>
[VBScript] Добавление записи в реестр... 11.02.06 10:59  
Автор: Dpak0n4ik <Тимур Гладких> Статус: Member
<"чистая" ссылка>
Не получается создать ветку в разделе HKCU и создать там несколько string ключей со значениями...
Пробовал так:

on error resume next
Set WSHShell = CreateObject("WScript.Shell")

strval="HKEY_CURRENT_USER\Control Panel\<some key>"
WSHShell.RegWrite strval, "SomeString", "1"
Вот то, что нужно (может кому пригодится): 13.02.06 09:57  
Автор: Dpak0n4ik <Тимур Гладких> Статус: Member
<"чистая" ссылка>
Вот то, что нужно (может кому пригодится):
strKeyPath = "SOFTWARE\System Admin Scripting Guide"
oReg.CreateKey HKEY_LOCAL_MACHINE,strKeyPath
Пример работы с реестром на VBScript 11.02.06 12:47  
Автор: jiZo <Александр> Статус: Member
<"чистая" ссылка>
Пример работы с реестром на VBScript
set WSHShell = WScript.CreateObject("WScript.Shell")
WSHShell.Popup "Создаем раздел"
WSHShell.RegWrite "HKCU\\MyRegKey\\", "Primer"
WSHShell.Popup "Создаем строковый параметр"
WSHShell.RegWrite "HKCU\\MyRegKey\\String", 1
WSHShell.Popup "Создаем параметр DWORD"
WSHShell.RegWrite "HKCU\\MyRegKey\\DWORD", 2, "REG_DWORD"
WSHShell.Popup "Создаем двоичный параметр"
WSHShell.RegWrite "HKCU\\MyRegKey\\Binary", 3, "REG_BINARY"
WSHShell.Popup "Удаляем все параметры"
WSHShell.RegDelete "HKCU\\MyRegKey\\String"
WSHShell.RegDelete "HKCU\\MyRegKey\\DWORD"
WSHShell.RegDelete "HKCU\\MyRegKey\\Binary"
WSHShell.Popup "Удаляем раздел"
WSHShell.RegDelete "HKCU\\MyRegKey\\"

20 секунд, в любом из поисковиков
Это точно - всего один запрос. 13.02.06 09:53  
Автор: Dpak0n4ik <Тимур Гладких> Статус: Member
<"чистая" ссылка>
> Пример работы с реестром на VBScript
> set WSHShell = WScript.CreateObject("WScript.Shell")
> WSHShell.Popup "Создаем раздел"
> WSHShell.RegWrite "HKCU\\MyRegKey\\", "Primer"
> WSHShell.Popup "Создаем строковый параметр"
> WSHShell.RegWrite "HKCU\\MyRegKey\\String", 1
> WSHShell.Popup "Создаем параметр DWORD"
> WSHShell.RegWrite "HKCU\\MyRegKey\\DWORD", 2, "REG_DWORD"
> WSHShell.Popup "Создаем двоичный параметр"
> WSHShell.RegWrite "HKCU\\MyRegKey\\Binary", 3, "REG_BINARY"
> WSHShell.Popup "Удаляем все параметры"
> WSHShell.RegDelete "HKCU\\MyRegKey\\String"
> WSHShell.RegDelete "HKCU\\MyRegKey\\DWORD"
> WSHShell.RegDelete "HKCU\\MyRegKey\\Binary"
> WSHShell.Popup "Удаляем раздел"
> WSHShell.RegDelete "HKCU\\MyRegKey\\"
>
> 20 секунд, в любом из поисковиков
Это точно - всего один запрос.
Правда этот скрипт не работает:)
Всё прекрасно работает если чуть подправить :) 14.02.06 00:35  
Автор: jiZo <Александр> Статус: Member
Отредактировано 14.02.06 00:36  Количество правок: 1
<"чистая" ссылка>
> Правда этот скрипт не работает:)

Всё прекрасно работает если чуть подправить, несущественно

set WSHShell = WScript.CreateObject("WScript.Shell")
WSHShell.Popup "Создаем раздел"
WSHShell.RegWrite "HKCU\MyRegKey\", "Primer"
WSHShell.Popup "Создаем строковый параметр"
WSHShell.RegWrite "HKCU\MyRegKey\String1", 1
WSHShell.Popup "Создаем параметр DWORD"
WSHShell.RegWrite "HKCU\MyRegKey\DWORD1", 2, "REG_DWORD"
WSHShell.Popup "Создаем двоичный параметр"
WSHShell.RegWrite "HKCU\MyRegKey\Binary1", 3, "REG_BINARY"
WSHShell.Popup "Удаляем все параметры"
WSHShell.RegDelete "HKCU\MyRegKey\String1"
WSHShell.RegDelete "HKCU\MyRegKey\DWORD1"
WSHShell.RegDelete "HKCU\MyRegKey\Binary1"
WSHShell.Popup "Удаляем раздел"
WSHShell.RegDelete "HKCU\MyRegKey\"
1


Рейтинг@Mail.ru


  Copyright © 2001-2026 Dmitry Leonov   Page build time: 0 s   Design: Vadim Derkach