Sut i Anfon e-bost gan WebPart yn MOSS 2007

Hi Devs,
Mae'r canlynol yn y darn o cod i anfon e-bost oddi wrth webpart.

ddefnyddio System;
defnyddio System.Collections.Generic;
defnyddio System.ComponentModel;
defnyddio System.Text;
defnyddio System.Web;
defnyddio System.Web.UI;
defnyddio System.Web.UI.WebControls;
defnyddio System.Collections.ObjectModel;
defnyddio Microsoft.SharePoint.Utilities;
defnyddio Microsoft.SharePoint;
defnyddio System.Data;
defnyddio System.Collections;
Sendmail namespace
{
Sendmail cyhoeddus o'r radd : Microsoft.SharePoint.WebPartPages.WebPart
{
preifat textbox txtTo;
btnSendMail Botwm preifat;
CreateChildControls gwrthwneud diogelu ddi-rym()
{
txtTo = newydd textbox();
this.Controls.Add(txtTo);
btnSendMail = newydd Button();
btnSendMail.Text = “Anfon E-bost”;
btnSendMail.Click = newydd EventHandler(SendMail_Click);
this.Controls.Add(btnSendMail);
}
ddi-rym SendMail_Click(anfonwr gwrthrych, EventArgs e)
{
SPSite _site = newydd SPSite(HttpContext.Current.Request.Url.ToString());
SPWeb _web = _site.OpenWeb();
_web.AllowUnsafeUpdates = gwir;
SPUtility.SendEmail(_web, ffug, ffug, txtTo.Text, “E-bost Prawf”, “Neges Corff testun”);
_web.Dispose();
_site.Dispose();
}
}
}

Creu y WebPart a chofrestru fel SafeControl