|
| envoi email avec pdf possedant un mot de passe. |
| Iniciado por agidrol, 02,dic. 2019 19:40 - 4 respuestas |
| |
| | | |
|
| |
Miembro registrado 204 mensajes |
|
| Publicado el 02,diciembre 2019 - 19:40 |
Bonjour à tous
j envoi des fichiers PDF par email et aucun soucis.
ce matin, je voulais sécuriser cet envoi, et j'ai décidé d'ajouter un mot de passe au PDF
donc j'ai utilisé la fonction PDFMotDePasse()
il me créé bien le fichier PDF crypté, par contre, le mail semble partir, mais je ne le reçois jamais, et il est pas dans mes spam.
Une idée ?
Merci
Antoine |
| |
| |
| | | |
|
| | |
| |
Miembro registrado 1.330 mensajes |
|
| Publicado el 03,diciembre 2019 - 08:39 |
Salut Agidrol,
Quel est la partie de ton code pour ajouter ta pièce jointe au mail ? Sinon ça va être compliqué de t'aider 
Cordialement Daryl
-- http://www.concept4u2.com |
| |
| |
| | | |
|
| | |
| |
Miembro registrado 204 mensajes |
|
| Publicado el 03,diciembre 2019 - 19:05 |
Bonjour
le code fonctionne, puisque si j'attache à l'email le pdf qui ne contient pas le mot de passe, l'email est envoyé et bien reçu. Si j'attache à l'email le pdf qui est protégé par mot de passe, l'email est envoyé car je n'ai pas d'erreur en retour, et pourtant, je ne le reçois pas sur mon email gmail
ce serai pas un soucis de gmail qui bloque ?
ci joint le code merci
....... Ajoute(objEmail.Destinataire,SALAPLUS.SAP_Alpha[13]) objEmail.Sujet="Expédition document pdf: "+Date1 objEmail.Message="Bonjour."+RC+RC+"Vous trouverez ci joint votre PDF."+RC+RC+"cordialement"+RC+RC+"La Direction" // Construction de la variable emailAttache monAttache..Nom = SALARIE.NomSalarié+".pdf" monAttache..Contenu = fChargeBuffer( ComplèteRep(fRepExe())+"ENVOI_EMAIL\"+SALARIE.NomSalarié+".pdf") monAttache..ContentType = "application/pdf" monAttache..ContentDescription = "Un document PDF" // Ajout de la pièce jointe Ajoute(objEmail..Attache, monAttache) EmailEnvoieMessage(objSMTPSession,objEmail) SI ErreurDétectée ALORS Erreur("Impossible d'expédier un mail à :"+SALAPLUS.SAP_Alpha[13],ErreurInfo()) SINON ToastAffiche("Email expédié à : "+SALAPLUS.SAP_Alpha[13],toastCourt,cvMilieu,chCentre,iBleuClair) FIN |
| |
| |
| | | |
|
| | |
| |
Miembro registrado 1.330 mensajes |
|
| Publicado el 04,diciembre 2019 - 09:56 |
Salut Agidrol,
As-tu déjà essayé avec une autre méthode qu'en utilisant une variable de type emailAttache ?
Si tu remplaces par exemple
monAttache..Nom = SALARIE.NomSalarié+".pdf" monAttache..Contenu = fChargeBuffer( ComplèteRep(fRepExe())+"ENVOI_EMAIL\"+SALARIE.NomSalarié+".pdf") monAttache..ContentType = "application/pdf" monAttache..ContentDescription = "Un document PDF"
Ajoute(objEmail..Attache, monAttache)
par
objEmail..Attache[1]..Nom = SALARIE.NomSalarié+".pdf" objEmail..Attache[1]..Contenu = fChargeBuffer( ComplèteRep(fRepExe())+"ENVOI_EMAIL\"+SALARIE.NomSalarié+".pdf") objEmail..Attache[1]..ContentType = "application/pdf" objEmail..Attache[1]..ContentDescription = "Un document PDF"
ou en utilisant la fonction EmailChargeFichierAttaché()
EmailChargeFichierAttaché(objEmail, ComplèteRep(fRepExe())+"ENVOI_EMAIL\"+SALARIE.NomSalarié+".pdf")
Cordialement Daryl
-- http://www.concept4u2.com |
| |
| |
| | | |
|
| | |
| |
Miembro registrado 204 mensajes |
|
| Publicado el 04,diciembre 2019 - 18:18 |
Merci Daryl
je regarde cela à mon retour de congés et je vous ferais un retour fin janvier |
| |
| |
| | | |
|
| | | | |
| | |
|