#region ### START Koda GUI section ### Form=D:\Архив\AutoIt\Отключение автозапуска\Form1.kxf
$Form1 = GUICreate($full_name, 423, 267, 315, 173)
$StatusBar1 = _GUICtrlStatusBar_Create($Form1, -1, "Запуск")
$Admin_s = GUICtrlCreateLabel($Admin_ch, 350, 3, 80, 17)
GUICtrlSetTip(-1, "Является ли пользователь администратором")
GUICtrlSetColor(-1, 0x8F8F8F)
GUICtrlSetFont(-1, 8)
Dim $hParent_GUI, $nMainMenu, $nAbout_MenuItem, $aAccelKeys
Dim $sTitle, $sScrollText, $sMainLabel, $sCopyRLabel, $nLinkColor, $nBkColor, $aHyperLinks[4]
$nMainMenu_File = GUICtrlCreateMenu("Файл")
$nFile_MenuItem = GUICtrlCreateMenuItem("Выход", $nMainMenu_File)
$nMainMenu = GUICtrlCreateMenu("Помощь")
$nHepl_MenuItem_update = GUICtrlCreateMenuItem("Проверить обновления", $nMainMenu)
$separator1 = GUICtrlCreateMenuItem("", $nMainMenu) ; create a separator line
$nAbout_MenuItem = GUICtrlCreateMenuItem("О программе... (F1)", $nMainMenu)
Dim $aAccelKeys[1][2] = [["{F1}", $nAbout_MenuItem]]
GUISetAccelerators($aAccelKeys, $Form1)
$Tab1 = GUICtrlCreateTab(0, 0, 417, 25)
$TabSheet1 = GUICtrlCreateTabItem("HKLM")
GUICtrlSetTip(-1, "Вкладка отвечает за раздел реестра HKEY_LOCAL_MACHINE. Доступен администраторам")
$Button1_HKLM = GUICtrlCreateButton("Запустить", 168, 192, 65, 33)
$Button_ALL_HKLM = GUICtrlCreateButton("Выделить всё", 40, 200, 75, 25)
$Button_update_HKLM = GUICtrlCreateButton("Обновить", 296, 200, 75, 25)
$Checkbox1_HKLM = GUICtrlCreateCheckbox("Отключение автоматического запуска для дисков неизвестного типа", 8, 24, 401, 17)
$Checkbox2_HKLM = GUICtrlCreateCheckbox("Отключение автоматического запуска для съемных носителей", 8, 40, 401, 17)
$Checkbox3_HKLM = GUICtrlCreateCheckbox("Отключение автоматического запуска для несъемных дисков", 8, 56, 401, 17)
$Checkbox4_HKLM = GUICtrlCreateCheckbox("Отключение автоматического запуска для сетевых дисков", 8, 72, 401, 17)
$Checkbox5_HKLM = GUICtrlCreateCheckbox("Отключение автоматического запуска для компакт-дисков", 8, 88, 401, 17)
$Checkbox6_HKLM = GUICtrlCreateCheckbox("Отключение автоматического запуска для электронных дисков", 8, 104, 401, 17)
$Checkbox7_HKLM = GUICtrlCreateCheckbox("Поставить обновление автозапуска от Microsoft (KB967715 | KB950582)", 8, 120, 401, 17)
GUICtrlSetTip(-1, "Без этого обновления отключить функции автозапуска для сетевого диска невозможно. Кроме того, контекстное меню и функция двойного щелчка автозапуска не были бы отключены даже при выполнении указанных ранее инструкций")
$Checkbox8_HKLM = GUICtrlCreateCheckbox("Поставить обновление автозапуска от Microsoft (KB971029)", 8, 136, 401, 17)
GUICtrlSetTip(-1, "Отключает AutoRun на внешних накопителях и оставляет его только на CD и DVD дисках")
$Checkbox9_HKLM = GUICtrlCreateCheckbox("Восстановление значения по умолчанию автоматического запуска", 8, 152, 401, 17)
$Checkbox_Off_all_HKLM = GUICtrlCreateCheckbox("Отключение автоматического запуска для дисков всех типов", 8, 168, 401, 17)
GUICtrlSetBkColor($Checkbox1_HKLM, $GUI_BKCOLOR_TRANSPARENT)
GUICtrlSetBkColor($Checkbox2_HKLM, $GUI_BKCOLOR_TRANSPARENT)
GUICtrlSetBkColor($Checkbox3_HKLM, $GUI_BKCOLOR_TRANSPARENT)
GUICtrlSetBkColor($Checkbox4_HKLM, $GUI_BKCOLOR_TRANSPARENT)
GUICtrlSetBkColor($Checkbox5_HKLM, $GUI_BKCOLOR_TRANSPARENT)
GUICtrlSetBkColor($Checkbox6_HKLM, $GUI_BKCOLOR_TRANSPARENT)
GUICtrlSetBkColor($Checkbox7_HKLM, $GUI_BKCOLOR_TRANSPARENT)
GUICtrlSetBkColor($Checkbox8_HKLM, $GUI_BKCOLOR_TRANSPARENT)
GUICtrlSetBkColor($Checkbox9_HKLM, $GUI_BKCOLOR_TRANSPARENT)
GUICtrlSetBkColor($Checkbox_Off_all_HKLM, $GUI_BKCOLOR_TRANSPARENT)
$TabSheet2 = GUICtrlCreateTabItem("HKCU")
GUICtrlSetTip(-1, "Вкладка отвечает за раздел реестра HKEY_CURRENT_USER")
$Button1_HKCU = GUICtrlCreateButton("Запустить", 168, 192, 65, 33)
$Button_ALL_HKCU = GUICtrlCreateButton("Выделить всё", 40, 200, 75, 25)
$Button_update_HKCU = GUICtrlCreateButton("Обновить", 296, 200, 75, 25)
$Checkbox1_HKCU = GUICtrlCreateCheckbox("Отключение автоматического запуска для дисков неизвестного типа", 8, 24, 401, 17)
$Checkbox2_HKCU = GUICtrlCreateCheckbox("Отключение автоматического запуска для съемных носителей", 8, 40, 401, 17)
$Checkbox3_HKCU = GUICtrlCreateCheckbox("Отключение автоматического запуска для несъемных дисков", 8, 56, 401, 17)
$Checkbox4_HKCU = GUICtrlCreateCheckbox("Отключение автоматического запуска для сетевых дисков", 8, 72, 401, 17)
$Checkbox5_HKCU = GUICtrlCreateCheckbox("Отключение автоматического запуска для компакт-дисков", 8, 88, 401, 17)
$Checkbox6_HKCU = GUICtrlCreateCheckbox("Отключение автоматического запуска для электронных дисков", 8, 104, 401, 17)
$Checkbox7_HKCU = GUICtrlCreateCheckbox("Восстановление значения по умолчанию автоматического запуска", 8, 120, 401, 17)
$Checkbox_Off_all_HKCU = GUICtrlCreateCheckbox("Отключение автоматического запуска для дисков всех типов", 8, 136, 401, 17)
GUICtrlSetBkColor($Checkbox1_HKCU, $GUI_BKCOLOR_TRANSPARENT)
GUICtrlSetBkColor($Checkbox2_HKCU, $GUI_BKCOLOR_TRANSPARENT)
GUICtrlSetBkColor($Checkbox3_HKCU, $GUI_BKCOLOR_TRANSPARENT)
GUICtrlSetBkColor($Checkbox4_HKCU, $GUI_BKCOLOR_TRANSPARENT)
GUICtrlSetBkColor($Checkbox5_HKCU, $GUI_BKCOLOR_TRANSPARENT)
GUICtrlSetBkColor($Checkbox6_HKCU, $GUI_BKCOLOR_TRANSPARENT)
GUICtrlSetBkColor($Checkbox7_HKCU, $GUI_BKCOLOR_TRANSPARENT)
GUICtrlSetBkColor($Checkbox_Off_all_HKCU, $GUI_BKCOLOR_TRANSPARENT)
$TabSheet4 = GUICtrlCreateTabItem("Запрет носителей")
GUICtrlSetTip(-1, "Отключение Floppy / CD/DVD / USB")
$Button1_st = GUICtrlCreateButton("Запустить", 168, 192, 65, 33)
$Button_ALL_st = GUICtrlCreateButton("Выделить всё", 40, 200, 75, 25)
$Button_update_st = GUICtrlCreateButton("Обновить", 296, 200, 75, 25)
$cdrom = GUICtrlCreateCheckbox("Отключение CD/DVD привода", 8, 24, 401, 17)
$floppy = GUICtrlCreateCheckbox("Отключение дисковода (floppy)", 8, 40, 401, 17)
$usbst = GUICtrlCreateCheckbox("Отключение USB накопителей", 8, 56, 401, 17)
;$Checkbox_Off_all_st = GUICtrlCreateCheckbox("Отключить все переносимые носители", 8, 136, 401, 17)
GUICtrlSetBkColor($cdrom, $GUI_BKCOLOR_TRANSPARENT)
GUICtrlSetBkColor($floppy, $GUI_BKCOLOR_TRANSPARENT)
GUICtrlSetBkColor($usbst, $GUI_BKCOLOR_TRANSPARENT)
$TabSheet3 = GUICtrlCreateTabItem("Защита USB / HDD")
GUICtrlSetTip(-1, "Создание на флешке папки autorun.inf, которая удаляется нестандартным способом")
$Group1 = GUICtrlCreateGroup(" Сделать autorun.inf ", 8, 32, 393, 81)
$Button1 = GUICtrlCreateButton("Запуск", 344, 56, 49, 25)
$Combo1 = GUICtrlCreateCombo("", 24, 56, 161, 25, BitOR($GUI_SS_DEFAULT_COMBO, $CBS_SIMPLE, $CBS_AUTOHSCROLL))
$Checkbox1_UH = GUICtrlCreateCheckbox("Все USB | HDD", 216, 56, 97, 25)
GUICtrlSetTip(-1, "На всех жёстких дисках и флешках создать папку autorun.inf")
$Group2 = GUICtrlCreateGroup(" Убрать autorun.inf ", 8, 136, 393, 81)
$Button2 = GUICtrlCreateButton("Запуск", 344, 160, 49, 25)
$Combo2 = GUICtrlCreateCombo("", 24, 160, 161, 25, BitOR($GUI_SS_DEFAULT_COMBO, $CBS_SIMPLE, $CBS_AUTOHSCROLL))
$Checkbox2_UH = GUICtrlCreateCheckbox("Все USB | HDD", 216, 160, 97, 25)
GUICtrlSetTip(-1, "На всех жёстких дисках и флешках убрать папку autorun.inf, созданной этой программой")
GUICtrlSetBkColor($Checkbox1_UH, $GUI_BKCOLOR_TRANSPARENT)
GUICtrlSetBkColor($Checkbox2_UH, $GUI_BKCOLOR_TRANSPARENT)
GUICtrlCreateTabItem("")
GUISetState(@SW_SHOW)
#endregion ### END Koda GUI section ###$avArray = _ArrayCreate("")