Duvida Codigo

11/10/2014

0

Boa noite, sou um mero iniciante com programação , mas gostaria de tirar algumas duvidas basicas.



eu procurei inumeros tutoriais como enviar um email pelo VB, estou viculando uma caixa de texto com uma sugestao. antes de vincular o codigo ao textbox eu estou procurando algum que funcione, mas esse aqui só da erro de envio



Imports System.Net.Mail

Public Class form_pr

Private Sub Btn_sair_Click(sender As Object, e As EventArgs) Handles Btn_sair.Click
Me.Close()
End Sub

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

Try

Dim servidorsmtp As New SmtpClient()
Dim email As New MailMessage()
servidorsmtp.Credentials = New _
Net.NetworkCredential("emailx@gmail.com", "*********")
servidorsmtp.Port = 587
servidorsmtp.Host = "smtp.gmail.com"
email = New MailMessage
email.From = New MailAddress("emailY@outlook.com")
email.To.Add("emailY@outlook.com")
email.Subject = "Indicação"
email.Body = "Teste"
servidorsmtp.Send(email)
MsgBox("Enviado com sucesso")

Catch ex As Exception
MsgBox("Falha ao enviar")


End Try
End Sub



Tenho tambem uma combobox com varios itens, gostaria de saber qual comando usar pra ao clicar no item 1 me habilitar um novo formulario
Wiratan Silva

Wiratan Silva

Responder

Posts

14/10/2014

Joel Rodrigues

Ao invés de "Falha ao enviar", coloque ex.Message na mensagem para ver qual é o erro exatamente.
Responder

Que tal ter acesso a um e-book gratuito que vai te ajudar muito nesse momento decisivo?

Ver ebook

Recomendado pra quem ainda não iniciou o estudos.

Eu quero
Ver ebook

Recomendado para quem está passando por dificuldades nessa etapa inicial

Eu quero

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar