Modifier la valeur d'un champs de formulaire

[YFBelgium]

Bonjour à tous,

Voici ce qui m'amène ...

Je désire savoir si c'est possible de modifier la valeur d'un champs de formulaire par une fonction qui est exécutée sur le poste client lors du submit.

J'explique ...

Je crée un formulaire classique ...

Code :

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
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
     <form method="post" name="FormEdit">
        <table width="750px" align="center">
          <tr>
            <td style="width: 140px">Nom </td>
            <td><input name="ch1" type="text" value="Nom" maxlength="50"> </td>
            <td><input name="ch2" type="text" value="Prénom" maxlength="50"></td>
          </tr>
          <tr>
            <td style="width: 140px">Date </td>
            <td>
              <table>
                <tr>
                  <td><select name="ch3JJ" type="text">
                          <option>01</option>
	             <option>02</option>
	             <option>03</option>
	             <option>04</option>
	             <option>05</option>
	           </select></td>
	      <td></td>
	      <td><select name="ch3MM">
	              <option>01</option>
                           <option>02</option>
	              <option>03</option>
	              <option>04</option>
	              <option>05</option>
	            </select></td>
	      <td></td>
	      <td><select name="ch3AAAA">
	              <option>1989</option>
	              <option>1990</option>
	              <option>1991</option>
	              <option>1992</option>
	            </select></td>
                </tr>
              </table>
            </td>
            <td>&nbsp;</td>
          </tr>
        <tr>
          <td align="right" valign="top">
              <input type="hidden" name="ch3"  value="">
              <input type="hidden" name="operation" value=update>
              <input type="submit" value="Enregistrer">
          </td>
        </tr>	
      </form>

Il y a donc 2 champs INPUT : ch1, ch2,
Il y a 3 champs SELECT : ch3JJ, ch3MM, ch3AAAA,
Il y a 2 champs HIDDEN : operation, ch3,
et un SUBMIT.

Je crée une Fonction ONSUBMIT ...

Code :

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
31
32
33
34
35
36
<script language="vbscript">
 
Function FormEdit_onsubmit
 
  if len(document.FormEdit.ch1.value) < 1 then 
    message = "Veuillez introduire votre nom. Merci !"		
    MsgBox message,vbcritical,"Erreur de validation"
    document.formEdit.ch1.focus
    FormEdit_onsubmit = False
    Exit Function
  End If
 
  if len(document.FormEdit.ch2.value) < 1 then 
    message = "Veuillez introduire votre prénom. Merci !"		
    MsgBox message,vbcritical,"Erreur de validation"
    document.formEdit.ch2.focus
    FormEdit_onsubmit = False
    Exit Function
  End If
 
 
  document.FormEdit.ch3.value = document.FormEdit.ch3JJ.value & "." & document.FormEdit.ch3MM.value & "." & document.FormEdit.ch3AAAA.value
  if len(document.FormEdit.ch3.value) = "01.01.1989" then 
    message = "Veuillez introduire votre date de naissance. Merci !"		
    MsgBox message,vbcritical,"Erreur de validation"
    document.formEdit.ch3JJ.focus
    FormEdit_onsubmit = False
    Exit Function
  End If
 
FormEdit_onsubmit = True
FormEdit.action="../candidature/encodage.asp"
 
End Function
 
</script>

Mais je ne connais pas la syntaxe correcte pour la ligne en rouge.

Je voudrais en fait faire en sorte que la valeur du champs input HIDDEN ch3 soit modifiée dans la Fonction ONSUBMIT pour qu'elle devienne le résulat de la concaténation de ch3JJ, de ch3MM et de ch3AAAA (avec des points au passage pour faire beau)

Si vous avez une idée, voire une proposition plus pratique, je serais bien heureux de la connaitre.

A bientôt,

YFBelgium.

[ryan]

Yop!

Cette question aurait peut-être eu sa place dans le forum Javascript, manneke...

Cela dit, la concaténation de chaines en Javascript se fait avec le signe +

[YFBelgium]

Merci Ryan ...

Mais ce n'est pas en VBScript que je programme ?

Je ne suis plus sûr de rien ...

Merci de m'oter ce doute.

YFBelgium

[Immobilis]

Salut,

Bienvenu sur le forum.

Mais ce n'est pas en VBScript que je programme ?

De fait si, mais il est plus fréquent de développer en utilisant les couples: client/javascript et serveur/vbscript. Pourquoi? Euh, je ne sais pas à vrai dire. Question d'habitude ou de normalisation? Je ne suis pas certain que vbscript soit vraiment adapté à l'usage client.

Compte tenu de l'utilisation de ces langages, il me semble qu'il serait judicieux que tu utilises le javascript pour tes scripts clients.

A+

[ryan]

Yop!

Envoyé par YFBelgium

Mais ce n'est pas en VBScript que je programme ?

Milles excuses, j'associe tellement côté client et Javascript que je n'ai même pas vu que ce n'en était pas.

Ne jamais rien posté avant la première tasse de café, je le sais pourtant...

[YFBelgium]

Bien ...

Je comprends mais je n'ai pas encore appris le JavaScript.

J'ai progressé dans mon Script (VBS) et la chose qui me bloque actuellement c'est :

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
 
		document.FormEdit.ch3.value = document.FormEdit.ch3JJ.value & "." & document.FormEdit.ch3MM.value & "." & document.FormEdit.ch3AAAA.value
 
		JJ=document.FormEdit.ch3JJ.value
		MM=document.FormEdit.ch3MM.value
		AAAA=document.FormEdit.ch3AAAA.value
 
		document.FormEdit.ch3.value = JJ
 
		if document.FormEdit.ch3.value = "01.01.1989" then 
			message = "Veuillez introduire votre date de naissance. Merci !" 
			MsgBox message,vbcritical,"Erreur de validation"
			document.formEdit.ch3JJ.focus
			FormEdit_onsubmit = False
			Exit Function
		End If

Je sais attribuer la valeur d'un champs du formulaire à une variable

"JJ=document.FormEdit.ch3JJ.value"

mais ça ne marche pas dans l'autre sens

"document.FormEdit.ch3.value = JJ"

ma question est donc est-ce que c'est normal (que ça ne marche pas) parceque ce n'est pas prévu ou autorisé ou est ce que ce n'est pas normal et je dois adapter ma syntaxe ?

Dans tous les cas un grand merci pour vos sympatiques aides.

YFBelgium

[YFBelgium]

Personne ne sait ?

Merci de me donnerune réponse si vous savez ...

A plous


YFBelgium