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]