Précédent   Forum des professionnels en informatique > Webmasters - Développement Web > Langages serveur > ASP
ASP Forum sur la programmation ASP. Avant de poster : Cours ASP, FAQ ASP
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 07/11/2007, 16h20   #1
Invité de passage
 
Inscription : novembre 2007
Messages : 24
Détails du profil
Informations forums :
Inscription : novembre 2007
Messages : 24
Points : 3
Points : 3
Par défaut Formulaire ( question pas simple du tout)

Bonjour à tous,

J'ai un soucis de formulaire. dans un premier temps j'ai une page pour saisir des informations puis je valide et la page me renvoi de nouveau les champs pour que je puisse confirmer la bonne saisie avant un submit. Le problème est que entre l'ordre des champs lors de la saisie et l'ordre des champs dans la feuille avant le submit celui ci n'est plus du tout le même. Toutefois, j ai pu constater que lorsque je change la valeur name="", alors l'ordre du champs change aussi.

Il y a une logique mais laquelle? je vous avais dit pas simple du tout

Merci d'avance.
williams59 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 07/11/2007, 16h28   #2
BnA
Membre éclairé
 
Avatar de BnA
 
Inscription : mars 2006
Messages : 559
Détails du profil
Informations personnelles :
Âge : 28

Informations forums :
Inscription : mars 2006
Messages : 559
Points : 380
Points : 380
Envoyer un message via MSN à BnA
Salut!

Pourrais-tu mettre ton code (ou à tout le moins un extrait)? Parce que comme tu le sais, une image valant mieux qu'un long discours, il en va de même pour la prog, où un segment de code vaut bien plus qu'une explication vague...

En attendant la suite...

__________________
Sans extrait de code, ne vous attendez à aucun miracle (sauf miracle) ...

...et n'oubliez pas: RTFM!!

Téléchargez FireBug pour Firefox (le paracétamol du développement web)

"MERCI" ne coûte rien, n'hésitez pas à vous en servir!
BnA est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 07/11/2007, 16h56   #3
Invité de passage
 
Inscription : novembre 2007
Messages : 24
Détails du profil
Informations forums :
Inscription : novembre 2007
Messages : 24
Points : 3
Points : 3
Par défaut pour BnA

Slt Merci bien.

Petite note j'ai mis une ligne : >>> ICI COMME LE TRAITEMENT DE L AFFICHAGE AVANT VALIDATION. c'est ici qu'il met en forme et que ca merde. Le plus dur c est que j'ai pris exemple sur un code que j'avais crée et qui marche sans ce pb.

Bonne chance.

Code asp :
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
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
<!-- #include file="connexion.asp"-->
<%URL = _
   request.serverVariables("SCRIPT_NAME")%>
 
 
<%
        Dim variable
        For Each variable in Request.QueryString
           Response.Write(variable & " = ")
           Response.Write(Request.QueryString _
           (variable) & "<BR>")
        Next
  %>
 
 
 
<html>
<head>
 
<title>Ajout de données</title>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=iso-8859-1">
</head>
<BODY BGCOLOR="#FFFFFF">
&nbsp;<center>
<span style="letter-spacing: 2pt"><b><font face="Verdana" color="#0066CC">
Ajouter un Order Dans la base</font></b></span><center>
<center>
<center>
<p align="justify">&nbsp;</p>
 
<%
' Nous vérifions que la valeur "Rep" existe, sinon il faut lui en attribuer une.
 
If request("Rep") = "" then
	Rep = 0
Else
	Rep = request("Rep")
End If
 
Select Case Rep
	Case 0
%>		
 
<table width=477 border="0" bordercolor="#0066CC" cellspacing="0" 
cellpadding="6" height="412">
<form name=myform action="http://localhost/TEST1/addorder.asp" method="post">
 
 
<input type="hidden" name="Rep" value=1>
 
 
        </tr>
  <tr>
    <td bgcolor="#F4F4F4" width="238" align="left" height="58">
    <p>
    <font face="arial" size="2" color="#0066CC">&nbsp;Owner </font></td>
        <td bgcolor="#F4F4F4" height="58" width="239">
        <p align="left">
        <select size="1" name="A Owner" 
  style="font-size: 10pt; font-family: Verdana; color: #0066CC; text-align:center" 
  tabindex="1">
		<option value="0">Nom</option>
		<option value="Thierry Poudevigne">TEST1</option>
		<option value="Frederic Roger">TEST2</option>
		</select></td>
  </tr>
 
  <tr>
    <td bgcolor="#F4F4F4" width="238" align="left" height="59">
    <p>
    <font face="arial" size="2" color="#0066CC">&nbsp;N°d'Order</font></td>
 
        <td bgcolor="#F4F4F4" height="59" width="239">
		<p align="left">
		<input type="text" name="B Order" size="8" tabindex="2" 
  style="font-family: Verdana; font-size: 10pt; color: #0066CC"><font 
  color="#FF0000">*</font></td>
  </tr>
 
  <tr>
    <td bgcolor="#F4F4F4" width="238" align="left" height="59">
    <p align="justify">
    <font face="arial" size="2" color="#0066CC">Sous Order</font></td>
        <td bgcolor="#F4F4F4" height="59" width="239">
		<p align="left">
		<input type="text" name="C Sous Order" size="12" 
  tabindex="3" 
  style="font-family: Verdana; font-size: 10pt; color: #0066CC"></td>
  </tr>
  <tr>
    <td bgcolor="#F4F4F4" width="238" align="left" height="59">
    <font face="arial" size="2" color="#0066CC">Nom du client</font></td>
        <td bgcolor="#F4F4F4" height="59" width="239">
 
 
     <%SQL="SELECT Site_Name FROM clients ORDER BY Site_Name ASC"
