Bonjour,
J'ai un formulaire qui envois les données via une page asp et j'aimerais que ma page asp envois les données des champs lorsqu'ils ne sont pas caché mais pas lorsqu'ils sont caché. Les champs sont caché ou non selon une action de l'utilisateur.
Merci
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30 <%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <% sendUrl="http://schemas.microsoft.com/cdo/configuration/sendusing" smtpUrl="http://schemas.microsoft.com/cdo/configuration/smtpserver" ' Set the mail server configuration Set objConfig=CreateObject("CDO.Configuration") objConfig.Fields.Item(sendUrl)=2 ' cdoSendUsingPort objConfig.Fields.Item(smtpUrl)="relay-hosting.secureserver.net" objConfig.Fields.Update ' Create and send the mail Set objMail=CreateObject("CDO.Message") ' Use the config object created above Set objMail.Configuration=objConfig objMail.From="formmailer@secureserver.net" objMail.ReplyTo="Ne pas répondre" objMail.To="eiffel@multi-grafe.com" objMail.Subject="subject" objMail.TextBody="Nom" & Request.Form("nom") & vbcrlf objMail.TextBody=objMail.TextBody & "Téléphone" & Request.Form("tel") & vbcrlf //champs caché si l'utilisateur le demande objMail.TextBody=objMail.TextBody & "Courriel" & Request.Form("email") & vbcrlf objMail.TextBody=objMail.TextBody & "Notes et commentaires" & Request.Form("notes") objMail.Send Response.Write("<b>") & vbcrlf Response.Write("Merci !<br /><br />Nous communiquerons avec vous dans les plus brefs délais.") & vbcrlf Response.Write("<b>") %>
Frédéric
Partager