Submit en panne
insene22
Messages postés
3
Date d'inscription
Statut
Membre
-
Tantor8 Messages postés 46 Statut Membre -
Tantor8 Messages postés 46 Statut Membre -
Bonjour,je souhaite enregistrer des données saisies dans un formulaire (sous htm; nom, prenom, date de naissance) dans une base LDAP.
Quand je clique sur le bouton envoyer" submit " rien ne se passe.
un coup de pouce svp , merci.
Quand je clique sur le bouton envoyer" submit " rien ne se passe.
un coup de pouce svp , merci.
Configuration: Windows XP Internet Explorer 6.0
2 réponses
-
Est-ce que le la propriété "action" de la balise form est correctement renseigné ?
-
bonjour,
il faudrais mettre un peu de code:
la balise <form> par exemple, celle du submit aussi, et le javascript si tu fait appel à une fonction.
a+-
Bonjour , merci pour vos interventions, voici le script
</SCRIPT>
</HEAD>
<BODY LANGUAGE="VBScript" BGCOLOR="#bfbfff",OnLoad =Page_Initialize>
<CENTER><H1>...::: Création d'un utilisateur :::...</H1>
<FORM NAME = "frmuser" METHOD = "Post">
<table>
<form name="Formulaire">
<table>
<tr align = center>
<td><font color=#00FF00>Login : </font></td><td><input type="text" name="StringResultat1"></td>
</tr>
<tr align = center>
<td><font color=#00FF00>Mot de Passe : </font></td><td><input type="password" name="StringResultat2"></td>
</tr>
<tr align = center>
<td><font color=#00FF00>Nom : </font></td><td><input type="text" name="StringResultat3"></td>
</tr>
<tr align = center>
<td><font color=#00FF00>Prénom : </font></td><td><input type="texte" name="StringResultat4"></td>
</tr>
<tr align = center>
<td><font color=#00FF00>Unité d'Organisation : </font></td><td><input type="texte" name="StringResultat5"></td>
</tr><tr align = center>
<td><font color=#00FF00>Description : </font></td><td><input type="texte" name="StringResultat6"></td>
</tr>
<tr align = center>
<td><font color=#00FF00>Etage : </font></td><td><input type="" name="StringResultat7"></td>
</tr>
</table>
<INPUT TYPE="submit" VALUE="créer" Name ="create" Onclick="createuser()">
<INPUT TYPE="reset" VALUE="Ré-Initialiser le Formulaire">
</FORM>
</P></BODY></HTML>
Merci encore</SCRIPT> </HEAD> <BODY LANGUAGE="VBScript" BGCOLOR="#bfbfff",OnLoad =Page_Initialize> <CENTER><H1>...::: Création d'un utilisateur :::...</H1> <FORM NAME = "frmuser" METHOD = "Post"> <table> <tr align = center> <td><font color=#00FF00>Login : </font></td><td><input type="text" name="StringResultat1"></td> </tr> <tr align = center> <td><font color=#00FF00>Mot de Passe : </font></td><td><input type="password" name="StringResultat2"></td> </tr> <tr align = center> <td><font color=#00FF00>Nom : </font></td><td><input type="text" name="StringResultat3"></td> </tr> <tr align = center> <td><font color=#00FF00>Prénom : </font></td><td><input type="text" name="StringResultat4"></td> </tr> <tr align = center> <td><font color=#00FF00>Unité d'Organisation : </font></td><td><input type="texte" name="StringResultat5"></td> </tr><tr align = center> <td><font color=#00FF00>Description : </font></td><td><input type="text" name="StringResultat6"></td> </tr> <tr align = center> <td><font color=#00FF00>Etage : </font></td><td><input type="text" name="StringResultat7"></td> </tr> </table> <INPUT TYPE="submit" VALUE="créer" Name ="create" Onclick="createuser()"> <INPUT TYPE="reset" VALUE="Ré-Initialiser le Formulaire"> </FORM> </P> </BODY> </HTML>
J'ai enlever une balise <form> et une <table> car je ne voyait pas à quoi elles servaient vu qu'elles n'étaient pas fermées plus tard. Puis tu avais des type="texte" je les ais remplacés par de "text" ainsi qu'un type vide qui je pense été aussi une type texte.
Je te conseille de faire des tabulation pour mieux structurer ton code et par conséquent avoir une meilleure lisibilité.(Enfin sur ton logiciel de programmation car ici sa va etre un peut court en largeur)
Bon après je connais pas trop le VBScript,je programme surtout en html, javascript et php. Donc je peux me tromper.
Puis j'aimerais aussi voir ta méthode createuser(), le problème peut aussi venir de la. Vu que tu avais deux formulaires il se peut que tu fasse référence au mauvais.
a+- Bonjour , merci tantor pour ton aide, voici le script vb pour le creatuser
, l'inconvenient c'est que cela valide champ par champ et non de façon globale.
<HTML><HEAD>
<TITLE>Validation dans formulaire avec VBScript</TITLE>
<SCRIPT LANGUAGE="VBscript">
Sub createuser
Dim StringResultat1
Dim StringResultat2
Dim StringResultat3
Dim StringResultat4
Dim StringResultat5
Dim StringResultat6
Dim StringResultat7
StringResultat1 = Formulaire.StringResultat1.Value
StringResultat2 = Formulaire.StringResultat2.Value
StringResultat3 = Formulaire.StringResultat3.Value
StringResultat4 = Formulaire.StringResultat4.Value
StringResultat5 = Formulaire.StringResultat5.Value
StringResultat6 = Formulaire.StringResultat6.Value
StringResultat7 = Formulaire.StringResultat7.Value
Const DOMAIN = "DC=toiptest,DC=fr"
Const SUFFIX = "@toiptest.fr"
Const UAC = 512
Set objLDAP = GetObject("LDAP")
Set objOU = GetObject("LDAP://OU="& StringResultat5 &",dc=toiptest,dc=fr")
Set objUser = objOU.Create("User", "cn="& StringResultat1)
objUser.Put "sAMAccountName",StringResultat1
objUser.Put "sn",StringResultat3
objuser.Put "userPrincipalName", StringResultat1 &"@toiptest.fr"
objUser.Put "givenName",StringResultat4
objUser.Put "displayName",Login
objUser.Put "userAccountControl",UAC
objUser.Put "physicalDeliveryOfficeName",StringResultat7
objUser.Put "description",StringResultat6
objUser.SetInfo
objUser.SetPassword "& StringResultat2 &"
If Err.Number<>0 Then
MsgBox "Une erreur s'est produite. Veuillez vérifier que les données saisies sont correctes.", vbCritical, "ERREUR"
Exit Sub
End If
MsgBox "Utilisateur "&StringResultat1" créé dans l'OU "StringResultat5"."
End Sub
-
