关于indy idhttp + IdSSLIOHandlerSocket + Https的问题 (在线等待ing...)

[isxp]

我要获取 https://gash.gamania.com/GASHMapleStoryMapping/manage/querygashaccount.asp 页面的源码,
用idhttp直接get不行.winsock等都不行,后来在delphi k top上面看到要用IdSSLIOHandlerSocket来完成,
这样可以得到 https 页面的源码了...但是程序运行的时候经常出现 Error connecting with SSL. 错误信息,机器重启后可以测试成功几次,再测试就错误了.不能获取了..不知道大家有没有什么办法...
为这个问题困惑了几天了...希望大家能帮帮忙....

[vfork]

不懂+帮顶+学习!

[ly_liuyang]

Indy用OpenSSL Lib就可以的
Indy9.0.18
用IdHTTP连接SSLIO

本人主页提供Indy SSL 0.9.7I版本
看看时不时新版本能用吧

[zhuangbx220]

function GetWebPage(const Url: string):string;
var
Session,HttpFile:HINTERNET;
dwFileSize:DWord;
dwBytesRead:DWord;
Contents:PChar;
szContentLength,szContentType:string;
begin
Session:=InternetOpen(nil,0,niL,niL,0);
HttpFile:=InternetOpenUrl(Session,PChar(Url),nil,0,0,0);
GetMem(Contents,dwFileSize);
InternetReadFile(HttpFile,Contents,dwFileSize,dwBytesRead);
InternetCloseHandle(HttpFile);
InternetCloseHandle(Session);
Result:=StrPas(Contents);
FreeMem(Contents);
end;