大红袍兄,如下代码提示错误,该如何写代码呢?
Dim pop3Server As String = "pop.163.com"
Dim pop3Port As Integer = "110"
Dim pop3UseSsl As Boolean = False
Dim username As String = "XXXXX@163.com"
Dim password As String = "YYYYY"
Using pop3 As New LumiSoft.Net.POP3.Client.POP3_Client()
pop3.Connect(pop3Server, pop3Port, pop3UseSsl)
pop3.Login(username, password )
Dim infos As object = pop3.messages()
Dim yjzs As Integer = Infos.count
Dim msgs As object = pop3.messages()
For i As Integer = 0 To yjzs-1
msgs(i).Mail.MarkForDeletion()
Next