Enviar e-mail
Publicado por Carlos (2 intervenciones) el 30/11/2004 15:25:31
Hola a todos!
Tengo un problema a la hora de enviar un email... Mi intención es que al pulsar en un control button se envíe un email pero no sé por que razón éste nunca llega...
Este es el código que introduzco en el control button:
Dim email As New MailMessage
With email
.From = "[email protected]"
.To = "[email protected]"
.Subject = "Esto es una prueba"
.Body = "<HTML><Body>Probando de enviar email<b>----</b>.<br>Cambio de color <font color=red>rojo</font></Body></HTML>"
.BodyFormat = MailFormat.Html
.Priority = MailPriority.High
.Attachments.Add(New MailAttachment("c:/hola.txt"))
End With
SmtpMail.Send(email)
Hago algo mal para no recibir el mail?
Gracias.
Tengo un problema a la hora de enviar un email... Mi intención es que al pulsar en un control button se envíe un email pero no sé por que razón éste nunca llega...
Este es el código que introduzco en el control button:
Dim email As New MailMessage
With email
.From = "[email protected]"
.To = "[email protected]"
.Subject = "Esto es una prueba"
.Body = "<HTML><Body>Probando de enviar email<b>----</b>.<br>Cambio de color <font color=red>rojo</font></Body></HTML>"
.BodyFormat = MailFormat.Html
.Priority = MailPriority.High
.Attachments.Add(New MailAttachment("c:/hola.txt"))
End With
SmtpMail.Send(email)
Hago algo mal para no recibir el mail?
Gracias.
Valora esta pregunta
0