Array
(
)

Duvida Codigo

Wiratan Silva
   - 11 out 2014

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

Joel Rodrigues
   - 14 out 2014

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