出现这种问题的原因是由于访问的 URL地址为https或存在其跳转地址为https。
首先单纯使用idhttp是只能访问http,而https则需要搭配IdSSLIOHandlerSocketOpenSSL来实现对https的访问支持,当然还需要在系统目录或编译目标程序的同目录下有ssleay32.dll与libeay32.dll两个SLL协议的支持库。
下面贴出一个简单示例,但对于需要管理cookie的自然要继续完善idhttp的其他项设置,尤其是有些https站是屏蔽直接使用IdCookieManager的。
function TMyHttp.SSLGetS(URL: string): string; var Http: TIdhttp; SSLIO: TIdSSLIOHandlerSocketOpenSSL; begin Http := TIdHttp.Create(nil); Http.ProtocolVersion := pv1_1; Http.HandleRedirects := True; SSLIO := TIdSSLIOHandlerSocketOpenSSL.Create(nil); SSLIO.SSLOptions.Method:=sslvTLSv1; SSLIO.SSLOptions.Mode := sslmClient; try try Http.IOHandler:=SSLIO; Result := Http.Get(URL); except Result := ''; end; except end; Http.Disconnect; FreeAndNil(SSLIO); FreeAndNil(Http); end;
我使用的是Delphi 2007,它最高仅支持Indy10.2.3版本,搭配前面提到的两个OpenSLL Shared Library 1.0.1.5(1.0.1.e)版本文件。
转自:https://blog.youkuaiyun.com/huohuotu/article/details/77337087
本文介绍如何在Delphi中使用TIdhttp组件配合IdSSLIOHandlerSocketOpenSSL实现HTTPS请求,包括设置SSL版本和模式,以及处理重定向。适用于需要在Delphi应用中加入安全网络通信功能的开发者。
1697

被折叠的 条评论
为什么被折叠?



