информационная безопасность
без паники и всерьез
 подробно о проектеRambler's Top100
Портрет посетителяГде водятся OGRы
BugTraq.Ru
Русский BugTraq
 Анализ криптографических сетевых... 
 Модель надежности двухузлового... 
 Специальные марковские модели надежности... 
 Бэкдор в xz/liblzma, предназначенный... 
 Три миллиона электронных замков... 
 Doom на газонокосилках 
главная обзор RSN блог библиотека закон бред форум dnet о проекте
bugtraq.ru / форум / programming
Имя Пароль
ФОРУМ
если вы видите этот текст, отключите в настройках форума использование JavaScript
регистрация





Легенда:
  новое сообщение
  закрытая нитка
  новое сообщение
  в закрытой нитке
  старое сообщение
  • Напоминаю, что масса вопросов по функционированию форума снимается после прочтения его описания.
  • Новичкам также крайне полезно ознакомиться с данным документом.
Вот то, что нужно (может кому пригодится): 13.02.06 09:57  Число просмотров: 2312
Автор: Dpak0n4ik <Тимур Гладких> Статус: Member
<"чистая" ссылка>
Вот то, что нужно (может кому пригодится):
strKeyPath = "SOFTWARE\System Admin Scripting Guide"
oReg.CreateKey HKEY_LOCAL_MACHINE,strKeyPath
<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




Rambler's Top100
Рейтинг@Mail.ru


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