Discussion :

[Jlmat]

Bonjour,

Je m'essaye dans l'envoi d'un mail en reprenant le code du tutorial de https://robin-valtot.developpez.com/...s-avec-delphi/ de Robin Valtot qui m'a paru bien rédigé. mais il me manque le A du ABC pour vraiment comprendre!

(je suis sous Delphi 10.3 communauty Edition)

A l'exécution, j'obtiens J'obtiens la réponse suivante:


En fait, je ne comprends pas trop comment ça marche:

Questions

1. Est-ce que à Expéditeur, on peut mettre n'importe quelle adresse mail que l'on possède?
2. Si oui à la première question, que dois-je mettre à identifiant?
3. Est-ce que le mot de passe est celui de la messagerie de l'expéditeur?

J'avoue ne pas avoir trouvé de réponse sur les forums ou tutoriaux parcourus

Bien à vous

[Charly910]

Bonjour,
j'ai essayé la même chose de mon coté.

j'arrive à envoyer des messages avec mon adresse mail orange et le serveur smtp.orange.fr sans authentification avec le port 25 vers une autre de mes adresse mail, ou bien avec le port 465 en indiquant comme identifiant mon adresse orange et mon mot de passe de messagerie.

Mais le résultat est aléatoire : parfois le mail est envoyé rapidement, parfois l'envoi échoue au bout d'un temps assez long. Je ne comprends pas pourquoi !

Si quelqu'un a des éclaircissements, cela m'intéresse aussi.

A+
Charly

[SergioMaster]

Bonjour,
Heureusement que Charly a répondu car hier soir bien qu'ayant lu le post j'étais trop crevé pour y répondre, du coup la discussion était passée sous mon radar ce matin

Questions

1. Est-ce qu’à Expéditeur, on peut mettre n'importe quelle adresse mail que l'on possède?
2. Si oui à la première question, que dois-je mettre à identifiant?
3. Est-ce que le mot de passe est celui de la messagerie de l'expéditeur?

1 - oui, à partir du moment où le fournisseur permet le smtp
2 - cela dépend du fournisseur
3 - en général oui
Donc, cela dépend beaucoup du fournisseur de messagerie donc il faut un peu fouiller sur internet par exemple ici pour obtenir les ports, mais aussi sur le site du fournisseur surtout concernant le point 2 certains fournisseurs demandent l'adresse mail complète d'autre juste la première partie de l'adresse etc..
Toujours privilégié un port avec authentification, le port 25 est trop sujet à "crise"
par crise j'entends blocages du fournisseur, du fournisseur du destinataire, etc. sans parler de leurs anti-spams à la c.n (par exemple essayez d'envoyer un mail de laposte.net vers google.com => direct spam quand ce n'est pas destruction).

D'ailleurs si quelqu'un sait comment ajouter un certificat à un mail (et même obtenir des certificats gratuits ) je suis preneur

J'ai remis ici https://www.developpez.net/forums/d1.../#post10691087 un bout de code qui fonctionne depuis des années (j'ai dû le mettre dans d'autres endroits mais c'est le dernier dont je me souvienne)
bien sûr ce code qui est un programme test demande à saisir les informations mais rien n'empêche de mettre dans un fichier ini (ou autre) les valeurs

pour ce programme il fallait ssl donc pour construire mon message les composants
idsmtp, idssliohandlersocketopenSSL, et idmessage et donc les dlls pour le ssl
J'ai cru comprendre qu'avec la version Rio certaines choses concernant le SSL mais je n'ai pas encore fait de recherche à ce sujet (un truc qui fonctionne depuis 2010 pourquoi changer )

[Charly910]

Bonjour,

avec D10.3, ton code ne compile pas chez moi :

[dcc32 Erreur] uFormEmail.pas(145): E2003 Identificateur non déclaré : 'TIdMessage'

j'ai pourtant ajouté TidMessage depuis la palette des composants sur ma Form. Normalement, la clause Uses aurait du être mise à jour ?

A+
Charly

PS : mon OS est 64 bits, mais je développe une appli 32 bits. Je suppose que c'est les Dll 32 bits que je dois mettre dans le répertoire de mon exe ? (ssleay32.dll et libeay32.dll)

[SergioMaster]

Re,

j'ai repris le code sous rio

voir zip
petite note, pour laposte.net l'utilisateur c'est monadressemail quand l'adresse mail est monadressmail@laposte.net

Bien sûr je ne vous fournis pas le fichier Ini et je n'ai pas mis de onclose qui permet de sauvegarder le fichier ini
Je n'ai pratiquement pas fait de changement par rapport à D2010 , j'avais cru comprendre ou lire qu'il y avait des améliorations pour le ssl (intégration), j'ai dû me gourer, me reprendra celui qui aurait de meilleures infos

