Что нового

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

Guezt

Продвинутый
Сообщения
335
Репутация
81
AutoIt: 3.3.0.0
Версия: 2.1
Категория: Администратирование
Описание: Утилита блокирует доступ к выбранным дискам либо вообще скрывает их + возможность вклвыкл автозапуска с USB накопителей.
Код: смотрите "Прикреплённые файлы:"
Screenshot:
Источник: http://www.mindconnection.com/library/cheaptricks/hidedrive.htm
Автор(ы): Guezt Gutsy


Добавлено:
Сообщение автоматически объединено:


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

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

Medic84

Омега
Команда форума
Администратор
Сообщения
1 574
Репутация
335
Re: [Реестр] HideDrive

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

FlatX007

Tattoo!
Сообщения
197
Репутация
35
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
 
Автор
G

Guezt

Продвинутый
Сообщения
335
Репутация
81
Re: [Реестр] HideDrive

Medic84 сказал(а):
А ведь GUI окно можно было сделать в разы меньше :smile:
Одним Combo и двумя Checkbox ;)
USBProtect - Блокировка USB устройств

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

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

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


Добавлено:
Сообщение автоматически объединено:

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

CreatoR

Must AutoIt!
Команда форума
Администратор
Сообщения
8 472
Репутация
2 401
Re: [Реестр] HideDrive

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