PC SOFT

GRUPOS DE DISCUSSÃO PROFISSIONAL
WINDEVWEBDEV e WINDEV Mobile

Inicio → WINDEV (versões anteriores) → Récupération fichier attaché reception avec Email.Attache
Récupération fichier attaché reception avec Email.Attache
Iniciado por Fred2355, mar., 20 2017 10:34 AM - 2 respostas
Membro registado
231 mensagems
Popularité : +7 (7 votes)
Publicado em março, 20 2017 - 10:34 AM
Bonjour à tous,

J'essaie de récupérer les pièces jointes de messages reçus avec la fonction Email.attaché avec les exemples fournis par les tuto dans le WinDev20.

Voici ce que j'ai écrit.
------
MaSession est une EmailSessionIMAP
MaSession..AdresseServeur = "serveurimpa"
MaSession..Nom = "moncompte"
MaSession..MotDePasse = "monMdP"
MaSession..Port="993"
MaSession..Option=optionSSL
sRepertoirePJ est une chaîne = ComplèteRep(SysRep(srAppDataCommun)) + "MonProjet\Pieces Jointes\"

EmailOuvreSession(MaSession)
TableSupprimeTout(Table_mail)

SI PAS fRépertoireExiste(sRepertoirePJ) ALORS fRepCrée(sRepertoirePJ)

i=0

POUR TOUT MessageEmail NON LU DE MaSession
i=i+1

TableAjouteLigne(Table_mail,MessageEmail..Sujet,MessageEmail..AdresseExpéditeur,MessageEmail..Expediteur)EmailSauveFichierAttaché(Email.Attache[i],sRepertoirePJ + Email.Attache[i])
Trace(i, MessageEmail..Sujet,Email.Attache[i])

FIN

Et je récupère tout, sauf les pièces jointes.

Qu'est ce que j'ai oublié?
Merci pour votre aide.
Publicado em julho, 05 2024 - 7:29 PM
J'AI SUPRIME QLQES FICHIERS ATTACHEES AUX MESSAGES ENVOYER AINSI AUX AUTRES RECEPTIONNER AFIN DE LIBERER L'ESPACE J'AIMERAI BIEN LES RECUPERER QUE DOIT JE FAIRE ?
Membro registado
4.061 mensagems
Popularité : +227 (347 votes)
Publicado em julho, 08 2024 - 11:12 AM
1-Ne pas hurler
2-Dire bonjour

--
Il y a peut être plus simple, mais, ça tourne