Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.11.12;
Скачать: CL | DM;

Вниз

Авторизация TIdHTTPServer   Найти похожие ветки 

 
N   (2006-06-22 15:10) [0]

Подскажите, пожалуйста, как сделать авторизацию при обращении к серверу из IE.


 
N   (2006-06-22 15:28) [1]

В частности, интересует, как работать с ARequestInfo -> AuthUsername,  ARequestInfo -> AuthPassword. Неужели никто не знает? Очень надо...


 
Slym ©   (2006-06-23 08:48) [2]

N   (22.06.06 15:28) [1]
как работать с ARequestInfo -> AuthUsername,  ARequestInfo -> AuthPassword

сравнивать с чем нибудь и если сравнение не кроканало отправить клиенту сообщение с соответствующим кодом ошибки


 procedure AuthFailed;
 begin
   ResponseInfo.ContentText:="<html><head><title>Error</title></head><body><h1>Authentication failed</h1></body></html>";
   ResponseInfo.AuthRealm:="BST http server";
 end;
var AuthPassword,Path,FileName:string;
begin
 if not RequestInfo.AuthExists then
 begin
   AuthFailed;
   Exit;
 end;
 AuthPassword:=ServerHandles.ReadIniString("UserAuth",RequestInfo.AuthUsername,"" );
 if (AuthPassword="") or (AuthPassword<>RequestInfo.AuthPassword) then
 begin
   AuthFailed;
   exit;
 end;


 
N   (2006-06-23 10:10) [3]

Спасибо! Я, правда, это в обработчике OnCommandGet для IdHTTPServer делаю, там, оказывается достаточно просто:


  AuthPassword := ARequestInfo.AuthPassword;
  AuthUsername := ARequestInfo.AuthUsername;


У меня вот с этим AResponseInfo.AuthRealm непонятки были.



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

Текущий архив: 2006.11.12;
Скачать: CL | DM;

Наверх




Память: 0.44 MB
Время: 0.048 c
2-1161782928
vitv
2006-10-25 17:28
2006.11.12
lookup в гриде


2-1161950690
Despo
2006-10-27 16:04
2006.11.12
Использование "..."


2-1162061766
PitTong
2006-10-28 22:56
2006.11.12
Помогите поставить пароль на приложение.


9-1138616293
Yanis
2006-01-30 13:18
2006.11.12
Почему этот код вызывает ошибку


6-1150659710
h8394E
2006-06-18 23:41
2006.11.12
WinSock 2.0 - чтение данных клиентом...





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский