Discussion :

[Obturatix]

Bonjour à la communauté,
voici mon code qui ne fonctionne pas.

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
25
26
 
MonEmail est un Email
MonTexteHTML est une chaîne ANSI
MonTexteHTML = fChargeTexte("C:\NewsLetter\NewsDecembre.htm")
EmailImporteHTML(MonEmail,MonTexteHTML,"C:\NewsLetter")
 
MonEmail.Destinataire[1] = SAI_Destinataire
MonEmail.Sujet = "Envoi NewsLetter  de décembre"
MonEmail.Expediteur="monadresse@domaine.fr"
stSession est un emailSessionSMTP
stSession.AdresseServeur ="smtp.xxxx.fr"//SAI_Serveur_SMTP
stSession.Nom="Utilisateur"
stSession.MotDePasse="1234567890"
stSession.Port = 465 
stSession.Option = optionSSL
//Ouverture de session SMTP
SI EmailOuvreSession(stSession) = Vrai ALORS
	//Envoi du message.
	SI EmailEnvoieMessage(stSession,MonEmail) ALORS
		Info("Votre email a été envoyé.")
	SINON
		Erreur(ErreurInfo())
	FIN
SINON
	Erreur("Impossible d'ouvrir une session SMTP.")
FIN

Le session est correcte, j'ai bien le message "Votre email a été envoyé", mais je ne le reçois pas.
Les données me semblent bonnes, les adresses mails sont bonnes.
quand je mets le fichier *.htm dans un champ html il est bien visible.
Où cela coince t'il ? où fais je une erreur
merci pour votre aide.
cordialement,
Obturatix

[philouZ]

Il n'est pas bloqué dans les spams ?

[JeAn-PhI]

bonjour,

EmailImporteHTML ne s’utilise pas avec une variable Email (i.e. : https://doc.pcsoft.fr/fr-FR/?1000018713&name=TYPE_Email) mais avec la structure Email (i.e. : https://doc.pcsoft.fr/fr-FR/?3032029...tructure_email)

il faut faire comme ceci :

Code WL :

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
25
26
27
28
 
MonEmail est un Email
MonTexteHTML est une chaîne
 
MonTexteHTML = fChargeTexte("C:\NewsLetter\NewsDecembre.htm")
 
MonEmail.Sujet = "Envoi NewsLetter  de décembre"
 
MonEmail.Expediteur = "monadresse@domaine.fr"
 
Ajoute(MonEmail.Destinataire, SAI_Destinataire)
 
MonEmail.HTML = MonTexteHTML
 
MonEmail.Message = "Mon texte alternatif en cas de non affichage du message HTML"
 
stSession est un emailSessionSMTP
stSession.AdresseServeur = "smtp.xxxx.fr"
stSession.Nom = "Utilisateur"
stSession.MotDePasse = "1234567890"
stSession.Port = 465 
stSession.Option = optionSSL
//Ouverture de session SMTP
SI PAS EmailOuvreSession(stSession) ALORS RETOUR
 
SI PAS EmailEnvoieMessage(stSession, MonEmail, emailOptionEncodeEntête) ALORS Erreur(ErreurInfo())
 
EmailFermeSession(stSession)

[Obturatix]

Bonjour,
et merci pour vos réponses.
@Philouz
Non j'ai bien regardé
@JeAn-PhI
Je regarde cela.

cordialement,
Obturatix

[Obturatix]

Bonjour à tous,
@JeAn-PhI
merci pour le code, je reçois bien le mail mais pas le corps du message.
même pas le texte de email.message.
par contre si je mets en commentaires :

Code :

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

1
2
//MonTexteHTML = fChargeTexte("C:\NewsLetter\NewsDecembre.htm")
//MonEmail.HTML = MonTexteHTML

je reçois bien l'email avec le texte alternatif...
cela provient donc (probablement du fichier.htm).
pourtant avec le logiciel de création de newsletters , en test je le reçois bien sur l'adresse mail.
je le vois correctement également si je le mets dans un champs HTML.
Le poids ? 37 ko
je ne comprends pas et je galère.
encore une idée d'où cela vient.
cordialement,
Obturatix

[Obturatix]

Bonjour,
je viens de tester avec des newsletters modèles : ça passe.
je vais demander de refaire la création avec une largeur raisonnable (1200 px )
les premiers essais sont ok ,ça passe , j'attends de recevoir la newsletter complète avant de mettre résolu
Dans les temps pour les voeux ...
merci pour l'aide.
cordialement,
Obturatix
ouf ! tout est ok, c'était bien la largeur qui bloquait merci encore