Ver Mensaje Individual
Antiguo , 16:08:59   #1
Kaffeetrinker 2 Enviar correos desde vb.net 2010 Calificación: de 5,00

Los mejores licores
Bueno, no se si a alguien le sirva... les comparto el código que me fue funcional.
como formulario solo requieren un boton que al darle click envia el correo... adaptenlo que es muy funcional...


[CODE]

Imports System.Net.Mail

Public Class enviar


Public Sub EnvioMail()


Dim smtp As New System.Net.Mail.SmtpClient
Dim correo As New System.Net.Mail.MailMessage
' Dim adjunto As System.Net.Mail.Attachment

With smtp
.Port = 25
.Host = "mail.jamstechnology.com.co"
.Credentials = New System.Net.NetworkCredential("correo remitente", "clave de correo")
.EnableSsl = False
End With
' adjunto = New System.Net.Mail.Attachment("C:\Temp\Adjunto.pdf")
With correo
.From = New System.Net.Mail.MailAddress("correo remitente")
.To.Add("correo destinatario")
.Subject = "Asunto del correo"
.Body = "<strong>Texto del mensaje de correo</strong>"
.IsBodyHtml = True
.Priority = System.Net.Mail.MailPriority.Normal
' .Attachments.Add(adjunto)
End With

Try
smtp.Send(correo)
MessageBox.Show("Su mensaje de correo ha sido enviado.", _
"Correo enviado", _
MessageBoxButtons.OK)
Catch ex As Exception
MessageBox.Show("Error: " & ex.Message, _
"Error al enviar correo", _
MessageBoxButtons.OK)
End Try

End Sub

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

EnvioMail()

End Sub
End Class

[/CODE]

Comentarios Facebook

rsotelo no está en línea   Responder Citando

compartir
                 
remocion sep Gold sep Silver sep Donar

marcaNo Calculado   #1.5
SponSor

avatar
 
Me Gusta denunciando
Estadisticas
Mensajes: 898.814
Me Gusta Recibidos: 75415
Me Gustado Dados: 62988
Fecha de Ingreso: 02 jun 2006
Reputacion
Puntos: 1574370
Ayudante de Santa está en el buen caminoAyudante de Santa está en el buen caminoAyudante de Santa está en el buen caminoAyudante de Santa está en el buen caminoAyudante de Santa está en el buen caminoAyudante de Santa está en el buen caminoAyudante de Santa está en el buen caminoAyudante de Santa está en el buen caminoAyudante de Santa está en el buen caminoAyudante de Santa está en el buen caminoAyudante de Santa está en el buen caminoAyudante de Santa está en el buen caminoAyudante de Santa está en el buen caminoAyudante de Santa está en el buen camino
emoticon Re: Enviar correos desde vb.net 2010

 
Los mejores licores
 
   
   
_______________________________________________
Publicidad :)
conectado
 
Page generated in 0,03863 seconds with 12 queries