Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "WinAPI";
Текущий архив: 2004.07.11;
Скачать: [xml.tar.bz2];

Вниз

Проверка подлиности пароля и имя пользователя в домене!   Найти похожие ветки 

 
menart   (2004-05-24 17:44) [0]

Как можно проверить сабж в доменой сети? Т.е. пользователь вводит пароль, нужно проверить зарегистрирован ли он в системе и верен ли пароль, после чего предоставить или лишить право входа в программу?


 
Игорь Шевченко ©   (2004-05-24 17:59) [1]

Через SSPI


 
menart ©   (2004-05-24 19:18) [2]

А можно подсказать что это такое и с чем его едят? И буду черезвучайно признателен за небольшой примерчик...


 
Внук ©   (2004-05-25 09:13) [3]

Очень рекомендую сходить вот сюда.
http://www.rsdn.ru/article/qna/baseserv/winauth.xml
Если останутся вопросы - пиши :)


 
Morry ©   (2004-05-25 14:51) [4]

Если коротко то можно использовать
BOOL LogonUser(
 LPTSTR lpszUsername,
 LPTSTR lpszDomain,
 LPTSTR lpszPassword,
 DWORD dwLogonType,
 DWORD dwLogonProvider,
 PHANDLE phToken
);


 
Enter   (2004-05-25 15:10) [5]

Удалено модератором
Примечание: Offtopic


 
Внук ©   (2004-05-25 15:34) [6]

>>Morry ©   (25.05.04 14:51) [4]
 Можно, но этот способ обладает рядом существенных недостатков


 
Morry ©   (2004-05-25 16:12) [7]

>>Внук ©   (25.05.04 15:34) [6]

>>Morry ©   (25.05.04 14:51) [4]
>> Можно, но этот способ обладает рядом существенных недостатков

Да, уже прочитал на rsdn и проверил ;)
Кстати, чтобы не плодить ветки, вопрос в догонку. Можно ли полученный hToken установить для текущего процесса?


 
menart ©   (2004-05-25 17:37) [8]

я вроде немножко разобрался:

var
d: Thandle;
begin
if LogonUser(PChar(edit1.Text),PChar(edit2.Text),
PChar(maskedit1.Text),LOGON32_LOGON_NETWORK, LOGON32_PROVIDER_DEFAULT, d)
then showmessage("Угадал, негодник! ;)") else
showmessage("Неугадал, ха-ха-ха! ;(")
end;

но если не имеешь прав администратора в сети,
то проверить не получается, а как перевести SSPI
я не знаю...
взял из статьи
http://www.rsdn.ru/article/qna/baseserv/winauth.xml


 
Игорь Шевченко ©   (2004-05-25 22:17) [9]


> Можно ли полученный hToken установить для текущего процесса?


Нет.


 
Внук ©   (2004-05-26 09:53) [10]

>>menart ©   (25.05.04 17:37) [8]
 У меня есть перевод на Delphi с поддержкой Unicode, то есть понимает в том числе и русские имена\пароли. Правда, проверку гостевой учетной записи я выбросил оттуда. Могу выслать по почте.


 
menart ©   (2004-05-27 15:53) [11]


> Внук ©   (26.05.04 09:53) [10]
> >>menart ©   (25.05.04 17:37) [8]
>  У меня есть перевод на Delphi с поддержкой Unicode, то
> есть понимает в том числе и русские имена\пароли. Правда,
> проверку гостевой учетной записи я выбросил оттуда. Могу
> выслать по почте.


Буду очень признателен... Мой майл menart@rambler.ru?
вышли пожайлуста текст незапаковоной, а то у нас на работе закрыто скачивание файлов из нета


 
Внук ©   (2004-05-27 18:51) [12]

В смысле - без Attach"a? Могу, но там довольно много :) Вот кладовка не работает, беда прямо.


 
menart ©   (2004-05-27 19:12) [13]

у меня ящик 15 мегов, хорошо если бы в тексовом формате и расширением txt, лил кидай в zip"е я где нибудь стащу... Заранее очень признателен ...


 
Внук ©   (2004-05-28 11:17) [14]

>>menart ©   (27.05.04 19:12) [13]
Лови :)


 
menart ©   (2004-05-28 15:54) [15]


> Внук ©   (28.05.04 11:17) [14]

Премного благодарен, еще раз большое спасибо!


 
Внук ©   (2004-05-28 16:21) [16]

Да на здоровье :))



Страницы: 1 вся ветка

Форум: "WinAPI";
Текущий архив: 2004.07.11;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.48 MB
Время: 0.035 c
14-1088125196
Soft
2004-06-25 04:59
2004.07.11
Как вам такие ужастики? Стивен Кинг отдыхает...


3-1087306890
Piter
2004-06-15 17:41
2004.07.11
Выбор уникальных полей


1-1088372750
P@vel
2004-06-28 01:45
2004.07.11
Threads


1-1087985675
Aldor
2004-06-23 14:14
2004.07.11
Есть ли в паскале функция, аналогичная функции scanf?


4-1086003573
d1835
2004-05-31 15:39
2004.07.11
Check box





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский