none
Enviar um mail RRS feed

  • Pergunta

  • boa tarde

    Estou a fazer um email e esse email ira enviar informaçao que vem de uma base de dados, mas junto com esse email eu gostaria de enviar uma image, como faço isso?

    Obrigado

    segunda-feira, 16 de março de 2015 15:59

Respostas

  • Olá!

    Segue modelo usando Hotmail ("smtp.live.com"), porta "587"

    Para usar em "Gmail" = ("smtp.gmail.com"), porta "587"

    Aqui eu coloquei para um "Button", mas você pode inserir num "Timer" e configurar o tempo que precisas.

    ImportsSystem.Net.Mail

    ImportsSystem.Net.Mail.Attachment


    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

            Dim mail As New MailMessage()

            Dim SmtpServer As New SmtpClient("smtp.live.com")

            mail.From = New MailAddress("Seu email"")

            mail.[To].Add("Seu email")

            mail.Subject = "Envio de Imagem"

            mail.Body = "Email com Anexo"

     

            Dim attachment As System.Net.Mail.Attachment

            attachment = New System.Net.Mail.Attachment("C:\Exemplo\Arquivo.jpeg")

            mail.Attachments.Add(attachment)

     

            SmtpServer.Port = 587

            SmtpServer.Credentials = New System.Net.NetworkCredential("Seu email", "Sua Senha")

            SmtpServer.EnableSsl = True

     

            SmtpServer.Send(mail)

            MessageBox.Show("mail Send")

        End Sub

    Espero ter lhe ajudado.



    MS INFORMATICA


    quinta-feira, 19 de março de 2015 18:44

Todas as Respostas

  • Bom dia Kookie,

    Não entendi direito seu problema, você esta tentando fazer um email automático com essas informações da base? Quer adicionar a imagem automaticamente ou está tentando anexar um arquivo?

    Fico no aguardo,

    Obrigado,

    Abraço!


    Eduardo Romero

    Esse conteudo e fornecido sem garantias de qualquer tipo, seja expressa ou implicita.

    MSDN Community Support

    Por favor, lembre-se de Marcar como Resposta as respostas que resolveram o seu problema. Essa e uma maneira comum de reconhecer aqueles que o ajudaram e fazer com que seja mais facil para os outros visitantes encontrarem a resolucao mais tarde.

    quinta-feira, 19 de março de 2015 15:35
    Moderador
  • Olá!

    Segue modelo usando Hotmail ("smtp.live.com"), porta "587"

    Para usar em "Gmail" = ("smtp.gmail.com"), porta "587"

    Aqui eu coloquei para um "Button", mas você pode inserir num "Timer" e configurar o tempo que precisas.

    ImportsSystem.Net.Mail

    ImportsSystem.Net.Mail.Attachment


    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

            Dim mail As New MailMessage()

            Dim SmtpServer As New SmtpClient("smtp.live.com")

            mail.From = New MailAddress("Seu email"")

            mail.[To].Add("Seu email")

            mail.Subject = "Envio de Imagem"

            mail.Body = "Email com Anexo"

     

            Dim attachment As System.Net.Mail.Attachment

            attachment = New System.Net.Mail.Attachment("C:\Exemplo\Arquivo.jpeg")

            mail.Attachments.Add(attachment)

     

            SmtpServer.Port = 587

            SmtpServer.Credentials = New System.Net.NetworkCredential("Seu email", "Sua Senha")

            SmtpServer.EnableSsl = True

     

            SmtpServer.Send(mail)

            MessageBox.Show("mail Send")

        End Sub

    Espero ter lhe ajudado.



    MS INFORMATICA


    quinta-feira, 19 de março de 2015 18:44
  • estou a tentar adicionar automaticamente :)

    obrigado 

    quinta-feira, 19 de março de 2015 21:04
  • estou a tentar adicionar automaticamente :)

    obrigado 


    De nada, filho!

    MS INFORMATICA

    sexta-feira, 20 de março de 2015 02:48