Set RS = server.createobject("ADODB.Recordset")
RS.Open SQL,Conn , 3, 3
%><select size="1" name="D eDDDDDDDDDDD" 
  style="font-size: 8pt; font-family: Verdana; color: #0066CC; text-align:center; margin-top:1; margin-bottom:1" 
  tabindex="4">
      <option selected value="0">Client</option>
  <%while not RS.eof%>
      <option><%=RS("Site_Name")%></option>
   <% RS.moveNext
   wend %>
  </select>		
		</td>
  </tr>
 
 
 
 
 
  <tr>
    <td bgcolor="#F4F4F4" width="238" align="left" height="59">   
    <font face="arial" size="2" color="#0066CC">Constructeur</font></td>
        <td bgcolor="#F4F4F4" height="59" width="239">
 
        <%SQL="SELECT Site_Name FROM clients ORDER BY Site_Name ASC"
Set RS = server.createobject("ADODB.Recordset")
RS.Open SQL,Conn , 3, 3
%>
 
		<select size="1" name="Constructeur" 
  style="font-size: 8pt; font-family: Verdana; color: #0066CC; text-align:center; margin-top:1; margin-bottom:1" 
  tabindex="4">
      <option selected value="0">Constructeur</option>
  <%while not RS.eof%>
      <option><%=RS("Site_Name")%></option>
   <% RS.moveNext
   wend %>
  </select>		
		</td>
  </tr>
 
 
 
 
 
  <tr>
    <td bgcolor="#F4F4F4" width="238" align="left" height="59">
    &nbsp;</td>
        <td bgcolor="#F4F4F4" height="59" width="239">
        &nbsp;</td>
 
 
 
   </tr>
 
 
 
  <tr>
    <td bgcolor="#F4F4F4" width="238" height="59">&nbsp;</td>
        <td bgcolor="#F4F4F4" height="59" width="239">
		<p align="center">
		<input type="hidden" name="Maj" value=<%=date%>>
        <input type="submit" value="Valider" tabindex="12" style="float: left"></form>
</table>
</center>
 
<center>
<center>
<font color="#FF0000" size="2">&nbsp;<p>* Champs Obligatoire
 
 
<%
' La section de code suivante vérifie que les champs ont bien été remplis.
 
	Case 1
 
 
		Validation = 0
 
		If request.form("Owner")="0" then
			response.write "<font color='red'>"
			response.write "<b>Champ: responsable du order.</font>"
			Validation = Validation + 1
 
		Else
			owner = request.form("Owner")
 
End If
 
 
 
 
 
 
	' ici fin de la verif du contenu	
		If Validation > 0 then ' Si tout s'est correctement déroulé nous donnons la possibilité de revenir 
		                       ' au formulaire.
			response.write "<form>"
			response.write "<b><font color='red' face='Verdana'>"
			response.write "Tous ces champs n'ont pas été renseignés!</font></b><p>&nbsp;</p>"
			response.write "<input type='button' value='Retour au formulaire' onclick=history.go(-1)>"			
			response.write "</form></center>"
			response.end
		Else
			' Nous affichons maintenant les nouvelles informations 
			' et donnons à l'utilisateur la possibilité de les modifier ou de valider.
			response.write "<font color='blue'>"
			response.write "Les informations ci dessous vont être saisies dans la base.<p></p></font>"
			response.write "<table width=500 border=0 bordercolorlight=#F4F4F4 bordercolordark=#F4F4F4  bgcolor=#F4F4F4>"
			response.write "<tr><td colspan=2>"
			response.write "<font face='arial' size=3>"
 
 
 
			response.write "</td></tr>"
			For each name in request.form
				If name = "Rep" then
					response.write "&nbsp;"
				Else
					response.write "<tr><td bgcolor=#F4F4F4><font face='arial' size=2>"
					response.write name & "</font></td>"
					response.write "<td bgcolor=#F4F4F4><font face='arial' size=2>"
					response.write request.form(name)& "</font></td></tr>"
				End If
			Next
			' Nous préparons le formulaire. >>> ICI COMME LE TRAITEMENT DE L AFFICHAGE AVANT VALIDATION
			response.write "<tr><td bgcolor=#F4F4F4 colspan=2><font face='arial' size=2>"
			response.write "<p><br><form method='post' action='http://localhost/TEST1/addorder.asp'>"
			For each name in request.form
				If name ="Rep" then
					response.write "<input type='hidden' name='"
					response.write name & "' value=2>"
				Else
					response.write "<input type='hidden' name='"
					response.write  name & "' value='" & request.form(name)
					response.write "'>"
				End If
			Next
			response.write "<p align='center'>"
			response.write "<input type='submit' value='Valider'>"
			response.write "&nbsp;&nbsp;"
			response.write "<input type='button' value='Modifier' onclick=history.go(-1)>"
			response.write "</form></td></tr></table>"
			response.end
		End If
 
	Case 2
 
 
 
 
 
