Enviar e-mail - Visual Basic usando o Gmail

[joseferreira]

Boa noite

Estive a experimentar o seu procedimento para enviar e-mails usando o VisualBasic.

Usei o gmail, mas não consigo estabelecer uma ligação segura, apesar de definir as credenciais user e pass...

As alterações que fiz ao seu procedimento foram as seguintes:

Public Sub SendMessage(ByVal subject As String, ByVal messageBody As String, ByVal toAddress As String)

        Try
            Dim message1 As New MailMessage()
            With message1
                .From = New MailAddress("meu_e-mail@gmail.com", "José Ferreira")
                .To.Add(toAddress)
                .Subject = subject
                .Body = messageBody
            End With

            Dim networkCredentials As New Net.NetworkCredential()
            With networkCredentials
                .UserName = "meu username"
                .Password = "minha password"
            End With

            Dim client As New SmtpClient()
            With client
                .Credentials = networkCredentials
                .Host = "smtp.gmail.com"
                .EnableSsl = False

                .Send(message1)
            End With

        Catch ex As Exception
            Throw New Exception(ex.Message)
        End Try
    End Sub

A activação deste procedimento é feita usando um Button

Private Sub Cmd_Enviar2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Cmd_Enviar2.Click
        SendMessage("Teste", "E_mail de teste", "e-mail@gmail.com")
    End Sub

No entanto ao correr o programa aparece o seguinte erro:

O servidor SMTP requer uma ligação segura ou o cliente não estava autenticado. A resposta do servidor foi: 5.7.0 Must issue a STARTTLS command first. 28sm361477eyg.12

Será que me poderá ajudar?

Obrigado

[bruno1234]

Se requer ligação segura experimentar trocar:

.EnableSsl = False

por

.EnableSsl = True

[jpaulino]

Olá,

O gmail utiliza a porta 587, que tens de especificar.

Vê este exemplo: How to Send Mails from your GMAIL Account through VB.NET or C#. Windows

EDIT: E com a alteração do bruno1234 também 😄

[joseferreira]

Bruno1234

Muito Obrigado, fiz a alteração e já funciona...

Obrigado também aos restantes pela ajuda

Um abraço

[renafi]

Vou aproveitar o post para colocar uma dúvida: alguém já conseguiu fazer isto no Windows 7?

[jpaulino]

Vou aproveitar o post para colocar uma dúvida: alguém já conseguiu fazer isto no Windows 7?

E qual é a diferença ?

[paulo silva]

Segundo fontes seguras o windows 7 ainda possui problemas a nível de suportar programas de programação.

Ainda não o testei mas estou em vias de. para verificar a veracidade de tal situação.

Cumprimentos Paulo Silva

[jpaulino]

Segundo fontes seguras o windows 7 ainda possui problemas a nível de suportar programas de programação.

Ainda não o testei mas estou em vias de. para verificar a veracidade de tal situação.

Cumprimentos Paulo Silva

Então muda de fontes ... eu uso o Window 7 desde Agosto (oficial) com o Visual Studio 2008 e Visual Studio 2010 e sem qualquer problema 😕

[paulo silva]

Ainda bem que funciona bem  😕 e o sql 2005 e 2008 tambem sem problema?

Cumprimentos Paulo Silva

[jpaulino]

Ainda bem que funciona bem  😕 e o sql 2005 e 2008 tambem sem problema?

Claro 😁