<%
Dim objCDOMail
Set objCDOMail = Server.CreateObject("CDONTS.NewMail")
objCDOMail.From = request.form("_email")
objCDOMail.To="santoro.sylvain@laposte.net"
objCDOMail.Subject=request.form("_sujet")
objCDOMail.Body=request.form("_body")
objCDOMail.Send
Set objCDOMail=Nothing
%>