PC SOFT

FORUMS PROFESSIONNELS
WINDEV, WEBDEV et WINDEV Mobile

|
|
|
FR
Accueil → WINDEV 2025 → Envoi email avec Exchange
Envoi email avec Exchange
Débuté par BCog, 15 mar. 2025 10:34 - 7 réponses
#1
Membre enregistré
11 messages
Posté le 15 mars 2025 - 10:34
Dans Outlook j’ai 2 adresses (voir image):

Je cherche à envoyer un message avec le compte Exchange : toto@spf13.org.
Le code est le suivant
MaSession est un emailSessionSMTP
ValSession est un entier

MaSession..AdresseServeur = "toto@spf13.org"
MaSession..Option=emailOptionDéfaut
ValSession=EmailOuvreSession(MaSession)

Ca plante !!
Merci de votre retour.



Signaler
0
0
#2
Membre enregistré
3 593 messages
Posté le 15 mars 2025 - 13:51
Signaler
0
0
#3
Membre enregistré
11 messages
Posté le 15 mars 2025 - 16:26
Popoy a écrit :
Salut
As tu vu cette page
https://forum.pcsoft.fr/fr-FR/pcsoft.fr.windev/183162-envoi-mail-avec-serveur-exchange/read.awp


Le dernier code :
Valsession est un entier
ValSession=EmailOuvreSessionOutlook("")
SI (ValSession=0) ALORS //La session s'ouvre bien
Erreur(ErreurInfo(errMessage))
Boolenvoieemail=Faux
SINON
//Envoi du message
SI (EmailEnvoieMessage(ValSession) = Faux) ALORS

Le retour de EmailEnvoieMessage(ValSession est faux
Et là j'ai un message d'erreur :
La variable Email.NbDestinataire vaut 0.
Signaler
0
0
#4
Membre enregistré
3 593 messages
Posté le 15 mars 2025 - 16:32
As tu fais le connecteur de réception ?
Signaler
0
0
#5
Membre enregistré
11 messages
Posté le 15 mars 2025 - 16:46
C'est bon j'ai trouvé , ça marche.
Signaler
0
1
#6
Membre enregistré
4 217 messages
Posté le 15 mars 2025 - 20:32
Bonjour,
Cela pourrait être utile à des utilisateurs ultérieurs de savoir comment tu as fait. Avec un code balisé ce serait encore mieux.

--
Il y a peut être plus simple, mais, ça tourne
Quand tout a échoué, utilise l'option RTFM
Signaler
0
0
#7
Posté le 07 avril 2025 - 16:27
BCog a écrit :
> C'est bon j'ai trouvé , ça marche


Bonjour à tous ,

Sans vouloir abuser, est-ce possible de connaître la solution, s'il vous plaît ?
Ce serait gentil.
Merci d'avance. Très bonne journée
Gilles
Signaler
0
0
#8
Membre enregistré
11 messages
Posté le 09 avril 2025 - 18:44
Bonjour,
Oui j'aurai pu donner le code qui marche, désolé.

Le code suivant marche sans problème :
//Ouverture d'une session Outlook
ValSession=EmailOuvreSessionOutlook("")
SI (ValSession=0) ALORS
Erreur(ErreurInfo(errMessage))
Boolenvoieemail=Faux
SINON
//Envoi du message
SI (EmailEnvoieMessage(ValSession,MonMessage) = Faux) ALORS
Erreur(ErreurInfo(errMessage))
Boolenvoieemail=Faux
SINON
ToastAffiche("envoi email Ok")
Boolenvoieemail=Vrai
FIN
//Fermeture de la session Outlook
EmailFermeSession(MaSession)
FIN

Les emails sont rangés dans mon Outlook, la signature est incorporée.
Désolé encore
Signaler
0
0
→ Revenir à WINDEV 2025