VB. NET - GMAIL CONNECTION - PullRequest
       41

VB. NET - GMAIL CONNECTION

0 голосов
/ 25 февраля 2020

Может ли кто-нибудь помочь мне относительно моей проблемы в VB. net для подключения в Gmail. Я создал инструмент, который может подключаться к GMAIL с использованием IMAP, инструмент может извлекать электронную почту gmail и загружать ее в мой список, и все остальные функции работают хорошо, пока я не попытался протестировать его в рабочей области клиента.

URL их gmail - "mail.google.com", что выдает ошибку. Я попытался получить доступ к сайту gmail вручную и обнаружил, что каждый раз, когда я пытался получить доступ к «gmail.com», он всегда перенаправлял на «mail.google.com», в то время как на моем ноутбуке у меня есть inte rnet, который может получить доступ все и gmail.com работает нормально. Я пытался изменить URL-адрес, который вы видите в моем исходном коде ниже, на «imap.mail.google.com», из-за чего у меня возникла ошибка. Я надеюсь, что вы можете помочь мне заранее спасибо!

Imports System.Globalization
Imports System.Text
Imports System.IO
Imports EAGetMail
Imports System.Data
Imports System.Net.Mail

Public Sub TestConnection(ByVal strUser As String, ByVal strPass As String)
    Try '

        Dim oServer As New MailServer("imap.gmail.com",
                strUser,
                strPass,
                ServerProtocol.Imap4)

        ' Enable SSL/TLS connection, most modern email server require SSL/TLS connection by default.
        oServer.SSLConnection = True
        ' Set 993 IMAP SSL Port
        oServer.Port = 993

        Dim oClient As New MailClient("TryIt")
        oClient.Connect(oServer)

        Dim infos As MailInfo() = oClient.GetMailInfos()



        MsgBox("Connection Success")

    Catch ex As Exception
        MsgBox(ex.ToString)
    End Try

End Sub
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...