Что нового

[Реестр] 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,576
Репутация
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,664
Репутация
2,462
Re: [Реестр] HideDrive

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