![]() |
|
| Правила Форума редакция от 22.06.2020 |
|
|||||||
|
|
Окажите посильную поддержку, мы очень надеемся на вас. Реквизиты для переводов ниже. |
|
![]() |
|
|
Опции темы | Опции просмотра |
Language
|
|
|
#1
|
|
Доброго времени суток
![]() Такая ситуация, есть контроллер домена на базе MS Windows Server 2003+клиентские компьютеры на базе MS Windows XP Pro. Нужно сделать так, чтобы после ввода логина\пароля, у пользователя сразу выводилось окно с текстовой информацией и две пимпы, типа "Да" и "Нет". И терь главное, чтобы пользователя не пускало в систему, пока он не нажмет "Да". Как это можно реализовать? В какую сторону смотреть?
__________________
Цена тебе - твое слово! |
|
|
|
|
| Реклама: |
|
|
#2
|
|
Постоялец
![]() ![]() Пол:
Регистрация: 11.04.2007
Сообщений: 285
Репутация: 85
|
Тебе с этим вопросом поможет простенький скрипт (VBS, JS, etc.) и групповые политики при логоне.
Например скриптик на vbs --------------------------------------------------------------------- Set objShell = CreateObject("WScript.Shell") answer = MsgBox("welcome",vbYesNo,"TramPamPam") If answer = 6 Then WScript.Echo("Welcome To hell") If answer = 7 Then objShell.run("logoff") --------------------------------------------------------------------- Комменты писать небуду, т.к. скрипт очень простой думаю понять его не трудно и без них. |
|
|
|
| Сказали спасибо: |
|
|
#3
|
|
Еще можешь подсказать что дописать, чтобы експлоер не грузился пока не нажата кнопка "Да" и чтобы сценарий был поверх остальных окон? В групповых политиках включил Синхронное выполнение сценариев и отключил Асинхрнное выполнение сценариев. При логине, все равно експлоер грузится.
__________________
Цена тебе - твое слово! |
|
|
|
|
|
|
#4
|
|
Постоялец
![]() ![]() Пол:
Регистрация: 11.04.2007
Сообщений: 285
Репутация: 85
|
с ходу пришло в голову только это..
-------------------------------------- Set objShell = CreateObject("WScript.Shell") Do While answer <> 6 objShell.Run("taskkill /F /IM explorer.exe") answer = MsgBox("welcome",vbYesNo,"TramPamPam") If answer = 6 Then WScript.Echo("Welcome To hell") objShell.Run("explorer.exe") WScript.Quit End If If answer = 7 Then 'objShell.run("logoff") WScript.Quit End If Loop -------------------------------------------- |
|
|
|
![]() |
Похожие темы
|
||||
| Тема | Автор | Раздел | Ответов | Последнее сообщение |
| Пропал автовостановитель яркости монитора при входе в систему | КириллK | Скорая помощь | 3 | 11.01.2010 20:04 |
| Вход пользователя в систему | Antontrial | Microsoft Windows | 17 | 28.04.2008 11:04 |
| Пароль при входе в систему | AlexeyVik | Архив | 3 | 17.03.2008 12:43 |
| Пароль при входе в систему | pasha__ | Архив | 6 | 29.11.2006 14:35 |
|
|