From = "john@vermontdatabase.com";
To = Email;

Message = "Hello, " + Name + ".";



Msg = "From:" + From + "\r\nTo:" + Name + "\r\nSubject:"
	+ Subject + "\r\n\r\n" + Message;

rslt = SendMail(From, To, Msg);
if (rslt = "")
	rslt = "Message sent";
else
	rslt = "Some problem sending message";
<$<?rslt?>$>