pour information j'ai créé le programme de la manière suivante :
j'ai ouvert sur mon nouveau poste ma version Rio + nouvelle application VCL
je me suis connecté à mon ancien poste via TightVNC, ouvert mon D2010 et fait des opérations de copier/coller d'abord des composants puis du code
Deux petites modifs de code et une compilation, vous avez le résultat plus haut

PS : mon OS est 64 bits, mais je développe une appli 32 bits.
Je suppose que c'est les Dll 32 bits que je dois mettre dans le répertoire de mon exe ? (ssleay32.dll et libeay32.dll)

au préalable il faut bien évidemment mettre ces bibliothèques soient copiées soit dans le répertoire de l'application selon la cible du programme
ou, pour windows installer les versions adhoc dans le cas de windows 64 dans System32 on met celles en 64 et dans syswow64 celles en 32 (oui je sais MS est étrange parfois )

[Charly910]

Bonjour Serge,

désolé, je m'était un peu mélangé les pinceaux avec les Uses ! ça compile, mais en cochant TSL j'ai l'erreur :

Erreur SSL IOHandler
nécessaire pour le paramétrage

Je vais tester ton zip

A+
Charly

[Jlmat]

C'est dommage, car ce n'est pas fiable et je vais abandonner l'idée d'envoyer des mails depuis ma petite application de type contact

Ben, c'est quand même un problème, moi aussi, j'ai besoin de mettre cela dans mon appli de gestion associative...

Peut-être faudrait-il tester avec un autre serveur que Orange?

Il doit bien y avoir des professionnels de Delphi qui maitrisent ce sujet? Où est-ce secret Défense?

Je continue de travailler sur le sujet... dès que j'ai un peu de temps... Peut-être chercher du côté de ceux qui maitrisent la norme, le protocole...


A+

[SergioMaster]

Voilà mon dernier jus du même programme test

[Charly910]

Merci beaucoup Serge,

j'ai testé ce matin et aussi en début d'après midi :
avec le port 465 en TSL cela fonctionne assez vite et bien. Il y a quand même parfois des cas ou le message ne part pas (assez rares)

Je vais reprendre ton code dans mon appli (si tu le permet ?) et essayer aussi d'ajouter des Pj ...

Merci encore

A+
Charly

[Jlmat]

Bonjour les amis,

Je vous remercie pour vos réponses détaillées et documentées... C'est un vrai plaisir de travailler sur ce forum!
Je suis sur d'autres dossiers ces jours-ci, mais je me penche sur le problème dès ce WE...

[Charly910]

Bonjour,

j'ai réessayé avec le logiciel de Robin Valtot. Avec :

Exp : monMail@orange.fr
Dest: MonMail@gmx.fr
Serveur smtp : smtp.orange.fr
Port : 25
identifiant : vide
Password : vide

sur 4 tests successifs : 3 envoi Ok et 1 manqué

et avec identifiant :

Exp : monMail@orange.fr
Dest: MonMail@gmx.fr
Serveur smtp : smtp.orange.fr
Port : 465
identifiant : monMail@orange.fr
Password : Mon Mot de Passe de Messagerie Orange

sur 2 essais successifs : 1 envoi Ok et un manqué

(Tous mes essais ont même message et même objet mais numérotés)

Bref, cela reste un peu aléatoire !! je ne sais pas pourquoi (firewall ZoneAlarm ?, Serveur Orange ?)

A+
Charly

PS : je n'ai pas réussi à faire fonctionner le petit logiciel de Serge. Les envois échouent

[SergioMaster]

Bonjour,

c'est vrai que je n'ai pas testé avec smtp.orange.fr et il y a beaucoup de paramètres qui ne sont pas pris en compte dans ce petit programmes : types de protocole SSL, valeurs de Use TLS (j'en ai pris qu'une)

j'ai essayé avec succès :
laposte.net (mon image)
OVH (ssl0.ovh.net port 465, USETLS , utilisateur contact%mondomaine.com mail contact@mondomaine.com)
orange (smtp.orange.fr, port 465, UseTLS, utilisateur monadresse@orange.fr mail monadresse@orange.fr) étrangement hier ça ne fonctionnait pas !

Gmail non, google ne reconnait pas le poste qui envoie le message et m'envoie une alerte de sécurité

[Charly910]

oui, le smtp.orange.fr semble aléatoire ! (port 25 et même port 465 sécurisé)

A+
Charly

[Invité]

Bonsoir, effectivement nous avions déjà eu des soucis avec certains FAI

Il est rare que l'envoi anonyme (sans login/mot de passe) soit autorisé et je trouve bizarre que cela fonctionne sous orange, ça veut dire que l'on peut envoyer avec n'importe quel destinataire, au bout d'un moment le serveur SMTP bloque peut être..

