<% If Request("Action")="Envoyer" then Dim objCDOMail Set objMail = Server.CreateObject("CDONTS.NewMail") objCDOMail.From = request.form("email") objCDOMail.To="info@skier.be" objCDOMail.Body=request.form("texte") objCDOMail.Send Set objCDOMail=Nothing Response.Redirect "merci.htm" else %> Envoyer un e-mail

 

 

 

 

  Envoyer un e-mail via votre programme de messagerie: info@skier.be

  Téléphone en Belgique : 02 375 35 39 

 

 

Rue du Framboisier, 35
1180 Bruxelles
Tél.: 02 375 35 39
Fax: 02 375 90 18 
Licence A5492

 

<%end If%>