Discussion :

[nawfalg13]

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
27
28
29
30
sAdresseServeur est une chaîne = "smtp.gmail.com"
sExpediteur est une chaîne = "..........@gmail.com"
sMdp est une chaîne = "******"
sDestinataire est une chaîne = "..........@gmail.com"
sPort est un entier = 587
masession est une EmailSessionSMTP
masession..AdresseServeur=sAdresseServeur
masession..Nom=sExpediteur
masession..MotDePasse=sMdp
masession..Option=emailOptionSécuriséTLS
masession..Port=sPort
courier est une Email
courier.Expediteur="windev"				//sExpediteur
courier.Destinataire[1]=sDestinataire
mail_a_envoyer est chaîne
sMessagetext est une chaîne =[                       // msg
	Bonjour
]
mail_a_envoyer=ChaîneConstruit(sMessagetext)
EmailChangeTimeOut(10)
courier.Message=mail_a_envoyer
courier.Sujet ="windev"
 
SI EmailOuvreSession(masession) ALORS //*********** erreur ******///
	SI EmailEnvoieMessage(masession,courier) = Vrai ALORS
		ToastAffiche("email envoyé avec succes")		
	SINON
		ToastAffiche("email non envoyé")//Erreur(ErreurInfo(errComplet))
	FIN
FIN

[rudolfrudolf]

Bonjour,

alors comment dire ?

et puis met le code entre les balises code