chaque élément de request.form doit-être encadré par des guillemets : EX request.form("nom") au lieu de request.form(nom)
d'autre part, ton test ne fonctionnera pas.
rajoute dans ton code : response.write request.form&"<br>"
et tu verras que la requete n'est jamais vide même si tu valide des champs vides.
JC
-------------------------------
Réponse au message :
-------------------------------
salut et merci pour le coup de main
j ai rectifie la faute d ortographe mais maintenant j ai le message d erreur suivant as tu une idée
Type d'erreur :
Erreur d'exécution Microsoft VBScript (0x800A01F4)
Variable non définie: 'Nom'
/inetpub/wwwroot/AAMTDM/association/membre/form.asp, line 7
Type de navigateur :
Mozilla/4.0 (compatible; MSIE 6.0b; Windows NT 5.0)
Page :
POST 135 bytes to /inetpub/wwwroot/AAMTDM/association/membre/form.asp
POST Data:
Nom=sdfsqdf&Prenom=qsfdfd&Email=sdfsdfsed&Datenaissance=ssdfdf&Lieu=sdfdf&Adresse=sdfdf&Codep=sdfsdfsdf&Ville=sdffsdfsdf&button=Envoyer
Heure :
lundi 20 août 2001, 19:51:25
-------------------------------
Réponse au message :
-------------------------------
D'accord avec vbtom, mais il y a enoutre un faute d'orthographe :
ce n'est aps CONTENT_LENGHT mais CONTENT_LENGTH
jc
-------------------------------
Réponse au message :
-------------------------------
bonjour quelqu'un peut il m expliquer pourquoi mon script ne fonctionne pas
les donées de mon formulaire devraient apparaitre sur la meme page mais sans les champs
je ne comprend pas voici mon code
<%@LANGUAGE="VBSCRIPT"%>
<%
Option Explicit
Response.Expires = 0
Dim strNom, strPrenom, strEmail, strDatenaissance, strLieu, strAdresse, strCodep, strVille
If Request.ServerVariables("CONTENT_LENGHT") <> 0 Then
strNom = Trim(Request.Form(nom))
strPrenom = Trim(Request.Form(prenom))
strEmail = Trim(Request.Form(email))
strDatenaissance = Trim(Request.Form(datenaissance))
strLieu = Trim(Request.Form(lieu))
strAdresse = Trim(Request.Form(adresse))
strCodep = Trim(Request.Form(codep))
strVille = Trim(Request.Form(ville))
strAdresse = Trim(Request.Form(adresse))
%>
<html>
<body>
Nom : <%= strNom %><BR>
Prenom : <%= strPrenom %><BR>
Email : <%= strEmail %><BR>
Datenaissance : <%= strDatenaissance %><BR>
Lieu : <%= strLieu %><BR>
Adresse : <%= strAdresse %><BR>
Codep : <%= strCodep %><BR>
Ville : <%= strVille %><BR>
</body>
</html>
<%
Else
%>
<html>
<body>
<FORM ACTION="<%= Request.ServerVariables("SCRIPT_NAME") %>"
METHOD="POST">
Nom : <input type="text" name="nom">
Prenom : <input type="text" name="prenom">
Email :<input type="text" name="email">
Datenaissance : <input type="text" name="datenaissance">
Lieu :<input type="text" name="lieu">
Adresse : <input type="text" name="adresse" >
Codep : <input type="text" name="codep" >
Ville : <input type="text" name="ville" >
<input type="submit" value="Envoyer" name="button">
</FORM>
</body>
</html>
<% End If %>