Bonjour,
J'essaie de récupérer mes emails par IMAP+SSL mais message d'erreur.
Erreur au niveau du try : impossible de charger bibliothèque SSL
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 // IMAP Form1.IdSSLIOHandlerSocketOpenSSL.SSLOptions.Method := sslvSSLv23; // ??? Form1.IdSSLIOHandlerSocketOpenSSL.Host:='imap.mail.yahoo.com'; Form1.IdIMAP4.IOHandler:= Form1.IdSSLIOHandlerSocketOpenSSL; Form1.IdIMAP4.UseTLS := utUseRequireTLS; // ??? Form1.IdIMAP4.Host := 'imap.mail.yahoo.com'; Form1.IdIMAP4.Port := 993; Form1.IdIMAP4.Username := 'username'; // avec ou sans @yahoo.fr ??? Form1.IdIMAP4.Password := 'password'; // Connect to the server try if not Form1.IdIMAP4.Connected then Form1.IdIMAP4.Connect; except exit; end;
Partager