Bonjour,

Je développe un logiciel sous Delphi 2005 pour Windows. Je veux y incorporer un serveur SMTP; j'utilise pour ce faire "IdSMTP". J'ai lu quelques tutaux sur le sujet mais aucun n'a su m'éclairer sur les SSL.

J'ai donc commencé à développer le serveur SMTP, comme suit :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
 
procedure TForm1.Button2Click(Sender: TObject);
Var
  IdMessage : TIdMessage;
Begin
  IdSMTP1.Host := 'smtp.gmail.com';
  IdSMTP1.AuthType := atDefault;
  IdSMTP1.Username := 'user@gmail.com';
  IdSMTP1.Password := 'pass';
  IdMessage := TIdMessage.Create(nil);
 
  IdSMTP1.Connect;
  IdSMTP1.Authenticate;
 
  Try
    IdSMTP1.Send(IdMessage);
  Except
    ShowMessage('Erreur lors de l''envoi');
  End;
 
  IdSMTP1.Disconnect;
End;
J'aimerais donc rajouter à c'code le SSL correspondant à gmail, à savoir 465.

Merci de vos réponses.