Discussion :

[Vincent Heude]

Bonjour à tous,

Mon but est d'envoyer des mails avec pièce jointe à un certain nombre de personnes.

la pièce jointe est un formulaire page (saisie)

je voudrais transformer ce formulaire page en fichier pdf pour pouvoir l'annexer en pièce jointe dans un mail.

La méthode suivante ne fonctionne pas car, si le chemin est reconnu, le fichier n'apparait pas (et n'existe pas) sur le disque.
Donc je ne peux pas le récupérer pour le mettre en pièce jointe !

Voici le code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
$Enreg:=Enregistrements trouves([ATELIERS])
Boucle ($i;1;$Enreg)
  //----Fixer le formulaire de l'impression----
FORM FIXER SORTIE([ATELIERS];"Impr_feuille_Presence")
  //----Fixer l'option impression vers fichier pdf (code 3) ------
FIXER IMPRIMANTE COURANTE(PDFCreator Nom imprimante)
FIXER OPTION IMPRESSION(Option destination;3;vChemin)
IMPRIMER ENREGISTREMENT([ATELIERS];>)
  //----ici, viendra la méthode pour envoyer un mail avec pièce jointe-----
ENREGISTREMENT SUIVANT([ATELIERS])
Fin de boucle 
FORM FIXER SORTIE([ATELIERS];"Liste_feuilles_Presence")

Qu'est-ce que j'ai mal fait ?

Merci d'avance

Vincent Heude
4D V13.1
Windows 7

[ZeFiF]

je ne sais pas, as tu vérifié que tu avais une sélection ?
par contre j'optimiserais le 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
$Enreg:=Enregistrements trouves([ATELIERS])
FORM FIXER SORTIE([ATELIERS];"Impr_feuille_Presence")
$vt_old:=Lire imprimante courante 
  //----Fixer l'option impression vers fichier pdf (code 3) ------
FIXER IMPRIMANTE COURANTE(PDFCreator Nom imprimante)
FIXER OPTION IMPRESSION(OPTION destination;3;vChemin)
 
Boucle ($i;1;$Enreg)
FIXER OPTION IMPRESSION(Option nom document à imprimer;"imp"+chaine($i)+".pdf")
IMPRIMER ENREGISTREMENT([ATELIERS];>)
ENREGISTREMENT SUIVANT([ATELIERS])
Fin de boucle 
 
FORM FIXER SORTIE([ATELIERS];"Liste_feuilles_Presence")
FIXER IMPRIMANTE COURANTE($vt_old)
FIXER OPTION IMPRESSION(Option nom document à imprimer;"")
 //----ici, viendra la méthode pour envoyer un mail avec les pièces jointes-----

[Vincent Heude]

Bonjour Philippe

Tu as raison, et c'est en posant les questions que l'on trouve souvent les réponses : je n'avais effectivement pas d'enregistrement courant. j'ai donc ajouté : ALLER DANS SELECTION([ATELIERS];1)

J'ai également ajouté une procédure d'effacement de l'ancien fichier pdf car étant sous windows, si je crée un chemin de type "vChemin",
à la sortie, il s"appelera "vChemin.pdf". Donc je l'efface à chaque boucle.

d'autre part, merci pour l'amélioration concernant l'imprimante courante, je n'y avais pas pensé et j'aurais été encore coincé.

merci de ton aide, tu vois, j'avance pas à pas
Bon WE

[stanc]

Je ne pense pas qu'il y ait besoin de FIXER IMPRIMANTE COURANTE. FIXER OPTION IMPRESSION(Option destination;3;vChemin) suffit.

[Vincent Heude]

Bonjour Stanc

ma base est sous windows
Il me semble donc qu'il faille désigner PDFCreator préalablement

Sous mac, en effet, c'est natif

je me trompe ?

[stanc]

J'avais bien compris. PDF Creator ne laisse pas de doute sur la plateforme utilisée

C'est inutile sur mac ou windows en tout cas en v12. Je ne suis pas encore en v13 mais il n'y a pas de raison que ça ait changé.

[Vincent Heude]

Bonjour Stanc

Tu as raison j'ai testé sans "FIXER IMPRIMANTE COURANTE(PDFCreator Nom imprimante)
Ca fonctionne

Tout fonctionne bien maintenant, y compris la méthode d'envoi des mails !

Je vais maintenant essayer de mettre en place un thermomètre de progression car je trouve que c'est un peu long : entre 2 et 3 secondes par PDF créé et envoyé. Donc sur une centaine de mails on est vers 1 minute et demie.

Y-a-t-il quelque part un didacticiel sur le sujet ?
car je n'ai jamais fait de jauges et autres thermomètres Barber shop.

[stanc]

Il y a un nouveau composant intégré à 4D v13 qui s'occupe d'afficher des fenêtres de progression.

4D Progress