Sub Page_Load(sender As Object, e As EventArgs)
Dim myMail As New MailMessage()
myMail.To = "[email protected]"
myMail.From = "[email protected]"
myMail.Subject = "My Subject"
myMail.BodyFormat = MailFormat.Text
myMail.Body = "My Body & Description"
SmtpMail.SmtpServer = "192.168.0.1" '*** Mail Server ***'
SmtpMail.Send(myMail)
myMail = Nothing
Me.lblText.Text = "Mail Sending."
End Sub