[Реестр] HideDrive утилита скрытия и запрета доступа к дискам в системе.

[Guezt]

AutoIt: 3.3.0.0
Версия: 2.1
Категория: Администратирование
Описание: Утилита блокирует доступ к выбранным дискам либо вообще скрывает их + возможность вклвыкл автозапуска с USB накопителей.
Код: смотрите "Прикреплённые файлы:"
Screenshot:

Спойлер

Источник: http://www.mindconnection.com/library/cheaptricks/hidedrive.htm
Автор(ы): Guezt Gutsy


Добавлено:

Сообщение автоматически объединено: 25 Авг 2010

Код слишком большой пол часа бился всё пишет ошибку "мол вы оставили сообщение пустым" так что код в прикрепленных файлах.

p.s. Запретить использование работает не на всех материнских платах + если usb через PCI порт каким то образом установлен как дополнительные порты например тоже. Все вопросы не ко мне это всё Microsoft )))

 

[Medic84]

Re: [Реестр] HideDrive

А ведь GUI окно можно было сделать в разы меньше
Одним Combo и двумя Checkbox ;)

 

[FlatX007]

Re: [Реестр] HideDrive

Что то много букФ, для такой простой задачи ... всё это можно урезать раз в 7 =)

Спойлер

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Dim $aDrive[23] = ['A', 'B', 'C', 'D', 'E', 'F', 'G', 'H', 'I', 'K', 'L', 'M', 'N', 'O', 'P', 'Q', 'R', 'S', 'T', 'V', 'X', 'Y', 'Z']
Dim $aCheckbox[UBound($aDrive)]

$Form1 = GUICreate("", 181, 732, 403, 134)
_CreateCheckbox()
GUISetState(@SW_SHOW)

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit

	EndSwitch
WEnd

Func _CreateCheckbox()
	For $i = 0 To UBound($aDrive) - 1
		$aCheckbox[$i] = GUICtrlCreateCheckbox('Drive - ' & $aDrive[$i], 10, 20 * $i, 97, 17)
	Next
EndFunc   ;==>_CreateCheckbox

 

[Guezt]

Re: [Реестр] HideDrive

А ведь GUI окно можно было сделать в разы меньше
Одним Combo и двумя Checkbox ;)

USBProtect - Блокировка USB устройств

В этой теме писал почему так )))

http://autoit-script.ru/index.php/topic,2536.msg18417.html#msg18417

можете сколько угодно глумиться я всё равно вперед вас это сделал авансом


Добавлено:

Сообщение автоматически объединено: 25 Авг 2010

Ну а если серьезно, со своей задачей утилита справляется, да я и не мастер GUI ( в основном все скрипты на HotKey пишу ). Источник есть можете написать совю утилиту используя свой алгоритм Если обратите внимание то это было давно еще при версии 3.3.0.0 тогда я в AutoIT был полный чайник это я сейчас чуть-чуть самовар ;D

 

[CreatoR]

Re: [Реестр] HideDrive

Guezt
Название темы не содержательное. Переименуй пожалуйста.