Hey liebe Gemeinde,
ich möchte das folgende Modul mit einem Button_click ausführen.
dabei sollen mir die ungelesen Nachrichten angezeigt werden.
Was muss ich beim Button1 eintippen damit das passiert ?
Danke im Voraus!
ich möchte das folgende Modul mit einem Button_click ausführen.
dabei sollen mir die ungelesen Nachrichten angezeigt werden.
Was muss ich beim Button1 eintippen damit das passiert ?
Danke im Voraus!
VB.NET-Quellcode
- Imports Limilabs.Mail
- Imports Limilabs.Client.IMAP
- Public Module Email
- Public Sub Main(ByVal args As String())
- Using imap As New Imap()
- imap.Connect("imap.web.de") ' or ConnectSSL for SSL
- imap.UseBestLogin("username", "Passwort)
- imap.SelectInbox()
- Dim uids As List(Of Long) = imap.Search(Flag.Unseen)
- For Each uid As Long In uids
- Dim eml = imap.GetMessageByUID(uid)
- Dim email As IMail = New MailBuilder() _
- .CreateFromEml(eml)
- Console.WriteLine(email.Subject)
- Console.WriteLine(email.Text)
- Next
- imap.Close()
- End Using
- End Sub
- End Module