Проверка блокировки компьютера

[Yashied]

Функция проверяет заблокирован ли компьютер (находится в режиме выбора пользователя) или нет. Возвращаемые значения:

0 - не заблокирован
1 - заблокирован

Global Const $DESKTOP_SWITCHDESKTOP = 0x0100

Func _IsWorkstationLocked()

	Local $Result = False

	$hDesktop = DllCall('user32.dll', 'hwnd', 'OpenDesktop', 'str', 'Default', 'int', 0, 'int', 0, 'int', $DESKTOP_SWITCHDESKTOP)
	If Not @error Then
		$Result = DllCall('user32.dll', 'int', 'SwitchDesktop', 'hwnd', $hDesktop[0])
		$Result = Not $Result[0]
		DllCall('user32.dll', 'int', 'CloseDesktop', 'hwnd', $hDesktop[0])
	EndIf
	Return $Result
EndFunc   ;==>_IsWorkstationLocked

 

[snoitaleR]

Yashied, у меня смежный вопрос...
Можно ли средствами AutoIt заблокировать рабочую станцию?
Команда Shutdown, вроде бы, этого не умеет делать...

 

[Yashied]

Yashied, у меня смежный вопрос...
Можно ли средствами AutoIt заблокировать рабочую станцию?
Команда Shutdown, вроде бы этого не умеет делать...

DllCall('user32.dll', 'int', 'LockWorkStation')

 

[snoitaleR]

Yashied, спасибо...

Опять плюсики не работают... :(

 

[zed_zedican]

Полезная информация. Заранее прошу прощения ,возможно, за глупый вопрос. У меня доменная политика блокирует ноутбук через 20 мин. не активности. Каким образом можно это предотвратить или средствами скрипта - разблокировать?

Заранее благодарю за совет.

 

[Medic84]

Вообще то такие вопросы задают в раздел для новичков. А здесь вопросы только по данной "полезняшке"

 

[Cornet]

Не знаю почему, возможно из-за Win10, но у меня данный код не всегда отрабатывает, пришлось добавить в него строчку

Func _IsWorkstationLocked()
	Local $Result = False
	$hDesktop = DllCall('user32.dll', 'hwnd', 'OpenDesktop', 'str', 'Default', 'int', 0, 'int', 0, 'int', 0x0100)
	If Not @error Then
		$Result = DllCall('user32.dll', 'int', 'SwitchDesktop', 'hwnd', $hDesktop[0])
		$Result = Not $Result[0]
		DllCall('user32.dll', 'int', 'CloseDesktop', 'hwnd', $hDesktop[0])
	EndIf
	If Not $Result And _ProcessGetName(WinGetProcess("[ACTIVE]")) = "LockApp.exe" Then $Result = 1
	Return $Result
EndFunc   ;==>_IsWorkstationLocked