Après il faut distinguer les erreurs d'envoies (exception) et les mails non reçu (à la main du serveur SMTP normalement)

Sinon pour Outlook il y a pas mal de règle, de mémoire 60 mails max à la minute

Tu as mis quoi comme adresse du serveur smtp ? tu utilises un office365 ?
Pour outlook :
- expediteur doit être égal à identifiant (ton email)
- renseigner le mot de passe de ton compte de messagerie

A+
Robin

[Jlmat]

Merci les amis pour vos contributions!

Je n'ai pas testé encore le dernier code de Sergio, mais je garde tout bien précieusement afin de comprendre pourquoi ça bloque chez moi!
J'ai remarqué depuis le début de l'hiver, des problèmes avec ma messagerie Orange qui est très lente à envoyer, valider une option quand je m'en sers! Et d'ailleurs, la connexion de ma LiveBox coupe souvent!

Peut-être est-ce dû à un temps d'attente trop long pour le protocole. Il faudrait que je téléphone à orange pour savoir ce qu'il en est?

Bon WE
A+
jlmat

[Jlmat]

Hello,

Après de multiples essais infructueux ce WE avec le test de Sergio et autres exemples trouvés, je me suis plongé dans la théorie pour comprendre tout ce charabia...
La difficulté vient de la grande quantité d'exemples de codes écrit dans différentes versions de Delphi. Aussi, je crois qu'il nous faut préciser maintenant dans quelle version nous écrivons les codes exemples afin de gagner du temps dans nos recherches...

J'ai testé le code de Sergio par exemple sous Delphi 10.3 et ma messagerie orange :

