<%
<%
Dim objCDOMail
Set objCDOMail = Server.CreateObject("CDONTS.NewMail")
objCDOMail.From = Request.Form("_email")
objCDOMail.To="webmaster@evangile.ca"
objCDOMail.Subject=Request.Form("_sujet")
objCDOMail.Body=Request.Form("_body")
objCDOMail.Send
Set objCDOMail=Nothing
%>