スポンサーサイト

上記の広告は1ヶ月以上更新のないブログに表示されています。
新しい記事を書く事で広告が消せます。

MailSSVer5その後

さて、目下の悩みは、MailSSでGmailを受信するよ、初回の接続が必ず失敗する。
2度目の受信や送信命令は、何事もなく成功(必ず)する。

思い当たるところをプログラムしてみているのだが、いまだ原因不明。

2案のプログラム記述を下記に示しておく。
(案1)
POP.Host:=strHost;POP.Username:=UserName;
POP.Password:=Pass;POP.Port:=StrToInt(strPort);
if StrToBool(strPopSSL) then begin
with POP do begin
IOHandler := SSLHandler;
AutoLogin := True;
UseTLS := utUseImplicitTLS;
end;
end;

(案2)
with POP do begin
IOHandler := SSLHandler;
AutoLogin := True;//ToDo5/28追加しましたでも、効果なし
UseTLS := utUseImplicitTLS;
end;
with SSLHandler do begin
Destination := strHost+':'+strPort;//'pop.gmail.com:995';
Host := strHost;//'pop.gmail.com';
Port := StrToInt(strPort);//995;
DefaultPort := 0;
SSLOptions.Method := sslvSSLv2;
SSLOptions.Mode := sslmUnassigned;
SSLOptions.VerifyMode := [];
SSLOptions.VerifyDepth := 0;
end;

案2は、2度目の接続はうまくいくが、初回が必ず失敗する。
案1は、その改良版なのだが、まだ検査していない。

はてさて、Gmailは以前にもデコードで悩まされたが、ここでも、苦労させられる。
無料で、ファイル容量がたっぷりある、ということだけが利点なのだが。
スポンサーサイト

コメントの投稿

非公開コメント

プロフィール

SSWorld

Author:SSWorld
SSWorldへようこそ!
デジタル化されたモノが好きなのかもしれません。プログラミングしてフリーウエアを作ったり、昔録音した自分たちの演奏をデジタル化したりして、楽しんでます。DVDレコーダーも割りと早くに手に入れ、機械を分解してもいます。

最近の記事
最近のコメント
最近のトラックバック
月別アーカイブ
カテゴリー
カウンタ

ブロとも申請フォーム

この人とブロともになる

ブログ内検索
RSSフィード
リンク
上記広告は1ヶ月以上更新のないブログに表示されています。新しい記事を書くことで広告を消せます。