Bonjour
Voila j'ai développé une application qui charge les émail de ma boite émail j'ai utilise le pop3 pour récupérer les émail, ces émail ayant tous des pièce jointe
en format PDF et je sauvegarde ces pièce dans répertoire
Voila le code en question :
Dans les premières jours de lancement de l'application toute fonctionne très bien,tous les émail sont récupérer mais
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
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69 MaSession est un EmailSessionPOP3 MaSession..AdresseServeur ="adresseserveur" MaSession..Nom ="nomadresse@nomdomaine" MaSession..MotDePasse ="xxxxxx" sRepert_Temp est une chaîne k est un entier=1 sRepertoirePJ est une chaîne SI EmailOuvreSession(MaSession) ALORS EmailLitPremier(MaSession, MonMessage) TANTQUE PAS MonMessage..EnDehors sCID est une chaîne Attachement est un EmailAttache POUR TOUT Attachement DE MonMessage..Attache sRepertoirePJ = ... ComplèteRep(SysRep(srAppDataCommun)) + "MonProjet\Pieces Jointes\" SI PAS fRépertoireExiste(sRepertoirePJ) ALORS fRepCrée(sRepertoirePJ) FIN SI fExtraitChemin(Attachement..Nom,fExtension)=".pdf" ALORS SI fFichierExiste(sRepertoirePJ+Attachement..Nom)= Faux ALORS SI PAS EmailSauveFichierAttaché(Attachement,sRepertoirePJ+Attachement..Nom) ALORS FEN_recevoire.LIB_Connexion1..Visible=Vrai FEN_recevoire.LIB_Connexion1="Impossible d'établir la connexion" FIN sRepert_Temp=sRepertoirePJ+Attachement..Nom // Récupérer l'identifiant du fichier attaché dans le mail sCID = "cid:" + Attachement..Identifiant // Remplacer les références au fichier attaché // par le nom réel du fichier MonMessage..HTML = Remplace(MonMessage..HTML, sCID, ... "file:" + sRepert_Temp) FIN FIN FIN EmailLitSuivant(MaSession, MonMessage) FIN FIN
dé-que ma boite émail commence a recevoir beaucoup des émail l'application n'arrive pas a charge tous les émail sachant que débit de connexion et très faible
10 ko/s par contre si je l’installe dans un autre pc a une connexion a 100 ko l'application charge facilement les émail
Ma question comment récupérer les émail malgré la connexion et très lent avec la le protocole pop3 ?
et je ne veux pas s'utilise imap.
Aid-moi
Merci
Partager