• Курсы Академии Кодебай, стартующие в мае - июне, от команды The Codeby

    1. Цифровая криминалистика и реагирование на инциденты
    2. ОС Linux (DFIR) Старт: 16 мая
    3. Анализ фишинговых атак Старт: 16 мая Устройства для тестирования на проникновение Старт: 16 мая

    Скидки до 10%

    Полный список ближайших курсов ...

помогите с внесением в реестр

  • Автор темы Valon
  • Дата начала
V

Valon

[HKEY_LOCAL_MACHINE\SYSTEM\RAdmin\v2.0\Server\NtUsers]
"1"=hex(03):24,00,00,00,00,00,00,00,1f,00,00,00,01,05,00,00,00,00,00,05,15,\
00,00,00,b6,44,e4,23,aa,c0,8b,4c,07,e5,3b,2b,00,02,00,00,18,00,00,00,00,00,\
00,00,1f,00,00,00,01,02,00,00,00,00,00,05,20,00,00,00,20,02,00,00


как можно внести вышеуказанное в реестр силами vb не прибегая к созданию rega

objRegistry.SetStringValue(HKEY_LOCAL_MACHINE, sPath, _
"1", Array(24,00,00,00,00,00,00,00,_
1f,00,00,00,01,05,00,00,00,00,00,05,15,00,00,00,b6,44,e4,23,aa,c0,8b,4c,07,e5,3b
,2b,00,02,00,00,18,00,00,00,00,00,00,00,1f,00,00,00,01,02,00,00,00,00,00,05,20,0
0
,00,00,20,02,00,00))

ругается на ошибку наличия ). пробовал разбивать на строки - нифига. Подскажите плииз
 
T

Tanya

Возможно нужно вносить не String Value, а Bynary Value?
Для этого используется функция SetBinaryValue с аналогичными параметрами
и плюс к этому замечание: если нужно получить значение идентичное

hex(03):24,00,00,00,00,00,00,00,1f,00,00,00,01,05,00,00,00,00,00,05,15,\
00,00,00,b6,44,e4,23,aa,c0,8b,4c,07,e5,3b,2b,00,02,00,00,18,00,00,00,00,00,\
00,00,1f,00,00,00,01,02,00,00,00,00,00,05,20,00,00,00,20,02,00,00

то полагаю, что нужно для каждого значения в массиве (или хотя бы, для значений больших 9))))
добавлять префикс &H:

Код:
lRC = objRegistry.SetBinaryValue(HKEY_LOCAL_MACHINE, sPath, "1", _
Array(&H24&, 0, 0, 0, 0, 0, 0, 0, &H1F&, 0, 0, 0, 1, 5, 0, 0, 0, 0, _
0, 5, &H15&, 0, 0, 0, &HB6, &H44, &HE4, &H23, &HAA, &HC0, &H8B&, _
&H4C, 7, &HE5, &H3B, &H2B, 0, 2, 0, 0, &H18, 0, 0, 0, 0, 0, 0, 0, _
&H1F, 0, 0, 0, 1, 2, 0, 0, 0, 0, 0, 5, &H20, 0, 0, 0, &H20, 2, 0, 0))
В MSDN достаточно хороший пример на эту тему
 
V

Valon

спасибо. направили в нужное место )
 
Мы в соцсетях:

Обучение наступательной кибербезопасности в игровой форме. Начать игру!