FORUMS PROFESSIONNELS
WINDEV
,
WEBDEV
et
WINDEV Mobile
Accueil
|
Messages récents
|
Connexion
|
Déconnexion
|
Français
Accueil
→
WEBDEV 2024
→
Boucle lors de l'envoi d'email
Boucle lors de l'envoi d'email
Débuté par BLANDINE / BRESSUIRE, 19 mai 2017 12:38 - Aucune réponse
Connectez-vous…
BLANDINE / BRESSUIRE
#1
Membre enregistré
26 messages
Posté le 19 mai 2017 - 12:38
Bonjour,
J'ai un site Web sur lequel je peux faire une demande d'information envoyée par mail. Quand j'exécute mon site en GO depuis WebDev, tout fonctionne. Quand j'exécute mon site en déploiement, l'envoi du mail boucle.
Voici mon code :
MessageMailContact est une chaîne
MaSession est un EmailSessionSMTP
Mail est un Email
SI (SansEspace(SAI_Nom) <> "") ET (SansEspace(SAI_Mail) <> "") ALORS
MessageMailContact = "CONTACT SITE INTERNET"+CR+CR
SELON SEL_Civilite
CAS 1 : MessageMailContact = MessageMailContact + "M. "
CAS 2 : MessageMailContact = MessageMailContact + "Mme "
CAS 3 : MessageMailContact = MessageMailContact + "Mlle "
FIN
MessageMailContact = MessageMailContact + SansEspace(SAI_Nom) + Espace + SansEspace(SAI_Prenom) + CR + SansEspace(SAI_Adresse) + CR + SansEspace(SAI_CP) + Espace + SansEspace(SAI_Ville) + CR + CR + "Tél. " + SansEspace(SAI_Tel) + " Portable " + SansEspace(SAI_Portable) + CR + CR + "E-Mail : " + SansEspace(SAI_Mail) + CR + CR + "--------------------------------------------------" + CR + CR + "Message :" + CR + CR + SansEspace(SAI_Message)
MaSession..AdresseServeur = "smtp.host.fr"
MaSession..Asynchrone = emailSynchrone
MaSession..MotDePasse = MotDePasseMessagerie
MaSession..Nom = IdentifiantMessagerie
MaSession..Option = optionSSL
MaSession..Port = 465
//Ouverture de la session
SI PAS EmailOuvreSession(MaSession) ALORS
Info ("Connexion perdu " + ErreurInfo())
SINON
Mail.Expediteur = SansEspace(SAI_Mail)
Mail.Message = MessageMailContact
Mail.Sujet = "Demande d'information"
Mail.Destinataire[1] = IdentifiantMessagerie
//Envoie de l'émail
SI PAS EmailEnvoieMessage(MaSession,Mail) ALORS
Info ("Erreur d'envoi : " + ErreurInfo())
SINON
Info ("Mail envoyé avec succès")
FIN
//Fermeture de la session
EmailFermeSession(MaSession)
FIN
FIN
Quelqu'un pourrait-il me guider à ce sujet ?
Merci
Signaler
0
0
→ Revenir à WEBDEV 2024
WINDEV 2024
WEBDEV 2024
WINDEV Mobile 2024
WINDEV (précédentes versions)
WEBDEV (précédentes versions)
WINDEV Mobile (précédentes versions)
Etats & Requêtes
Hors-sujet
Outils
Français
English
Español
Portuguesa
Fermer cette fenêtre
Type de recherche
Uniquement les sujets
Tous les messages
Période de recherche
Date indifférente
Moins d'une heure
Moins de 24 heures
Moins d'une semaine
Moins d'un mois
Moins d'un an
Annuler
Aperçu de votre message
Ajouter une image
Importer une image depuis une URL
Envoyer une image depuis un fichier de votre disque
Déposez ici un fichier ou cliquez sur "Parcourir..."
ou
Annuler
0%
WLangage
SQL
XML, HTML
JAVA, Javascript
Texte