Bonjour à toutes et à tous,
Avec les composants Indy, je crée une application qui doit envoyer des mails avec une pièce jointe.
Si j'envoie le mail sans pièce jointe, tout se passe bien.
Si je joins une pièce (une image) j'ai alors une erreur :
J'ai fait ce qui m'était demandé : je leur ai envoyé le mail avec à peu près la même explication qu'ici.Le projet SendMail a levé une classe d'exception "EldSMTPReplyError" avec le message :
Spam Detected - Mail Rejected. Please see our policy at : http//postmaster.free.fr/#spam-detected
Mais c'est peut-être parce que mon mail est mal configuré qu'il y a cette erreur.
Vous en avez peut-être une idée.
Voici le programme :
À la ligne 10, pour idAttachement, il y a peut-être une propriété que je n'ai pas mise.
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
23
24 Screen.Cursor:= crHourGlass; //Curseur sablier IdMessage1.Clear; //Efface l'entête et le corps du message IdMessage1.From.Text := Edit1.Text; //Adresse email de l'expediteur IdMessage1.ReplyTo.EMailAddresses:= Edit1.Text; //Adresse email où le destinataire pourra répondre IdMessage1.Recipients.EMailAddresses:= Edit2.Text; //Adresse email du destinataire IdMessage1.Date:= Now; //Date de l'envoi du message IdMessage1.Subject:= Edit4.Text; //Sujet du message IdMessage1.Priority:= mpNormal; //Priorité du message if not (Edit3.Text = '') then IdAttachment:= TIdAttachmentFile.Create(IdMessage1.MessageParts, Edit3.Text); //Attache le fichier IdMessage1.Body.Assign(Memo1.Lines); //Corps du message //Connexion au serveur smtp IdSMTP1.AuthType:= satNone; IdSMTP1.Host:= 'smtp.free.fr'; //Hôte (par exemple pour Free : smtp.free.fr) IdSMTP1.Port:= 25; //Port (par exemple pour Free : 25) IdSMTP1.UserName:= '**chauveau**'; //Nom d'utilisateur IdSMTP1.Password:= '********'; //Mot de passe IdSMTP1.Connect; //Connexion try IdSMTP1.Send(IdMessage1); //Envoi du message finally IdSMTP1.Disconnect; //Déconnexion end; Screen.Cursor:= crDefault; //Curseur par défaut
Cordialement.
Pierre
Partager