<%@LANGUAGE="VBSCRIPT"%>
IMACO , remplisseuses lineaires, étiquetage, emballage et marquage industiel
<%
if request("EmailDestinataire")="" then EmailDestinataire="commercial@cristeal.com" else EmailDestinataire=request("EmailDestinataire")
if request("ObjetMessage")="" then ObjetMessage="Demande de renseignements" else ObjetMessage=request("ObjetMessage")
if request("Nom")<>"" then session("Nom")=request("Nom") end if
if request("Prenom")<>"" then session("Prenom")=request("Prenom") end if
if request("Societe")<>"" then session("Societe")=request("Societe") end if
if request("Ruebureau")<>"" then session("Ruebureau")=request("Ruebureau") end if
if request("Ruebureau2")<>"" then session("Ruebureau2")=request("Ruebureau2") end if
if request("Codepostalbureau")<>"" then session("Codepostalbureau")=request("Codepostalbureau") end if
if request("Villebureau")<>"" then session("Villebureau")=request("Villebureau") end if
if request("Telephonebureau")<>"" then session("Telephonebureau")=request("Telephonebureau") end if
if request("Telecopiebureau")<>"" then session("Telecopiebureau")=request("Telecopiebureau") end if
if request("Telmobile")<>"" then session("Telmobile")=request("Telmobile") end if
if request("Notes")<>"" then session("Notes")=request("Notes") end if
if request("AdresseDeMessagerie")<>"" then
session("AdresseDeMessagerie")=request("AdresseDeMessagerie")
end if
%>
<%
if request("AdresseDeMessagerie")<>"" then
' Erreur = SendJMail("192.168.0.30", "MEDIATER", "michel.feraud@mediater.net", EmailDestinataire, ObjetMessage, "La pièce jointe est produite automatiquement à partir des informations du formulaire.", CheminFichier)
' if Erreur <> "" then response.write(Erreur) end if
end if
%>
