Глянь на поделку M$ - SteadyState.msi (_ttp://www.microsoft.com/downloads/details.aspx?FamilyID=d077a52d-93e9-4b02-bd95-9d770ccdb431&DisplayLang=ru).
После логина для блокировки использую VBscript (файл бросаю в папку Автозагрузка):
Код:
On Error Resume Next
Set objShell = CreateObject("Wscript.Shell")
objShell.Run "%windir%\System32\rundll32.exe user32.dll,LockWorkStation"