Bonjour à tous
Mon application lit des mails au format eml, sans utiliser de clients mails.
Elle extrait les pièces jointes pour les traiter par la suite.
Sur certains mails, le pdf joint est illisible.
bufCheminFichier est un Buffer = "E:\Reception\308938__202501221400.50ME053n002505@erp2d.corporate.ge.com_.eml.eml"
Email.Source = fChargeBuffer(bufCheminFichier)
SI EmailImporteSource() ALORS
sFichierExtrait est une chaîne = "E:\Reception\test.pdf"
EmailSauveFichierAttaché(Email.Attache[1], sFichierExtrait)
contenuFichier est un Buffer = fChargeBuffer(sFichierExtrait)
bufNouveauFichierdecode est un Buffer = Decode(contenuFichier,encodeUUEncode)
fichierDestination est un entier = fOuvre("E:\Reception\test_decode.pdf",foCréation)
fEcrit(fichierDestination,bufNouveauFichierdecode)
FIN
Le fichier test.pdf est illisible.
Si j'ouvre le fichier avec par exemple Notepad++ j'ai le contenu suivant en début de fichier :
begin 600 IP001398.pdf
M)5!$1BTQ+C,-"B7UY/;\#0H-"C<@,"!O8FH@/#P@+U1Y<&4@+UA/8FIE8W0-
M"B]3=6)T>7!E("]);6%G90T*+TYA;64@+TDQ#0HO5VED=&@@-3@V#0HO2&5I
M9VAT(#$U-0T*+T)I='-097)#;VUP;VYE;G0@.`T*+T-O;&]R4W!A8V4@+T1E.....
Ce qui m'a permis de déduire qu'il s'agissait d'un fichier uuencode.
Donc j'ai évidemment chargé le contenu dans un buffer, pour le décoder avec le format UUEncode.
Si j'ouvre la pièce jointe et que je l'enregistre manuellement, elle est parfaitement lisible et lorsque j'utilise notepad++ elle a un contenu qui commence par ça :
%PDF-1.3
%õäöü
7 0 obj << /Type /XObject
/Subtype /Image
/Name /I1
/Width 586
/Height 155
/BitsPerComponent 8
/ColorSpace /DeviceRGB
/Length 87571 /Filter [ /ASCII85Decode /FlateDecode ] >>
stream
Gb",k#FlMt[f>1`]&E%ZY.CcEGCAfFgJq<@_D&k]"&."&$"RXUEb*7"a>rFbU*)H@MIK&<#
La pièce jointe décodée par Windev n'est pas lisible et a le contenu qui commence par ça :
/Subtype /Image
/Name /I1
/Width 586
/Height 155
/BitsPerComponent 8
/ColorSpace /DeviceRGB
/Length 87571 /Filter [ /ASCII85Decode /FlateDecode ] >>
stream
Gb",k#FlMt[f>1`]&E%ZY.CcEGCAfFgJq<@_D&k]"&."&$"RXUEb*7"a>rFbU*)H@MIK&<#
Si je rajoute
%PDF-1.3
%õäöü
7 0 obj << /Type /XObject
en début de fichier il devient maintenant visible.
Est ce que quelqu'un a déjà rencontré ce genre de problème avec windev ?
Merci d'avance