presentationactivitesquestionscontact

francaisenglishdeutsch

i
 

Please send us your questions using the following form :

   <% If (cStr(Request("Submit")) <> "") Then Dim objCDO, varnom, varprenom, varemail, varbody, body varnom = Request.Form("lastname") varprenom = Request.Form("firstname") varemail = Request.Form("email") varbody = Request.Form("message") body = varnom & " " & varprenom & VbCrLf & varemail & VbCrLf & varbody Set objCDO = Server.CreateObject("CDONTS.NewMail") objCDO.From = "info@streitdecolletage.com" objCDO.To = "info@streitdecolletage.com" 'objCDO.CC = Request.Form("body") objCDO.Subject = "Questions en provenance du site web" objCDO.Body = body objCDO.Send() Set objCDO = Nothing Response.Redirect("merci.html") End If %>

Last name : First name:

Email :

 

 

Design SkyWard . The contents of this site are copyright © 2000, STREIT Decolletage. All Rights Reserved.