J'avais oublié de mettre les Dll libeay32.dll et ssleay32.dll dans le répertoire Exe: Le message d'erreur est le suivant : (ça peut aider à localiser les unités ressources de Delphi utilisées:



Le débogueur s'arrête sur le code de l'unité unit IdSSLOpenSSL;
sur la ligne raise...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
constructor TIdSSLContext.Create;
begin
  inherited Create;
  //an exception here probably means that you are using the wrong version
  //of the openssl libraries. refer to comments at the top of this file.
  if not LoadOpenSSLLibrary then begin
    raise EIdOSSLCouldNotLoadSSLLibrary.Create(RSOSSLCouldNotLoadSSLLibrary);
  end;
  fVerifyMode := [];
  fMode := sslmUnassigned;
  fSessionId := 1;
end;

Rappel : pour utiliser TLS/SSL avec Indy, il faut télécharger les fichiers bibliothèques libeay32.dll et ssleay32.dll disponibles à l'adresse suivante http://indy.fulgan.com/SSL/et les copier dans le même répertoire que le fichier exécutable.

En fait, il faudrait un tuto qui reprend chaque point du protocole SMTP en permettant à chaque étape de vérifier le bon fonctionnement:

Donc avec l'option TSL cochée, l'erreur devient:



et la ligne de code de l'unité unit IdSSLOpenSSLHeaders qui génère l'erreur:

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
{ EIdOpenSSLAPICryptoError }
class procedure EIdOpenSSLAPICryptoError.RaiseException(const AMsg : String = '');
begin
  RaiseExceptionCode(ERR_get_error(), AMsg);
end;

class procedure EIdOpenSSLAPICryptoError.RaiseExceptionCode(
  const AErrCode: TIdC_ULONG; const AMsg: String);
var
  LMsg: String;
  LException : EIdOpenSSLAPICryptoError;
begin
  if AMsg <> '' then begin
    LMsg := AMsg + sLineBreak + String(GetErrorMessage(AErrCode));
  end else begin
    LMsg := String(GetErrorMessage(AErrCode));
  end;
  LException := Create(LMsg);
  LException.FErrorCode := AErrCode;
  raise LException;
end;

Enfin, j'ai essayé sans la case à cocher SSL:



et le code où ça plante (unité IdReplySMTP):

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
procedure TIdReplySMTP.RaiseReplyError;
begin
  raise EIdSMTPReplyError.CreateError(NumericCode, FEnhancedCode, Text.Text);
end;

j'avoue être dans l'expectative, il me dit que mot de passe n'est pas correct pour ma messagerie que j'utilise en expéditeur. C'est ma messagerie principale que j'utilise tous les jours.
Pour le destinataire, j'ai mis une adresse mail sur un site internet que je gère.

Donc j'ai pas tout compris, mdr!

Pour l'instant, j'ai compris que SMTP était un protocole de TCP.

Et les protocole TCP et UDP sont les protocoles de la couche 4 de la communication entre machines.
Donc il faut des identifiants de machines (IP )

TCP correspond à un besoin de protocole fiable mais sans nécessité de rapidité (grande majorité des applications d'internet qui vérifie que
chaque paquet soit reçu coûte que coûte)
UDP correspond au contraire à un protocole rapide mais sans nécessité de fiabilité comme le streaming,, la radio ou la télé sur internet

SMTP (Simple Mail Transfer Protocol) ou Protocole Simple de Transfert de Courrier est le protocole standard permettant de transférer le courrier d'un
serveur identifié (Adresse IP numérique ou symbolique Jlmat.cnam.fr <=> machine.sous-domaine.domaine) à un autre en connexion point à point.

La structure du tutorial de https://robin-valtot.developpez.com/...s-avec-delphi/ de Robin Valtot me parait lisible en terme de compréhension des étapes. Je vais me concentrer sur le protocole SMTP uniquement.
Je crois que l'on devrait y arriver :
1. soit en étudiant les unités spécialisées de Delphi en ce qui concerne la mise en oeuvre des protocoles TCP et SMTP
2. Soit en étudiant en détail ce que font les composants que cite Robin Valtot :
- TIdSMTP : pour se connecter au serveur ;
- TIdSSLIOHandlerSocketOpenSSL : pour sécuriser les connexions réseau ;
- TIdMessage : il s'agit de notre message.et aller fouiller dans les uniiso

Bon, ben je vais continuer de creuser...

A+
jlmat

[SergioMaster]

Bonjour,

.
La difficulté vient de la grande quantité d'exemples de codes écrit dans différentes versions de Delphi. Aussi, je crois qu'il nous faut préciser maintenant dans quelle version nous écrivons les codes exemples afin de gagner du temps dans nos recherches...

c'est ce que je n'arrête pas de clamer dès que l'on pose une question sans ce contexte il est toujours plus difficile de répondre

J'avais oublié de mettre les Dll libeay32.dll et ssleay32.dll dans le répertoire Exe

j'avais pourtant écrit

au préalable il faut bien évidemment mettre ces bibliothèques soient copiées soit dans le répertoire de l'application selon la cible du programme
ou, pour windows installer les versions adhoc dans le cas de windows 64 dans System32 on met celles en 64 et dans syswow64 celles en 32 (oui je sais MS est étrange parfois )

En ce qui concerne le smtp Orange.
Pas sûr que ce soit dû à Indy. Tout d'abord lors de mes essais le 16/01 cela plantait, les mêmes essais le 17/01 étaient concluant
Premier point :
Notez que j'ai une petite erreur de gestion de l'erreur dans le code que j'ai fourni, il faudrait plutôt faire ainsi

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
try
idSMTP1.Connect;
 
try
  idSMTP1.Send(idMessage1);
  Memo1.Lines.Add('SMTP Ok , message envoyé');
except
  Memo1.Lines.Add('E-mail non envoyé');
end;
 idSMTP1.Disconnect;
except
 Memo1.Lines.Add('Impossible de se connecter au serveur SMTP');
end;

c'est dans les messages dus aux exceptions qu'il faudrait obtenir l'erreur exacte mais il faudrait peut-être, si c'est possible, chercher aussi celle du composant SSLIOHandler

Deuxième point :
Beaucoup de paramètres possibles ne sont pas testés, entre les paramètres de SSLIOHandler et ceux de IdSmtp les combinaisons sont nombreuses
Orange n'étant pas très explicite sur ce point il peut tout aussi bien s'agir d'un délai d'obtention de certificat que comme indiqué dans le message un problème de version de certificat.
du coup la question à se poser (ou poser à orange) "mais quelle est donc cette version nécessaire ?" car SSLIOHandler en propose plusieurs (voir propriété SSLOptions.SSLVersions)

Ps. pour info, je viens de réessayer avec mon smtp.orange, toujours avec succès, en sslversions j'ai toutes les versions de TLS (v1,v1_1,v1_2) je ne me souviens plus de ce qu'il en était lors de mes tests du 17/01

pps pour info aussi un webmaster qui à l'air d'en connaitre un rayon fait cette remarque

[Jlmat]

Oui merci Cantador, comme Charly, j'avais suivi vos échanges antérieurs. Mais comme je suis sur 10.3, je m'y mets à fond... Il faut que je m'habitue à l'interface et options... c'est un monstre ce 10.3, lol!
Je vous tiens au courant dès que je serais parvenu à des résultats...

A+

[cantador]

c'est un monstre ce 10.3, lol!

oh oui !

[SergioMaster]

Bonjour,

Tant que le sujet est ouvert, l'un de vous sait-il comment demander une confirmation d'affichage et de lecture par l'intermédiaire de Indy ?
Et, sujet attenant : récupérer ces confirmations pour traitement ? Non pas que je ne sache pas comment récupérer les mails dans une boite mais savoir si ce type de message (ainsi que celui de non-délivrance) est particulier.
J'avoue, je n'ai pas encore cherché, la codification de ce traitement est prévu pour la semaine prochaine mais si vous avez des infos, je prends