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

Вниз

Делаю веб сервер на IdHTTPServer.   Найти похожие ветки 

 
L.evil   (2004-10-13 08:50) [0]

Люди подскажите как сделать что бы клиент когда заходил на
определённую страницу у него появлялось окошко куда надо
ввести пароль, имя. И после таго когда он нажмёт отправить,
все эти данные присылались на сервер.
Делаю веб сервер на IdHTTPServer.


 
Reindeer Moss Eater ©   (2004-10-13 09:31) [1]

Событие OnComandGet.
Параметр AResponseInfo : TIdHTTPResponseInfo.
Чтение RFC 2617.


 
L.evil   (2004-10-13 09:57) [2]

Можно пример


 
Reindeer Moss Eater ©   (2004-10-13 09:57) [3]

Пример в RFC-2617


 
Reindeer Moss Eater ©   (2004-10-13 10:29) [4]

procedure TForm1.IdHTTPServer1CommandGet(AThread: TIdPeerThread; ARequestInfo: TIdHTTPRequestInfo; AResponseInfo: TIdHTTPResponseInfo);
begin
if (ARequestInfo.AuthUsername = "Reindeer") and (ARequestInfo.AuthPassword = "Moss") then
 AResponseInfo.ContentText:="<HTML><H1>Welcome mr. " + ARequestInfo.AuthUsername + "!</H1></HTML>";
else
 AResponseInfo.AuthRealm := "restricted-zone";
end;


 
L.evil   (2004-10-13 11:58) [5]

Большое спасибо за пример.
А чё такое
> RFC-2617


 
Reindeer Moss Eater ©   (2004-10-13 11:59) [6]

Да так. Фигня одна ненужная.


 
L.evil   (2004-10-16 18:28) [7]

> А чё такое
> > RFC-2617


 
Piter ©   (2004-10-16 19:58) [8]

ftp://ftp.rfc-editor.org/in-notes/rfc2617.txt


 
Palladin ©   (2004-10-16 22:59) [9]

Сказали же... фигня не нужная...



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

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

Наверх




Память: 0.48 MB
Время: 0.032 c
1-1103280746
Erik1
2004-12-17 13:52
2005.01.02
Запретить Refresh при изменении несвязаного с параметрами поля?


14-1103033566
Kerk
2004-12-14 17:12
2005.01.02
ТМО и полигоны


3-1102332746
Dimedrol
2004-12-06 14:32
2005.01.02
TTable дублирует записи в Grid-e...


14-1102821580
Думкин
2004-12-12 06:19
2005.01.02
С днем рождения! 12 декабря


14-1103124402
DiamondShark
2004-12-15 18:26
2005.01.02
А не забыли ли вы пингвинов?