SoloCodigo

Hola amigos bueno esta vez mi interrogante es la sgten, revisando algunas paginas de www.vb-mundo.com encontré como se podía mandar e-mail desde vb me imagino que será del 2003 este codigo ya que en el 2005 ps no funciona:

Dim mmMail As New System.Web.Mail.MailMessage()
Dim objSmtpServer As System.Web.Mail.SmtpMail
mmMail.From = `me@me.com`
mmMail.To = `you@you.com`
mmMail.Subject = `My subject`
mmMail.Body = `My body`
objSmtpServer.SmtpServer = `my smtp server`
objSmtpServer.Send(mmMail)

No se si funciona o tal vez he puesto mal pero no me sale, alguno de ustedes me puede ayudar para que salga en el 2005, muchas gracias de antemano.  


Tumbes - Perú

Hola que tal RiLaRos bueno hice lo que me dijiste mira y asi puse el codigo:

Imports System.Net.Mail


Public Class Form1

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

        msg.From = New MailAddress(Me.TxtDe.Text)
        msg.To.Add(Me.TxtPara.Text)
        msg.Subject = Me.TxtAsunto.Text
        msg.Body = Me.TxtCuerpo.Text
        msg.IsBodyHtml = False

        Dim smtpServer As New SmtpClient("_____")

        Try
            smtpServer.Send(msg)
            MessageBox.Show("Mensaje enviado Satisfactoriamente!!")
        Catch ex As Exception
            MessageBox.Show("ERROR: " & ex.Message)
        End Try
    End Sub
End Class

Ahora mira donde esta la linea ps pongo el nombre de mi PC, asi entre comillas "NombredePc", por que no se que será tu servidor smtp, bueno cuando entra en Try alli donde dice: smtpServer.Send(msg), pues se salta al Catch, que me falto por favor, para poder mandar e-mail, muchas gracias.  

Tumbes - Perú

Ok muchas gracias pero ya en el vb2005 no esta el NameSpace Imports System.Web.Mail, lo unico que hay es el Imports System.Net.Mail, y ps este codigo me sale error:

CODE  
Dim miCorreo as New MailMessage()


3. Le das las caracteristicas al mail
CODE  
miCorreo.From = "yo@hotmail.com"
miCorreo.To = "Parati@hotmail.com"
miCorreo.Subject = "elAsunto"
miCorreo.Body = "miMensjae"


4.y ahora lo envias:
CODE  
SmtpMail.Send(miCorreo)

La verdad quisiera poder enviar E-mail por vb2005 pero expliquemente que tendria que poner en smtpServer.Send(msg) que mas arriba puse y pregunté que podia poner alli, bueno esperaré su prengunta.  

_________________________________________________________
El Estudio y el Amor no se junta, pero hacen al ser humano completo

jajaja, se te fue la paciencia Soultaker!

 , con eso suficiente para envies tu mail. Como servidor SMTP, tambièn puedes poner localhost.

Saludos,

Como servidor SMTP, tambièn puedes poner localhost.

Falso si no tiene un servidor SMTP corriendo en la misma máquina.

Para enviar mails puedes usar cualquier servidor SMTP al que tengas acceso, si quieres hacer que tu aplicación pueda enviar mails casi siempre, entonces tendrías que tener un servidor SMTP embedido en tu aplicación.

Pero tambien podrias colocar el servidor SMTP de Hotmail