![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
idHTTPServer - документ по умолчанию [D7, WinXP]
BFG9k © (2006-08-24 16:45:00)При обращению к 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 ?
Орион (2006-08-28 12:11:00) [1]> [5] Slym © (28.08.06 06:45)
А чем лучше?
Наоборот приходиться еще одну транзакцию совершать, что в данном конкретном случае имхо бессмысленно.
Slym (2006-08-28 06:45:00) [2]Лучше так:
if RequestInfo.Document='/' then
begin
ResponseInfo.Redirect('Index.html');
exit;
end;
BFG9k (2006-08-25 15:22:00) [3]Сам допер. Орион - спасибо. Тема закрыта...
Орион (2006-08-25 13:21:00) [4]
> Там на другой Event надо index.html выдавать... На OnConnect
> хоть, что-ли... :-)
Спасибо, развлек, старика...
BFG9k,
проверяй ARequestInfo.Document, если оно "/" значит браузер стучится в корень и выдавай ему страницу по умолчанию.
Отец Кондратий (2006-08-25 11:00:00) [5]
> procedure TForm1.IdHTTPServer1 CommandGet(AThread: TIdPeerThread;
> ARequestInfo: TIdHTTPRequestInfo; AResponseInfo: TIdHTTPResponseInfo);
>
Вот он тебе на каждую команду и выдает, что написАл!
Там на другой Event надо index.html выдавать... На OnConnect хоть, что-ли... :-)
P.S. Спасибо, развлёк, старика...
Reindeer Moss Eater (2006-08-24 17:52:00) [6]При обращению к IdHTTPServer'у необходимо, чтобы он выдавал страницу по умолчанию - Index.html.
....
В результате страница Index.html загружается при каждом переходе
Получил же что хотел.