Discussion :

[fontag]

Bonjour à tous,

avec mon programme je génère un état que je transforme en fichier .PDF et je souhaiterais envoyer celui-ci par mail. Le problème étant que mon mail se forme mais la pièce jointe ne s'ajoute jamais.

Merci pour vos réponses.

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
		//Impression au format PDF
		NomFichier est une chaîne = ComplèteRep(fRepEnCours()) + "Marché n°" + LIGNE_MARCHE.IDMARCHE + "[" + LIGNE_MARCHE.IDARTISAN + "]" + ".PDF"
		iDestination(iPDF, NomFichier)
		iImprimeEtat(ETAT_CC,LIGNE_MARCHE.IDMARCHE,LIGNE_MARCHE.IDARTISAN)
 
		//On affecte les paramètres du mail aux valeurs des combo				
		add_mail_dest = ARTISAN.mail
		profil = ""
 
		//On affecte les paramètres d'envoi de mail
 
		Email.Destinataire = add_mail_dest
		Email.NbDestinataire = 1
 
		//Déclaration des variables
		sComposition_message est une chaîne
 
		//COmposition du message
		sComposition_message = " Bonjour, " + RC + "veuillez trouver ci-joint la confirmation de commande concernant le client:  " + MARCHE.référence_chantier + "pour le chantier situé à " + MARCHE.ville_chantier
 
 
		//Affectation des données à l'email
		Email.Sujet = "Confirmation de commande : " + MARCHE.référence_chantier
		Email.Message = sComposition_message
		Email.Attache = iDestination(iPDF, NomFichier)

[J0r_x]

Email.NbAttache = 1
Email.Attache = Nomfichier