Hola, intentè con este codigo y me sale que fue enviado, pero no llega al buzon de correo. No se talvez me falta agregar algo o realizar alguna configuracion.
Imports System.Web.Mail
Private Sub Button1_Click( .....)
Dim objEmail As New MailMessage()
objEmail.To = "
[email protected]"
objEmail.From = "
[email protected]"
objEmail.Subject = "Saludos"
objEmail.Body = "Como estas"
Try
SmtpMail.Send(objEmail)
MsgBox("el mensaje fue enviado")
Catch exc As Exception
MsgBox("error")
End Try
End Sub