Cara Kirim EMail an Dari web part di MOSS 2007

Hi Pengembang,
Berikut ini adalah potongan kode untuk mengirim email dari webpart.

menggunakan Sistem;
menggunakan System.Collections.Generic;
menggunakan System.ComponentModel;
menggunakan System.Text;
menggunakan System.Web;
menggunakan System.Web.UI;
menggunakan System.Web.UI.WebControls;
menggunakan System.Collections.ObjectModel;
menggunakan Microsoft.SharePoint.Utilities;
menggunakan Microsoft.SharePoint;
menggunakan System.Data;
menggunakan System.Collections;
namespace sendmail
{
public class sendmail : Microsoft.SharePoint.WebPartPages.WebPart
{
swasta TextBox txtTo;
Tombol pribadi btnSendMail;
override void CreateChildControls dilindungi()
{
txtTo = new TextBox();
this.Controls.Add(txtTo);
btnSendMail = new Button();
btnSendMail.Text = “Kirim Email”;
btnSendMail.Click = new EventHandler(SendMail_Click);
this.Controls.Add(btnSendMail);
}
batal SendMail_Click(objek pengirim, EventArgs e)
{
SPSite _site = new SPSite(HttpContext.Current.Request.Url.ToString());
SPWeb _web = _site.OpenWeb();
_web.AllowUnsafeUpdates = true;
SPUtility.SendEmail(_web, palsu, palsu, txtTo.Text, “Uji Email”, “Tubuh teks Pesan”);
_web.Dispose();
_site.Dispose();
}
}
}

Buat web part dan mendaftar sebagai SafeControl