![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как скачать файл по протоколу HTTPS:\\ [D7, WinXP]
SamProf © (2006-03-26 21:10:00)Здравствуйте мастера!
У нас в сетке на одном из серваков лежит страничка, адрес у неё примерно следующий
https://192.168.0.254/cgi-bin/balance.cgi?name=user1&pass=pass1&Submit=OK
Мне её надо скачать! пробуэ во так вот:
const
sf='';
se='';
var
strurl:string;
s:TStrings;
idhttp:TIdHTTP;
IdSSLIOHandlerSocket:TIdSSLIOHandlerSocket;
begin
strurl:=Edit1.Text+'?name='+Edit2.Text+'&pass='+Edit3.Text+'&Submit=OK';
try
IdHTTP:= TIdHTTP.Create(Application);
IdSSLIOHandlerSocket:= TIdSSLIOHandlerSocket.Create(Application);
idHTTP.BoundPort:= 443;
IdHTTP.IOHandler:= IdSSLIOHandlerSocket;
s:=TStringList.Create;
s.Text:=IdHTTP.Get(strurl);
IdHTTP.Free;
IdSSLIOHandlerSocket.Free;
finally
end;
end;
ещё а этой папке я скачал 2 dllки:
ssleay32.dll
libeay32.dll
Файл скачивается, но достаточно часто прога начинает выдавать следующую месагу:
Socket Error #10048
Adress already in use! и файл не качается! что такое? или как ещё можно скачать этот файл?(TWebBrowser не подходит!)
Спасибо!!!
SamProf (2006-03-31 11:08:00) [1]
> А без VCL как ?
Не понял вопроса!
br21001 (2006-03-30 21:06:00) [2]А без VCL как ?