idHttp和HTTPS页面登录错误

问题描述:

procedure TForm1.btnGirisClick(Sender: TObject); 
var 
post:tstringlist; 
get:TStringStream; 
begin 
post:=TStringList.Create; 
get:=TStringStream.Create(''); 
try 
post.Clear; 
IdHTTP1.Disconnect; 
post.Add('[email protected]'); 
post.Add('pass=xxxx'); 
IdHTTP1.Post('https://www.facebook.com/login.php',post,get); 
Memo1.Text:=get.DataString; 
except 
on e: exception do begin 
memo1.text:=''; 
end; 
end; 
post.Free; 
get.Free; 
end; 
end. 

我需要帮助有关idHttp和SSL库...idHttp和HTTPS页面登录错误

我写一个简单的Delphi7的代码(要登录博客与我的应用程序),当我要运行它,它给我一个错误代码如下;

和错误是“无法加载SSL库”我拖动idHttp和IdSSLIOHandlerSocket1并将iohandler设置为IdSSLIOHandlerSocket1。我能做些什么来运行代码?

您必须在应用程序文件夹或system/win32文件夹中同时存在两个SSL dll。

让他们在这里:http://indy.fulgan.com/SSL/

+0

我做到了,程序给了我另一个错误。那就是“连接到SSL出错”是什么?你有什么主意吗 ? –

+0

确保将方法设置为sslvSSLv23,并将IPVersion设置为id_ipv4。另外即时通讯假设您使用IdSSLIOHandlerSocketOpenSSL – Kevin

+0

是的我设置方法sslvSSLv23,但我使用IdSSLIOHandlerSocket我不在delphi 7中找到IdSSLIOHandlerSocketOpenSSL。它们是否一样? –