使用INDY - Delphi xe7向gmail发送电子邮件

时间:2014-12-18 11:18:59

标签: delphi gmail wireshark indy

IdMessage1.Clear;
IdSSLIOHandlerSocketOpenSSL1 := TIdSSLIOHandlersocketopenSSL.Create(nil);

IdSSLIOHandlerSocketOpenSSL1.SSLOptions.Method      := sslvTLSv1;
IdSSLIOHandlerSocketOpenSSL1.SSLOptions.Mode        := sslmUnassigned;
IdSSLIOHandlerSocketOpenSSL1.SSLOptions.VerifyMode  := [];
IdSSLIOHandlerSocketOpenSSL1.SSLOptions.VerifyDepth := 0;

IdSSLIOHandlerSocketOpenSSL1.Host :=  'smtp.gmail.com';
IdSSLIOHandlerSocketOpenSSL1.Port := 587;
IdSMTP1.IOHandler := IdSSLIOHandlerSocketOpenSSL1;
IdSMTP1.UseTLS := utUseExplicitTLS;
IdMessage1.Body.Append('h');
IdMessage1.From.Name := '******';
IdMessage1.From.Address :=  '****';
IdMessage1.Recipients.EMailAddresses :='*****';
IdMessage1.Subject := 'POWIADOMIENIE';
IdSMTP1.UserName := '*******';
IdSMTP1.Password  := '*******';
IdSMTP1.Host :='smtp.gmail.com';

IdSMTP1.Port := 587 ;

//IdSMTP1.AuthType := satDefault;
// IdSMTP1.Authenticate;
IdSMTP1.Connect;
IdSMTP1.Send(IdMessage1);
IdSMTP1.Disconnect;

//idSMTP1.Authenticate;
end;

您好,尝试使用INDY和Delphi XE7向gmail发送电子邮件。不幸的是,我收到了错误 " SSL在此服务器上不可用" 来自Wireshark的屏幕

screenshot

0 个答案:

没有答案