Visual Basic

AddHandler rtf01.SelectionChanged, AddressOf RichTextBox_SelectionChanged

Private Sub RichTextBox_SelectionChanged(ByVal sender As System.Object, ByVal e As System.EventArgs)
    sender.DeselectAll()
  End Sub

Dim oMsg As New MailMessage
With oMsg
    .From = New MailAddress("XXXXXXX@ameritech.net")

    .To.Add("THEONEIWANTTOSENTO@HOTMAIL.COM"

    .Priority = MailPriority.Normal
    .Subject = "Test"
    .Body = "test"
End With
Try
    Dim oSMTP As New SmtpClient("smtp.att.yahoo.com")
    oSMTP.Credentials = New NetworkCredential("XXXXXXX@ameritech.net", "ABCDEFG")
    oSMTP.Send(oMsg)
    oSMTP = Nothing
Catch ex As Exception
    MessageBox.Show("Could not send the status email message." & ControlChars.CrLf & ex.ToString, _
                    "Emailing", MessageBoxButtons.OK, MessageBoxIcon.Stop)
End Try

MailMessage msg=new MailMessage();
msg.From = ...;
msg.To.Add(...);
msg.CC.Add(...);
msg.Subject=...;
msg.Body=...;
SmtpClient client = new SmtpClient(server);
client.Send(msg);

Luc Pattyn [Forum Guidelines] [My Articles]

---

Fixturized forever.

---