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 :
J'aimerais donc rajouter à c'code le SSL correspondant à gmail, à savoir 465.
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;
Merci de vos réponses.
Partager