Разное - создание и удаление параметров реестра по клику на чекбоксы

neo21 · Отправлено: **01:05, 30-12-2011** | #2

Можно сделать в Visual Basic 2010

Код:

Public Class Form1

    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        My.Computer.Registry.CurrentUser.CreateSubKey("Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\DisallowCpl")

        MsgBox("Раздел создан")
    End Sub

    Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click
        My.Computer.Registry.CurrentUser.DeleteSubKey(
    "Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\DisallowCpl")

        MsgBox("Раздел удален")
    End Sub

    
End Class

Кнопка запись -записывает раздел HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\DisallowCpl, кнопка удаление - удаляет раздел

ferget · Отправлено: **02:14, 30-12-2011** | #3

neo21, вообще-то требуется изменить значение в разделе, а не сам раздел

но учитывая

Цитата vzli_izv:

Делфи тяжеловато будет вспомнить. »

bat-файлы, в данном случае, лучший вариант

neo21 · Отправлено: **02:37, 30-12-2011** | #4

ferget, В VB это тоже не сложно сделать
Типичные операции с реестром (Visual Basic)
Задание значений:

Код:

My.Computer.Registry.SetValue("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\DisallowCpl",
          "Параметр", "Значение")

vzli_izv · Отправлено: **10:04, 30-12-2011** | #5

добавляю так
reg add "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\DisallowCpl" /v "1" /t REG_SZ /d "Брандмауэр Windows" /f >nul

а как удалить этот REG_SZ "1" "Брандмауэр Windows" без удаления раздела HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\DisallowCpl ?

хы...ток написал и тут же ответ нашёл ))
reg.exe delete "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\DisallowCpl" /v "1" /f
_____________________________________________________________

мде...очень всё не удобно получается...жаль не знаю Visual Basic
так бы я сделал ListBox с показом всех файлов в каталоге программы и по клику на названии просто запускал бы.
может кто сварганит такой запускатор? Form1+ListBox (с показом файлов в каталоге программы ) и кнопка удалить весь раздел
HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\DisallowCpl

а я бы батники сделал и получилась бы маленькая програмка, её тут выложить и пусть люди пользуются.

Iska · Отправлено: **14:01, 30-12-2011** | #6

vzli_izv, вообще-то данная программа уже давно существует. Существует она ещё со времён Windows 9x. В NT-версиях называется «Редактором групповой политики» (оснастка «gpedit.msc» — для локальной машины), например:

Использование редактора групповой политики для управления политикой локальных компьютеров в Windows XP
Параметры групповой политики для панели управления
Executing Control Panel Items
Панели управления Windows - кто тут главный? - № 04, 2003 | «Мир ПК» | Издательство «Открытые системы»

Если Вам покажется неудобным добавлять «ручками» канонические имена/имена модулей элементов панели управления — ничто не мешает написать и распространять свой собственный шаблон с уже готовыми списками имён. Детали создания собственного шаблона зависят от того, под какой ОС Вы планируете применять его.

neo21 · Отправлено: **20:26, 30-12-2011** | #7

Цитата vzli_izv:

может кто сварганит такой запускатор? Form1+ListBox (с показом файлов в каталоге программы ) »

Скиньте .bat файлы в папку files

Кнопка открыть фаил - открывает .bat файлы

Кнопка удалить раздел - удаляет раздел HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\DisallowCpl

для запуска программы установите Microsoft .NET Framework 4

vzli_izv · Отправлено: **06:58, 01-01-2012** | #8

neo21, благодарю!
и можно вопрос? тебе не жалко будет потратить 1 час времени (но тут зависит от твоих знаний) и вот в этой програмульке добавить пару нужностей?
есть пара интересных идей, на мой взгляд, но я не смогу их реализовать. к моему сожалению.

Delirium · Отправлено: **08:42, 01-01-2012** | #9

Цитата neo21:

для запуска программы установите Microsoft .NET Framework 4 »

А что, для этих опций обязательно 4 фреймворк? Наворачивать эту громадину ради такой задачи. Второго для этих целей более чем достаточно.

vzli_izv · Отправлено: **20:54, 01-01-2012** | #10

Цитата Delirium:

обязательно 4 фреймворк? »

не знаю у кого как а у меня фреймворк ставится по умолчанию, как кодеки, например.Начиная ещё с 1.1 и до 4.
Может просто у меня программ его требующих много, не могу сказать точно.