รบกวนขอ Function ในการส่ง email โดยใช้ ภาษา ASP ด้วยค่ะ

<%
	Dim myMail,HTML
		
	Set myMail = Server.CreateObject("CDONTS.NewMail")
	
	myMail.From = "[email protected]"
	myMail.To   = "[email protected]"
	myMail.Subject = "My Subject"
	myMail.Body = "My Body & My Description"
		
	myMail.Send
	Response.write ("Mail Sending.")
	Set myMail = Nothing 
%>