Сети ЭВМ и телекоммуникации. Лясин Д.Н - 43 стр.

UptoLike

ВУЗ: 

ВПИ ВолгГТУ | Волжский

Составители: 

Рубрика: 

43
Для прерывания выполнения методов можно использовать метод Abort. При-
чем иногда при получении некоторых некорректных ответов от сервера, на-
пример, при получении пустого ответа, без вызова этого метода приложение
не сможет корректно завершить работу. Таким образом, для отправки запроса
GET можно использовать следующий код.
NMHTTP1->TimeOut = 10000;
NMHTTP1->InputFileMode = false;
NMHTTP1->OutputFileMode = false;
NMHTTP1->ReportLevel = Status_Basic;
if (CheckBox1->Checked) //Включен режим работы через прокси сервер
{ NMHTTP1->Proxy = "proxy.volpi.edu"
NMHTTP1->ProxyPort = 3128;
}
NMHTTP1->HeaderInfo->LocalMailAddress = "[email protected]";
NMHTTP1->HeaderInfo->LocalProgram = "Simple HTTP client";
if (CheckBox2->Checked) //Используется аутентификация в режиме Basic
{ NMHTTP1->HeaderInfo->UserId = "gst";
NMHTTP1->HeaderInfo->Password = "gst";
}
try
{
NMHTTP1->Get("http://www.volpi.ru/docs/index.htm");
Memo1->Text = NMHTTP1->Body;
Memo2->Text = NMHTTP1->Header;
if (NMHTTP1->CookieIn != "")
ShowMessage("Cookie:\n"+NMHTTP1->CookieIn);
} 
Для прерывания выполнения методов можно использовать метод Abort. При-
чем иногда при получении некоторых некорректных ответов от сервера, на-
пример, при получении пустого ответа, без вызова этого метода приложение
не сможет корректно завершить работу. Таким образом, для отправки запроса
GET можно использовать следующий код.
    NMHTTP1->TimeOut = 10000;
    NMHTTP1->InputFileMode = false;
    NMHTTP1->OutputFileMode = false;
    NMHTTP1->ReportLevel = Status_Basic;
    if (CheckBox1->Checked) //Включен режим работы через прокси сервер
             { NMHTTP1->Proxy = "proxy.volpi.edu"
              NMHTTP1->ProxyPort = 3128;
              }
    NMHTTP1->HeaderInfo->LocalMailAddress = "[email protected]";
    NMHTTP1->HeaderInfo->LocalProgram = "Simple HTTP client";
    if (CheckBox2->Checked) //Используется аутентификация в режиме Basic
         { NMHTTP1->HeaderInfo->UserId = "gst";
            NMHTTP1->HeaderInfo->Password = "gst";
        }
   try
    {
    NMHTTP1->Get("http://www.volpi.ru/docs/index.htm");
    Memo1->Text = NMHTTP1->Body;
    Memo2->Text = NMHTTP1->Header;
    if (NMHTTP1->CookieIn != "")
            ShowMessage("Cookie:\n"+NMHTTP1->CookieIn);
    }




                                       43

Страницы