PARTICULIER PROFESSIONNEL LA PROTECTION DES BIENS ET DES PERSONNES Vous souhaitez avoir des informations complémentaires n'hésitez pas à nous contacter. Conformément à la loi informatique et Liberté (art. 34), vous disposez d'un droit d'accès, de modification, de rectification et de suppression des données vous concernant. Pour plus d’information contacter nous. <%response.buffer = true%> <%If request.form("Envoyer") = "Envoyer" and Request.Form("champ1") <> "" and Request.Form("champ2") <> "" and Request.Form("email_from") <> "" then Set email = Server.CreateObject ("SMTPsvg.Mailer") email.FromName = "Site SAS26" email.FromAddress = request.form("email_from") email.Subject = "Contact site Sas26" BodyText = BodyText & request.form("champ1") & CHR(10) BodyText = BodyText & request.form("champ2") & CHR(10) BodyText = BodyText & request.form("champ3") & CHR(10) BodyText = BodyText & request.form("champ4") & CHR(10) BodyText = BodyText & request.form("champ5") & CHR(10) BodyText = BodyText & request.form("champ6") & CHR(10) BodyText = BodyText & request.form("champ7") & CHR(10) BodyText = BodyText & request.form("champ8") & CHR(10) BodyText = BodyText & request.form("champ9") & CHR(10) email.BodyText = BodyText email.RemoteHost = "127.0.0.1" email.AddRecipient "SAS26","contact@sas26.fr" If email.SendMail then erreur = "Email ok" Else erreur = "Email non-envoyé, recommencez en n'oubliant pas les champs obligatoires*" End If If erreur = "Email ok" then Response.redirect "mail.html" else Response.Write erreur end if Else Response.write "*Saisie du champs obligatoire." End If %> Agences Rambouillet Tresques Pierrelatte Nom *: Prénom*: Adresse: Adresse suite: Code postal: Ville: Email*: Vous souhaitez avoir des informations sur nos prestations Commentaires*: certification L'actualité La société Nos prestations Nous contacter