• Revista PROGRAMAR: Já está disponível a edição #53 da revista programar. Faz já o download aqui!

joseferreira

Enviar e-mail - Visual Basic usando o Gmail

10 mensagens neste tópico

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

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Se requer ligação segura experimentar trocar:

.EnableSsl = False

por

.EnableSsl = True

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Bruno1234

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

Obrigado também aos restantes pela ajuda

Um abraço

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

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

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

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

E qual é a diferença ?

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

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

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

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 :confused:

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

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

Cumprimentos Paulo Silva

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

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

Claro :cheesygrin:

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!


Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.


Entrar Agora