1:Imports System.Net.Mail
2:
3:'//e-mail client
4:Dim mail As New MailMessage
5:Dim client As New SmtpClient
6:mail.From = New MailAddress("info@yourdomain.nl", "Name")
7:mail.To.Add(New MailAddress(email, contact))
8:mail.Subject = "Subject text"
9:mail.IsBodyHtml = True
10:mail.Body = ("Text: '" & Text & _
11:"' <br> Text: '" & Text1 & "'")
12:client.Host = "mail.yourdomain.nl"
13:client.DeliveryMethod = SmtpDeliveryMethod.Network
14:client.Send(mail)