1: ' crea un nuovo oggetto MailMessage e specifica mittente e destinatario

   2: Dim Email As New System.Net.Mail.MailMessage( _

   3:    "info@vbdotnet.it", "info@pippo.com")

   4: Email.Subject = "test subject"

   5: Email.Body = "this is a test"

   6: Dim mailClient As New System.Net.Mail.SmtpClient()

   7:  

   8: ' questo oggetto salva le credenziali per l'accesso al server SMTP

   9: Dim basicAuthenticationInfo As _

  10:    New System.Net.NetworkCredential("username", "password")

  11:  

  12: ' inserire qui il tuo server remoto o quello del tuo providers

  13: mailClient.Host = "Mail.RemoteMailServer.com"

  14: mailClient.UseDefaultCredentials = False

  15: mailClient.Credentials = basicAuthenticationInfo

  16: mailClient.Send(Email)