Bonjour,
j'ai un formulaire avec plusieurs case à cocher, texte libre et menu déroulant. (le formulaire étant une demande de renseignements sur des formations d'ingénieurs)
J'ai entre autre un menu déroulant où est listé un certain nombre de villes (centres de formation) :
<select name="Centres" id="Centres">
<option>---Choix---</option>
<option>Aix</option>
<option>Angoulême</option>
<option>Arras</option>
<option>Bordeaux</option>
<option>Lyon</option>
<option>Montpellier</option>
<option>Nancy</option>Je voudrais que lorsque le candidat fait son choix de Centre, suivant celui ci le mail sera envoyé à une personne bien distincte :
Exemple si je selectionne le centre Angouleme par exemple, je veux que le formulaire soit envoyé au mail toto@angouleme.fr, de meme si je selectionne Bordeaux, l'adresse mail d'envoi devra être toto@bordeaux.fr
le form action du formulaire est renvoyé sur une page ASP de traitement (j'en ais plusieurs à faire
) ; voici le code que j'ai taper dans un premier temps pour pouvoir associé les input de mon formulaire à des variables , pourriez vous me dire si mon code est bon ou si je vais carrément dans le mur ?
Merci de ce que vous pourrez faire pour moi !!
<% 'page d'action du formulaire inscriptions.asp %>
<%
'Déclaration des variables se rapportant aux input name du formulaire
Dim strNom, strPrenom, strAdresse, strcdp, strVille, strNationnalite, strDateNaissance, strEmail
Dim strTelephone, strPerso, strDiplomes, strSouhait1, strSouhait2, strSouhait3, strSouhait4, strObservations, strCentres, strSubmit
%>
<%
'Attribution des valeurs des variables (input name du formulaire)
strNom = Request.Form("Nom")
strPrenom = Request.Form("Prenom")
strAdresse = Request.Form("Adresse")
strcdp = Request.Form("cdp")
strVille = Request.Form("Ville")
strNationnalite = Request.Form("Nationnalite")
strDateNaissance = Request.Form("DateNaissance")
strEmail = Request.Form("Email")
strTelephone = Request.Form("Telephone")
strPerso = Request.Form("Perso")
strDiplomes = Request.Form("Diplomes")
strSouhait1 = Request.Form("Souhait1")
strSouhait2 = Request.Form("Souhait2")
strSouhait3 = Request.Form("Souhait3")
strSouhait4 = Request.Form("Souhait4")
strObservations = Request.Form("Observations")
strCentres = Request.Form("Centres")
strSbmit = Request.Form("Submit")
%>
<%
'Traitement de la variable Centre
Dim email
Select case strCentre
Case Paris : email="kpham@cesi.fr"
Select case strCentre
Case Lyon : email="icaradot@cesi.fr"
End select
%>
<%
'Traitement de la variable Perso
Dim strEtudiant
if strPerso = True
then response.Write("strEtudiant")
else
do nothing
End if
Dim strSalarie
if strPerso = false
then do nothing
End if