Código PHP:
Imports System.Net.Mail
Public Sub EnviarEmail()
Dim Correo As New Net.Mail.MailMessage
Dim smtp As New System.Net.Mail.SmtpClient
Try
Correo.From = New MailAddress("noresponder@dominio.cl", "Nombre del Destinatario")
Correo.Subject = "Sistema Notificando por e-mail"
Correo.Body = "Primera linea del mensaje" & vbCrLf
Correo.Body &= "Segunda linea..."
Correo.IsBodyHtml = False
Correo.Priority = System.Net.Mail.MailPriority.High
'Configuramos el SMTP y enviamos el mensaje
smtp.Host = "localhost" 'localhost indica que tienes un smtp configurado en tu maquina, pero puedes usar otro.
smtp.Send(Correo) 'enviando
Catch ex As Exception
'Registrar el error
MsgBox("La notificación no pudo ser enviada." & vbCrLf & ex.Message, MsgBoxStyle.Information, "Notificaciones")
End Try
MsgBox("La notificación fue enviada satisfactoriamente.", MsgBoxStyle.Information, "Notificaciones")
End Sub