FORUMS PROFESSIONNELS
WINDEV
,
WEBDEV
et
WINDEV Mobile
Accueil
|
Messages récents
|
Connexion
|
Déconnexion
|
Français
Accueil
→
WEBDEV 2024
→
Envoyer un mail depuis le serveur
Envoyer un mail depuis le serveur
Débuté par Js, 07 jan. 2005 11:08 - 3 réponses
Connectez-vous…
Js
#1
Posté le 07 janvier 2005 - 11:08
J'aimerais envoyer un mail depuis le serveur de mon entreprise (ou est installé ma version déploiement) qqn à un exemple de conde?
J'utilise outlook avec exange
Signaler
0
0
philippe squeville
#2
Posté le 01 février 2005 - 19:39
je cherche egalement le reponse
merci de me repondre si t ua des infos complémentaires
Signaler
0
0
Frédéric RICHARD
#3
Posté le 02 février 2005 - 09:10
Voici un exemple :
_Robot = Compte sur le serveur de messagerie
_SMTP = Adresse du serveur
SI EmailOuvreSessionSMTP(_Robot,_SMTP) ALORS
Email.NbDestinataire = 1
Email.Destinataire[1] = "toto@toto.com"
Email.sujet = "Test Pour Mot de passe"
Email.Message = "Veuillez trouver votre mot de passe : "
Email.adresseExpéditeur = "informatique@société.com"
Email.Expéditeur = "informatique@société.com"
SI PAS EmailEnvoieMessage(_Robot) ALORS
Erreur("Erreur","Le message n'a pas été
envoyé",ErreurInfo(errMessage))
SINON
Info("Le message contenant votre mot de passe vient de partir...")
FIN
EmailFermeSession(_Robot)
SINON
Erreur("Un problème technique ne permet pas d'envoyer d'email pour
l'instant.","","","Veuillez réessayer dans quelques minutes SVP.")
FIN
"philippe squeville" <philippe.squeville@ctcom.fr> a écrit dans le message
de news: 41ffb406$1@news.pcsoft.fr...
je cherche egalement le reponse
merci de me repondre si t ua des infos complémentaires
Signaler
0
0
Eric R.
#4
Posté le 02 février 2005 - 09:24
philippe squeville a couché sur son écran :
je cherche egalement le reponse
merci de me repondre si t ua des infos complémentaires
C'est le site qui envoie le mail ? donc tu peux utiliser les fn
EmailEnvoie.
Voilà le bout de code utilisé par les wtablettes pour le formulaire de
publication (que je vous invite à utiliser bien sûr)
EmailOuvreSessionSMTP("EnvoiEmail", "smtp.tonsmtp.net")
//Email.Expéditeur = "NomExpéditeur <adresse@expediteur.com>"
Email.Expéditeur = AUTEUR+" <"+VOTREMAIL+">"
Email.Destinataire[1] = "contact <contact@tondomaine.net>"
Email.Destinataire[2]=AUTEUR+" <"+VOTREMAIL+">"
Email.NbDestinataire = 2
Email.NbAttache=0
Email.Sujet = "[PUBLIEZ] "+AUTEUR + " va publier "+TVD_TITRE+"
["+refId+"]"
Email.Message = txtmsg
// Envoie le mail
SI PAS EmailEnvoieMessage("EnvoiEmail") ALORS
Erreur("EmailEnvoieMessage a échoué '" + ErreurInfo(errMessage) + "'")
SINON
Info("Votre demande a été envoyée par Email (+copie à votre
adresse)"+RC+...
"Merci de votre participation aux WTablettes")
FIN
EmailFermeSession("EnvoiEmail")
--
Eric
Webmaster des Wtablettes
www.wtablettes.net
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