Що стосується повідомлень-відповідей, наявність тіла повідомлення у відповіді залежить від методу, що був використаний у запиті, і Статус-Коду. Усі відповіді на запити HEAD не повинні містити тіло повідомлення, хоча наявність деяких полів заголовка повідомлення може вказувати на можливу присутність такого. Відповідно, відповіді "204 No Content", "304 Not Modified", і "406 None Acceptable" також не повинні містити в собі тіло повідомлення.
ІІ. ОПИС ПРОГРАМИ “DOWNLOADER”
Програма “Downloader” була створена в середовищі програмування Borland Delphi 5. Основне призначення – зчитування з мережі Internet Web-сторінок з допомогою протоколу HTTP.
Програма має можливість зчитувати сторінки синхронно, тобто кілька сторінок відразу. Зчитування відбувається в спеціально вибраний користувачем каталог. Користувач має змогу бачити які сторінки він скачує. Список читаємих сторінок знаходиться на головній формі. Щоб почати скачування сторінок потрібно натиснути кнопку “start”. Якщо у користувача виникла необхідність видалити сторінку, що зчитується потрібно лише клікнути на назві сторінки в списку і натиснути кнопку “delete”. Зчитування сторінки відбувається не повністю, тобто закачується лише основна форма (текст, зсилки). Іде використання лише одного протоколу HTTP. В дальнійшому програма буде вдосконалюватись: буде використовуватись спосіб закачування сторінки повністю, скачування для зручності буде відбуватись ще й за допомогою FTP.
Текст програми:
unit Unit3;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls, Psock, NMHttp, FileCtrl;
type
THTTPThread = class(TThread)
private
{Для кажного процесу - створюємо свій компонент TNMHTTP}
FHTTP: TNMHTTP;
protected
{Execute визивається при запускові процесу; override – заміняє існуючу процедуру базового класу TThread}
procedure Execute; override;
{DoWork - створена нами функція, виконання якої синхронізується в Execute}
procedure DoWork;
public
{URL - створена нами строка, вказуюча процесу, який URL йому потрібно закачати}
URL: string;
end;
TForm1 = class(TForm)
Label1: TLabel;
ListBox1: TListBox;
Button1: TButton;
Button2: TButton;
Button3: TButton;
|
Скачати "Курсова на тему Зчитування інформаії з мережі Internet за допомогою HTTP"
