Bonjour,
Le projet que je conçois consiste à rechercher des mails par rapport à leur objet dans un email qui en contient beaucoup.
Mon soucis est que le chargement de l'email est très lent vu le nombre de mail à charger.
Je souhaiterais savoir si il y a moyen d'optimiser le code ci-dessous que j'ai trouvé sur internet.
En vous remerciant d'avance,
pve3
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 Public Shared Function FetchAllMessages(ByVal hostname As String, ByVal port As Integer, ByVal useSsl As Boolean, ByVal username As String, ByVal password As String) As List(Of Message) ' The client disconnects from the server when being disposed Using client As New Pop3Client() ' Connect to the server client.Connect(hostname, port, useSsl) ' Authenticate ourselves towards the server client.Authenticate(username, password) ' Get the number of messages in the inbox Dim messageCount As Integer = client.GetMessageCount() ' We want to download all messages Dim allMessages As New List(Of Message)(messageCount) ' Messages are numbered in the interval: [1, messageCount] ' Ergo: message numbers are 1-based. For i As Integer = 1 To messageCount allMessages.Add(client.GetMessage(i)) Next ' Now return the fetched messages Return allMessages End Using End Function
Partager