¿Cómo puedo enviar un mail desde vb .net 2003?
Hola buenos días
Tengo una duda, me gustaría saber si es posible crear un botón que al hacer clic sobre el mande un mail con la información que contiene el formulario a una cuenta de correo electrónico.
¿Es posible eso?
Necesito ayuda, soy novato en esto
Saludos a todos y gracias anticipadas!
Tengo una duda, me gustaría saber si es posible crear un botón que al hacer clic sobre el mande un mail con la información que contiene el formulario a una cuenta de correo electrónico.
¿Es posible eso?
Necesito ayuda, soy novato en esto
Saludos a todos y gracias anticipadas!
1 Respuesta
Respuesta de gamo80
1
Para eso debes de tener acceso a un servidor de correo. Te dejo esto para que lo veas:
Imports System. Web. Mail
Private Sub BtnEnviar_Click(ByVal sender As System.Object _
, ByVal e As System.EventArgs) _
Handles BtnEnviar. Click
Dim mmMail As New MailMessage
Dim objSmtpServer As SmtpMail
mmMail.From = "[email protected]"
mmMail.To = "[email protected]"
mmMail.Subject = "Asunto"
mmMail.Body = "Cuerpo del Mensaje"
Dim oAttachment As MailAttachment = New MailAttachment("C:\prueba.txt")
mmMail.Attachments.Add(oAttachment)
objSmtpServer.SmtpServer = "TuservidorSMTP"
Try
objSmtpServer.Send(mmMail)
Catch ex As Exception
MessageBox.Show("Error en envió:" & vbCrLf & ex.Message)
End Try
End Sub
Imports System. Web. Mail
Private Sub BtnEnviar_Click(ByVal sender As System.Object _
, ByVal e As System.EventArgs) _
Handles BtnEnviar. Click
Dim mmMail As New MailMessage
Dim objSmtpServer As SmtpMail
mmMail.From = "[email protected]"
mmMail.To = "[email protected]"
mmMail.Subject = "Asunto"
mmMail.Body = "Cuerpo del Mensaje"
Dim oAttachment As MailAttachment = New MailAttachment("C:\prueba.txt")
mmMail.Attachments.Add(oAttachment)
objSmtpServer.SmtpServer = "TuservidorSMTP"
Try
objSmtpServer.Send(mmMail)
Catch ex As Exception
MessageBox.Show("Error en envió:" & vbCrLf & ex.Message)
End Try
End Sub
