Yo utilizo:
Código vb:
Ver originalDim message As New System.Net.Mail.MailMessage(mi_correo, Dirección_de_email, Asunto, Cuerpo_Mensaje)
Dim emailClient As New System.Net.Mail.SmtpClient(SMTP_Server)
emailClient.Credentials = New System.Net.NetworkCredential(SMTP_User, SMTP_Password)
emailClient.Send(message)
Espero que te sirva.