Discussion :

[Menadel]

Bonjour tout le monde ,

j'ai développé une application d'envoi de mail avec pièce jointe qui fonctionne normalement , l'application est lancé par tâches planifiées cependant après avoir déployé l'application sur Windows Server 2012 R2 j'ai une erreur (voir image ci dessous)
(sur Windows Server 2012 R2 l'application est lancée par tâches planifiées)



voici mon code:

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
31
32
33
34
35
36
37
38
39
40
41
42
MaSession est un EmailSessionSMTP
MaSession..AdresseServeur = "smtp.gmail.com"
 
MaSession..MotDePasse="motdepasse"
MaSession..Option = emailOptionSécuriséTLS
MaSession..Port=587
 
MaSession..Nom="adresseExpediteur"
monAttache est un EmailAttache
MonMessage est un Email
 
sFichier est une chaîne="E:\Server Web\Point\Rapport_"+DateVersChaîne(DateSys(),"JJ-MM-AAAA")+".pdf"
 
MonMessage..Expediteur = "adresseExpediteur"
 
MonMessage.Destinataire[1]="adresseDestinataire1"
MonMessage.Destinataire[2]="adresseDestinataire2"
 
 
MonMessage..Message = contenuemail
MonMessage..Sujet = "Rapport_de_caisse"+DateVersChaîne(DateSys(),"JJ-MM-AAAA")
 
monAttache..Nom=fExtraitChemin(sFichier,fFichier+fExtension)
monAttache..Contenu=fChargeTexte(sFichier)
 
 
monAttache..ContentDescription="Un document PDF"
 
SI EmailOuvreSession(MaSession) = Faux ALORS
	Erreur(ErreurInfo(errComplet))
FIN
 
Ajoute(MonMessage..Attache,monAttache)
 
SI EmailEnvoieMessage(MaSession,MonMessage) = Faux ALORS
	Erreur("L'envoie de l'email a échoué ! verifiez l'adresse mail " )
 
SINON
	Info("L'envoie de l'email a réussi")
 
FIN
EmailFermeSession(MaSession)

Merci par avance.