Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

If-Modified-Since [D5, D6, D7, NT4, Win2k, WinXP]


lefan ©   (2002-12-26 08:10:00) 

Это я взял с http://www.sources.ru/protocols/http_request.shtml#ifmodifiedsince
---
If-Modified-Since = "If-Modified-Since" ":" HTTP-дата

Пример использования заголовка:

If-Modified-Since: Sat, 29 Oct 1994 19:43:31 GMT
---
только никак не могу разобраться, как с ним работать...
а idhttp.Response.LastModified возвращает только дату, а мне надо и время.
подскажите пожайлуста, как работать с инструкцией If-Modified-Since

Заранее благодарен за ответ.
С уважением Алексей.


Reindeer Moss Eater   (2002-12-26 10:12:00) [1]

Текст запроса:
"HEAD твой_url HTTP/1.0"#13#10#13#10
соединяемся с веб сервером, отправляем запрос.
После этого читаем ответ (ReadLn,ReadLnWait,ReadString,ReadStrings .......)
Получив ответ делаем разбор строки


lefan   (2002-12-26 10:06:00) [2]

как получить заголовок
ну можно и как обработать... :)


Reindeer Moss Eater   (2002-12-26 10:00:00) [3]

Примера чего?


lefan   (2002-12-26 09:56:00) [4]

а нет примерчика?


Reindeer Moss Eater   (2002-12-26 09:23:00) [5]

Я же сказал по русски.
Если не устраивает сервис TidHTTP, то ползуйся TidTCPClient.
Сформируй HEAD запрос, отправь серверу, прочитай заголовок ответа в чистом виде.
Произведи разбор строки содержащей LastModified.


lefan   (2002-12-26 09:17:00) [6]

memo1.Text:=idhttp.Get(edit1.Text);
memo1.Lines.Clear;
memo1.Lines.Add("Data: "+datetostr(idhttp.Response.Date));
memo1.Lines.Add("Time: "+timetostr(idhttp.Response.Date));
memo1.Lines.Add("Data Expires: "+datetostr(idhttp.Response.Expires));
memo1.Lines.Add("Time Expires: "+timetostr(idhttp.Response.Expires));
memo1.Lines.Add(idhttp.ResponseText);
memo1.Lines.Add("Last Modifer: "+datetimetostr(idhttp.Response.LastModified));
if idhttp.Connected then idhttp.Disconnect;

вот что делаю, строка
memo1.Lines.Add("Last Modifer: "+datetimetostr
(idhttp.Response.LastModified));
работает, возвращает дату модификации, а время берет текущее...
что мне делать?


Reindeer Moss Eater   (2002-12-26 09:01:00) [7]

А что мешает получить полный текст заголовка ответа сервера не с помощью TidHTTP, а с помощью TidTCPClient?


Наверх

Титульная страница Поиск, карта сайта Написать письмо