Set RS = server.createobject("ADODB.Recordset")
RS.Open SQL,Conn , 3, 3
If RS.eof then
      response.write "<center>Il n'y a pas d'enregistrement dans la base de données</center>"
	  response.end
  Else
 
while not RS.eof
 
 
)
 
 
	RS.MOVENEXT 
 
wend
 
RS.close
   set RS=nothing
 
")
 
 
 
 
 
 
 
		'Updated = Date
    	'request("updated")
		set conn = server.createobject("ADODB.Connection")
    	conn.open "IbaseHDS"
 
 
 
 
 
 Set rs = conn.execute(SQL)
  ' En cas d'erreurs, les renseignements ayant trait à ces derniers seront affichés.
  If err.number>0 then
    response.write "Erreur(s) VBScript :" & "<P>"
    response.write "Erreur n°=" & err.number & "<P>"
    response.write "Description=" & err.description & "<P>"
    response.write "Aide=" & err.helpcontext & "<P>" 
    response.write "Chemin=" & err.helppath & "<P>"
    response.write "Origine=" & err.nativeerror & "<P>"
   response.write "Code source=" & err.source & "<P>"
    response.write "Etat SQL=" & err.sqlstate & "<P>"
   end if
   IF conn.errors.count> 0 then
    response.write "Des erreurs sont survenues" & "<P>"
    response.write SQL & "<P>"
   for counter= 0 to conn.errors.count
    response.write "Erreur #" & conn.errors(counter).number & "<P>"
    response.write "Description :" & conn.errors(counter).description & "<P>"
   next
   		else
   		response.write "<form>"
   			response.write "<font face='arial'><b>"		
    		response.write "L'enregistrement s'est déroulé correctement.</b><p>"    		
    		response.write "<INPUT Type='Button' Value='Fermer' onclick='javascript :self.close()'>"    		
			Response.Write(oui)
 
   		end if
   conn.close
  set conn=nothing
   set rs = nothing
 end if
End Select
response.write "</form>"%>	
</font>		
</center>
 
</body>
</html>
williams59 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 07/11/2007, 20h17   #4
Invité de passage
 
Inscription : novembre 2007
Messages : 24
Détails du profil
Informations forums :
Inscription : novembre 2007
Messages : 24
Points : 3
Points : 3
Par défaut Question formulaire pas simple du tout

Bonjour à tous,

J'ai un soucis de formulaire. dans un premier temps j'ai une page pour saisir des informations puis je valide et la page me renvoi de nouveau les champs pour que je puisse confirmer la bonne saisie avant un submit. Le problème est que entre l'ordre des champs lors de la saisie et l'ordre des champs dans la feuille avant le submit celui ci n'est plus du tout le même. Toutefois, j ai pu constater que lorsque je change la valeur name="", alors l'ordre du champs change aussi.

Pour ce qui est du code j'utilise le code classique :

For each name in request.form
If name = "Rep" then
response.write "&nbsp;"
Else
response.write "<tr><td bgcolor=#F4F4F4><font face='arial' size=2>"
response.write name & "</font color='blue'></td>"
response.write "<td bgcolor=#F4F4F4><font face='arial' size=2>"
response.write request.form(name)& "</font color='red'></td></tr>"


End If
Next

__________________________________________________



Il y a une logique mais laquelle? je vous avais dit pas simple du tout

Merci d'avance.
williams59 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 08/11/2007, 20h40   #5
Expert Confirmé Sénior

 
Avatar de Immobilis
 
Inscription : mars 2004
Messages : 5 849
Détails du profil
Informations forums :
Inscription : mars 2004
Messages : 5 849
Points : 5 965
Points : 5 965
Salut,

Une explication ici : http://www.aspfaqs.com/aspfaqs/ShowFAQ.asp?FAQID=64

A+
Immobilis est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 10h38.


 
 
 
 
Partenaires

Hébergement Web