If CheckBox1.Checked Then objMail.IsBodyHtml = True Else objMail.IsBodyHtml = False
        If CheckBox1.Checked = True Then TextBox8.Text = html
        If TextBox6.Text.Trim <> "" Then objMail.Attachments.Add(New System.Net.Mail.Attachment(TextBox6.Text.Trim, Net.Mime.MediaTypeNames.Application.Octet))