Visual Basic.NET - mandar mails.

Hola quiero mandar un mail. Este es el codigo:

Private Sub btnEnviar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnEnviar.Click

Dim oMessage As New MailMessage()

oMessage.Subject = Me.subjecttxt.Text
oMessage.Body = Me.msgtxt.Text
oMessage.From = New MailAddress(me.fromtxt.Text)
oMessage.To.Add(New MailAddress(me.totxt.Text))
oMessage.Priority = MailPriority.High

Dim client As New SmtpClient("127.0.0.1")

client.Send(oMessage)


Este código NO me tira ningún error pero no manda mail. Cuando me voy a fijar a la casilla de prueba no hay ningun mensaje nuevo !

-instale el IIS con el servidor smtp y lo configuré para que se puedan mandar mails.

Uhmm, yo mandaba mail's pero no hacia esa instancia SmptClient, sino
SmtpMail.Send(oMessage), y si querias especificar el servidor de correos era
SmtpMail.SmtpServer = "MiServidorSMTP"

Yo hacia eso y funcionaba, ojala te sea util
Suerte!

Pues yo uso este en vb.net 2005 y funciona con gmail

Sub envia_Correo(ByVal subjectstr As String, ByVal bodymsg As String)
Dim msg = New Mail.MailMessage()
msg.To.Add("[email protected]") 'a quien va dirigido el mensaje
msg.From = New Mail.MailAddress("[email protected]", "SOY YO", System.Text.Encoding.UTF8) 'quien manda y como aparecera en la parte de remitente
msg.Subject = subjectstr 'el titulo del mensaje
msg.SubjectEncoding = System.Text.Encoding.UTF8
msg.Body = bodymsg ' cuerpo del mensaje
msg.BodyEncoding = System.Text.Encoding.UTF8
msg.IsBodyHtml = False
'msg.Attachments.Add(New Mail.Attachment(ruta_archivo_adjunto))
msg.priority = System.Net.Mail.MailPriority.High 'prioridad

'Aquí es donde se hace lo especial
Dim client = New Mail.SmtpClient()
client.Credentials = New System.Net.NetworkCredential("[email protected]", "mipassword") 'credenciales direccion de correo y clave
client.Port = 587 'puerto smtp
client.Host = "smtp.gmail.com" 'el nombre el smtp
client.EnableSsl = True 'Esto es para que vaya a través de SSL que es obligatorio con GMail
client.Send(msg) 'Envia el mensaje
End Sub

gracias !!!!!!!!!!!!!! este codigo funciona perfecto !!!!!!!!!!!!!!!