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

Вниз

idHTTPServer - документ по умолчанию   Найти похожие ветки 

 
BFG9k ©   (2006-08-24 16:45) [0]

При обращению к IdHTTPServer"у необходимо, чтобы он выдавал страницу по умолчанию - Index.html.


procedure TForm1.IdHTTPServer1CommandGet(AThread: TIdPeerThread;
 ARequestInfo: TIdHTTPRequestInfo; AResponseInfo: TIdHTTPResponseInfo);
begin
 idHTTPServer1.ServeFile(AThread,AResponseInfo,"c:\www\Index.html");
end;


В результате страница Index.html загружается при каждом переходе :( Есть ли документация на русском или примеры работы с idHTTPserver ?


 
Reindeer Moss Eater ©   (2006-08-24 17:52) [1]

При обращению к IdHTTPServer"у необходимо, чтобы он выдавал страницу по умолчанию - Index.html.
....
В результате страница Index.html загружается при каждом переходе

Получил же что хотел.


 
Отец Кондратий   (2006-08-25 11:00) [2]


> procedure TForm1.IdHTTPServer1CommandGet(AThread: TIdPeerThread;
>   ARequestInfo: TIdHTTPRequestInfo; AResponseInfo: TIdHTTPResponseInfo);
>

Вот он тебе на каждую команду и выдает, что написАл!
Там на другой Event надо index.html выдавать... На OnConnect хоть, что-ли... :-)
P.S. Спасибо, развлёк, старика...


 
Орион ©   (2006-08-25 13:21) [3]


> Там на другой Event надо index.html выдавать... На OnConnect
> хоть, что-ли... :-)

Спасибо, развлек, старика...

BFG9k,
проверяй ARequestInfo.Document, если оно "/" значит браузер стучится в корень и выдавай ему страницу по умолчанию.


 
BFG9k ©   (2006-08-25 15:22) [4]

Сам допер. Орион - спасибо. Тема закрыта...


 
Slym ©   (2006-08-28 06:45) [5]

Лучше так:
if RequestInfo.Document="/" then
begin
 ResponseInfo.Redirect("Index.html");
 exit;
end;


 
Орион ©   (2006-08-28 12:11) [6]

> [5] Slym ©   (28.08.06 06:45)

А чем лучше?
Наоборот приходиться еще одну транзакцию совершать, что в данном конкретном случае имхо бессмысленно.



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

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

Наверх




Память: 0.48 MB
Время: 0.045 c
2-1168832729
Кубоид
2007-01-15 06:45
2007.02.04
Как написать функцию проверки столкновений двух сфероидов?


10-1129035788
KIA
2005-10-11 17:03
2007.02.04
Ошибка при изменении ширины ячейки WORD-таблицы


2-1169382270
Cj
2007-01-21 15:24
2007.02.04
Выделение файла


2-1169127279
Кевларвестов Семен
2007-01-18 16:34
2007.02.04
TReader не читает из TMemoryStream


2-1169036841
root
2007-01-17 15:27
2007.02.04
Как узнать под каким пользователем загруженна программа