Checkbox coché => Suppression

Code:

response.getParameter("mat"&i);...

En détaillant un tout petit peu plus s'il te plait...

Code:

response.getParameter("mat"&i);

je mets ca ou ? a la place de quelque chose ?

merci

Lorsqu'on récupère une variable postée en jsp, on utilise response.getParameter('nomDeLObjet');

oui mais je fais de l'asp :p et vous n'avez pas répondu a mes deux questions d'avant

:mur: Désolé, j'ai cru que c'était du jsp. j'ai même pas vu supp.asp.
Le request.form est vrai dans ce cas.
as-tu mis les formulaires dans une balise <form> ?

yes
et pour preuve :

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
48
49
50
51
52
53
54
 
<form name="affichage" method="post" action=''>
    <input name='mat' type='hidden'  value='<%=num_materiel%>'>
	 <table width="100%" border="1" cellspacing="0">
		 <tr> 
			 <td height="10"><div align="center" style="font-weight: bold">Date</div></td>
			 <td height="10"><div align="center" style="font-weight: bold">Km</div></td>
			  <td height="10"><div align="center" style="font-weight: bold">Evenement</div></td>
			 <td height="10"><div align="center" style="font-weight: bold">Prestataire</div></td> 
			 <td height="10"><div align="center" style="font-weight: bold">Cout €</div></td>
			 <td height="10"><div align="center" style="font-weight: bold">Nombre de minutes</div></td>
			 <td height="10"><div align="center" style="font-weight: bold">Commentaire</div></td>
			 <td height="10"><div align="center" style="font-weight: bold">Supp</div></td>
		 </tr>
 <% i=0
	 if  not IsEmpty(num_materiel) then							
		 requete = "select *  from parc_gestion_vehicule "
		 requete = requete & " inner join parc_prestataire on prestataire = idprestataire "
		 requete = requete & " inner join parc_evenement on evenement = idevenement and num_materiel = "&num_materiel&"  "
		 requete = requete & " order by date desc "
	 Set rs3 = Db_sql.Execute(requete)
	 while not rs3.eof
 
	 Response.write("<tr>")
	 Response.write("<td align='center'>"&rs3("date")&"</td>")
	 Response.write("<td align='center'>"&rs3("km")&"</td>")
	 Response.write("<td align='center'>"&rs3("Libelle")&"</td>")
	 Response.write("<td align='center'>"&rs3("libellé")&"</td>")
	 Response.write("<td align='center'>"&rs3("montant")&"</td>")
	 Response.write("<td align='center'>"&rs3("nb_heure")&"</td>")
	 Response.write("<td align='center'>"&rs3("commentaire")&"</td>")
 %>
	 <td align="center" >
	 <input type="checkbox" name="supp<%=i%>" onclick="test_chckbx();">
	 <input name="dat<%=i%>" type='hidden'  value="<%=dat%>">
	 <input name="km<%=i%>"  type='hidden'  value="<%=km%>">
	 <input name="evt<%=i%>" type='hidden'  value="<%=evenement%>">
	 <input name="pst<%=i%>" type='hidden'  value="<%=prestataire%>">										
	 </td>
	 <%
							i=i+1							
							Response.write("</tr>")
							rs3.movenext 	
							wend
							 response.write("<input name='cpt' type='hidden' value="&i&">")
						end if
					%>
			<tr><td></td><td></td><td></td><td></td><td></td><td></td><td></td>
				  <td align="center">
					<input id="validation" name="validation" type="submit" value="Valider" style="visibility:hidden;">
				  </td>
			</tr>
	 </table>
	  </form>

Les variables de la requête ne sont pas inclut dans les quotes ''.
Code:

1 2 requete = requete & " when num_materiel ='"&request.form("mat"&i)"' " requete = requete & " and dat ='"&request.form("dat"&i)&"' "...

malheureusement on y est pas encore ..

Citation:

Fin d'instruction attendue

ca vient de la premiere ligne de ma requete...
Voila ce que j'ai :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
if request.form("validation") <> "" then 
	for i =0 to request.form("cpt")-1
		 if request.form("supp"&i&"") <> "" then
			requete = "delete from parc_gestion_vehicule "
			requete = requete & " when num_materiel ='"&request.form("mat"&i)"' "<-- ERREUR
			requete = requete & " and dat ='"&request.form("dat"&i)&"' "
			requete = requete & " and km ='"&request.form("km"&i)&"' "
			requete = requete & " and evenement ='"&request.form("evt"&i)&"' "
			requete = requete & " and prestataire ='"&request.form("pst"&i)&"' "
			response.write(requete)
 
					end if					
				next
			end if

Tu utilise when au lieu de where

Code:

requete = requete & " where num_materiel ='"&request.form("mat"&i)"' "

Rahh oui, foutu anglais...
Âpres vérification, le problème n'a pas bougé d'une ligne..
Est ce que ca ne viendrait pas des variables ?

Concaténation oubliée

Code:

requete = requete & " when num_materiel ='"&request.form("mat"&i)&"' "

ahh
Bonne nouvelle, je n'ai plus l'erreur
Mauvaise nouvelle, j'ai toujours la meme requete vide qui s'affiche

Citation:

delete from parc_gestion_vehicule where num_materiel ='' and dat ='' and km ='' and evenement ='' and prestataire =''

Mes paramétres n'ont pas l'air d'être intégrés..

On peut voir le html généré?

ca c'est IE qui te le donne :

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
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
<html>
<head>
<title>Gestion du Parc : Saisie des Evenements</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<SCRIPT  SRC="/includes/calendar.js" language='javascript'></SCRIPT>
<script type="text/javascript">
function valide_choix(){
		document.Materiel.submit();
}
 
function test_chckbx() {
	var chkbx = document.forms['affichage'].getElementsByTagName("input");
	for (var i=0; i<chkbx.length; i++)  // Parcours les input du form
	  if (chkbx[i].type=="checkbox")   // Ne traite que les checkbox
		 if (chkbx[i].checked)  {// Si une cochée
			document.getElementById('validation').style.visibility = "visible";   // Affiche le bouton
			return true;    // Fin de la fonction
		  }
		document.getElementById('validation').style.visibility = "hidden";   // Si aucune trouvée => masque le bouton
}	
</script> 
 
 
<link rel="stylesheet" type="text/css" href="/transco.css"></head><body>
<table width="100%" height="100%" border="0">
  <tr> 
    <td width="106" height="110"> 
      <div align="center"><img src="../Images/logo%20TS%20couleur.jpg" width="100" height="100"></div></td>
    <td width="1122"> <div align="center"><font size="6" face="Comic Sans MS" color="#FB764D">
Technique 
</font></div><div align='center'><font size='3' face='Comic Sans MS'> Agence Transcosatal Atlantique  </font> <BR>
  <font size='2' face='Comic Sans MS'>(Vous &ecirc;tes connect&eacute; avec le 
  compte 
  Andrieux
  )</font></div>
	 </td><td width="0"></td>
  </tr>
  <tr> 
    <td height="100%" valign="top"> <BR> 
      <script type="text/javascript" src="/includes/functions.js"></script> <div id="menu" >
	<div class="barre"  ></div>
	<div class="menu" id="menu1" onClick="afficheMenu(this)" >
		  <table><tr><td width='30px'><img src="/images/accueil.gif" width="25" height="25" border="0"  alt="Accueil Intranet"></td><td width='90px' align='center'><a href="/index.asp">Accueil Intranet</a></td></tr></table>
	</div>
 
    <div class="menu" id="menu2" onClick="afficheMenu(this)" >
		  <table><tr><td width='30px'><img src="/Images/commerce.jpg" alt="Commerce" width="30" height="20" border="0"></td><td width='90px' align='center'><a href="../Parc/index.asp">Liste du parc</a></td></tr></table>
	</div>
 
	<div class="menu" id="menu3" onClick="afficheMenu(this)" >
		  <table><tr><td width='30px'><img src="../Images/compteur.jpg" width="20" height="20" border="0"></td><td width='90px' align='center'><a href="../Parc/saisieKM.asp">Saisie des KM</a></td></tr></table>
	</div>
 
	<div class="menu" id="menu8" onClick="afficheMenu(this)" >
		  <table><tr><td width='30px'><img src="../Images/etat.gif" width="20" height="20" border="0"></td><td width='90px' align='center'><a href="../Parc/SaisieEvenementR.asp">Saisie des Evenements</a></td></tr></table>
	</div>
	<div class="menu" id="menu4" onClick="afficheMenu(this)" >
		  <table><tr><td width='30px'><img src="../Images/calc.gif" width="20" height="20" border="0"></td><td width='90px' align='center'><a href="../Parc/consultKM.asp">Consultation des KM</a></td></tr></table>
	</div>
 
	<div class="menu" id="menu5" onClick="afficheMenu(this)" >
		  <table><tr><td width='30px'><img src="../Images/Excel.gif" width="20" height="20" border="0"></td><td width='90px' align='center'><a href="../Parc/exports.asp">Exportation Excel</a></td></tr></table>
	</div>
 
	<div class="menu" id="menu6" onClick="afficheMenu(this)" >
		  <table><tr><td width='30px'><img src="../Images/recherche_camion.gif" width="20" height="20" border="0"></td><td width='90px' align='center'><a href="../Parc/searchMat.asp">Recherche Materiel</a></td></tr></table>
	</div>
 
	<div class="menu" id="menu9" onClick="afficheMenu(this)" >
		  <table><tr><td width='30px'><img src="../Images/search.gif" width="20" height="20" border="0"></td><td width='90px' align='center'><a href="../Parc/searchEve.asp">Recherche Evenement</a></td></tr></table>
	</div>
 
	<div class="menu" id="menu7" onClick="afficheMenu(this)" >
		  <table><tr><td width='30px'><img src="../Images/facture.gif" width="20" height="20" border="0"></td><td width='90px' align='center'><a href="../Parc/facturation.asp">Facturation</a></td></tr></table>
	</div>
 
 
</div>
 
 
 
    </td>
    <td valign="top">
	<div align="center"><font color="#fb764b" size="5" face="Comic Sans MS">Saisie des Evenements</font><BR>
 
 
		<form name="historique" method="post" action="Historique_evenement.asp">
			<input name='Submit3' type='submit' size=8 alt="Visualiser l'historique des saisies des évènements" value='Historique' >
			&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
            <img style=cursor:hand src='/images/excel.gif' width='25' height='25' border=0 
			onClick=document.Materiel.action='export_saisie_evenement.asp';document.Materiel.submit();>	
        </form>
 
	<form name="Materiel" method="post" action="SaisieEvenementR.asp">
		<input name="op" type="hidden" id="op" value="mat">
        	<select name="materiel" id="materiel" onchange="document.Materiel.submit();">
		  		<option value=0 > - </option>				
         	<option value=619>LOC 1 49 - 5316 XB 85 ( DAF ) </option><option value=615>LOC 1 44 - 57 AYM 35 ( VOLVO ) </option><option value=481>786 - 786H-26 BXN 44 ( SAMRO ) </option><option value=482>787 - 787H-830 BYY 44 ( SAMRO ) </option><option value=580>MANUT - MANUT ( AUTRE ) </option><option value=577>NAULET 1 - NAULET ( AUTRE ) </option><option value=581>757 - NON AFFECTE ( AUTRE ) </option><option value=578>0204 - REFACT ( AUTRE ) </option>
			</select>
	</form>
      </div>
	  <HR>
      <div align='center'><font face='Comic Sans MS'>Materiel :  680 BTJ 44(CRV)</font>
    </div>
	<HR>
		 <table width='100%' border='0' cellspacing='0'>
			<tr>		
          <td width='80'>Evenement </td> 
				<td >
				<form name='ajoutev' method='post' action=''>
        				<button onClick="document.getElementById(2).style.display=''; 
										 document.getElementById(4).style.display='none' ;  
										 document.getElementById(3).style.display='none' ; 
										 document.getElementById(5).style.display='none'">
							<img src='/Images/plus1.gif' alt="Ajouter un evenement" width='15' border='0'> 
						</button>
 
						<button onClick="document.getElementById(4).style.display=''; 
										 document.getElementById(2).style.display='none' ;
										 document.getElementById(3).style.display='none' ;
										 document.getElementById(5).style.display='none'">
							<img src='/Images/interdit_2.gif' alt="Supprimer un evenement" width='15' border='0'> 
						</button>
 
						<div id=2 style="display:none;">
							<input type='text' name='new_evt'> 
							<input type='submit' value='Ajouter un evenement'>
						</div>
					</form>				
					<form name='supev' method='post' action=''>
						<div id=4 style="display:none;">
							<select name='sup_evt' value=''>
									<option value=1>Accident</option><option value=4>Destruction</option><option value=6>Vidange</option><option value=9>Contrôle technique</option><option value=52>divers</option><option value=53>Hayon</option>
 
							</select>
							<input type='submit' value='Supprimer un evenement'>
						</div>
					</form>
 
			<tr>
			<td width='80'>Prestataire</td>
        		<td> 
					<form name='ajoutps' method='post' action=''>
        				<button onClick="document.getElementById(3).style.display='';
										 document.getElementById(2).style.display='none';
										 document.getElementById(4).style.display='none';
										 document.getElementById(5).style.display='none'">
							<img src='/Images/plus1.gif' alt="Ajouter un prestataire" width='15' border='0'>
						</button>
 
						<button onClick="document.getElementById(5).style.display='';  
									     document.getElementById(2).style.display='none';
										 document.getElementById(3).style.display='none';
										 document.getElementById(4).style.display='none'">
							<img src='/Images/interdit_2.gif' alt="Supprimer un prestataire" width='15' border='0'> 
						</button>
 
							<div id=3 style="display:none;">
								<input type='text' name='new_pst'> 
								<input type='submit' value='Ajouter un prestataire'>
		 					</div>
					</form>
					<form name='supps' method='post' action=''>
						<div id=5 style="display:none;">
							<select name='sup_pst' value=''>
									<option value=5>Fredo</option><option value=6>camille</option>
 
							</select>
							<input type='submit' value='Supprimer un prestataire'>
						</div>
					</form>
 
		</td></tr>
 </table>
 
 
 
	 <form name='saisie' method='post' action='SaisieEvenementR.asp' onSubmit='return VerifSaisie()'>
   		<table width='100%' border='0' cellspacing='0'>
			<tr> 
					<td align='center'>Date</td>
					<td align='center'>Km</td>
					<td align='center'>Evenement </td>
					<td align='center'>Prestataire </td>			
					<td align='center'>Cout €</td>
					<td align='center'>Temps en minutes</td>
					<td align='center'>Commentaire</td>
			</tr>
			<tr> 
				<td align='center' >
					<input name='dat' size=7 onfocus='this.select();lcs(this)' onclick='event.cancelBubble=true;this.select();lcs(this)' value''>
				</td>
				<td align='center' >
					<input name='km' size=5 value=''> 
				</td>
				<td align='center'>
					<select name='evenement' value=''>
 
					<option value=1>Accident</option><option value=4>Destruction</option>
 
					</select> 
				</td>
				<td align='center' >
					<select name='prestataire' value=''>
 
					<option value=5>Fredo</option><option value=6>camille</option>
 
					</select>  
				</td>
				<td align='center'>
					<input name='montant'size=3 value=''>
				</td>
				<td align='center' >
					<input name='nb_heure' size=3 value=''>
				</td>
				<td align='center' >
					<textarea rows="4" cols="33"  name='commentaire' ></textarea>
				</td>		
				<td align='center'>
					<input name='op' type='hidden' id='op' value='ajout'>
					<input name='materiel' type='hidden' id='materiel' value='355'>
					<input name='Submit2' type='submit' size=8 value='Enregistrer' >
				</td>
			</tr>
		</table>
	</form>
 
 
     <form name="affichage" method="post" action=''>
			 <input name='mat' type='hidden'  value='355'>
				<table width="100%" border="1" cellspacing="0">
					<tr> 
					  <td height="10"><div align="center" style="font-weight: bold">Date</div></td>
					  <td height="10"><div align="center" style="font-weight: bold">Km</div></td>
					  <td height="10"><div align="center" style="font-weight: bold">Evenement</div></td>
					  <td height="10"><div align="center" style="font-weight: bold">Prestataire</div></td> 
					  <td height="10"><div align="center" style="font-weight: bold">Cout €</div></td>
					  <td height="10"><div align="center" style="font-weight: bold">Nombre de minutes</div></td>
					  <td height="10"><div align="center" style="font-weight: bold">Commentaire</div></td>
					  <td height="10"><div align="center" style="font-weight: bold">Supp</div></td>
					</tr>
		  <tr><td align='center'>07/05/2009</td><td align='center'>899</td><td align='center'>Accident</td><td align='center'>Fredo</td><td align='center'>99</td><td align='center'>99</td><td align='center'>99</td>
						<td align="center" >
							<input type="checkbox" name="supp0" onclick="test_chckbx();">
							<input name="dat0" type='hidden'  value="">
							<input name="km0"  type='hidden'  value="">
							<input name="evt0" type='hidden'  value="">
							<input name="pst0" type='hidden'  value="">										
						</td>
					</tr><tr><td align='center'>05/05/2009</td><td align='center'>8</td><td align='center'>Accident</td><td align='center'>Fredo</td><td align='center'>9</td><td align='center'>9</td><td align='center'>9</td>
						<td align="center" >
							<input type="checkbox" name="supp1" onclick="test_chckbx();">
							<input name="dat1" type='hidden'  value="">
							<input name="km1"  type='hidden'  value="">
							<input name="evt1" type='hidden'  value="">
							<input name="pst1" type='hidden'  value="">										
						</td>
					</tr><input name='cpt' type='hidden' value=2>
			<tr><td></td><td></td><td></td><td></td><td></td><td></td><td></td>
				  <td align="center">
					<input id="validation" name="validation" type="submit" value="Valider" style="visibility:hidden;">
				  </td>
			</tr>
	 </table>
	  </form>
      <p>&nbsp;</p></td>
  </tr>
  <tr>
    <td height="100%" valign="top">&nbsp;</td>
    <td></td>
  </tr>
</table>
</body>
</html>
<script language='JavaScript'>
   document.Materiel.materiel.focus();
</script>

et ca c'est mon code perso :

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
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
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
<!-- #include virtual="/includes/connect_sql.asp" --> 
<!-- #include virtual="/includes/verif_session.asp"-->
<%
 
if session("niveau") < 5 then 
	response.Redirect("index.asp")
end if
 
operation = ""
ajout=1
 
' On recupère le code opération' OK
if request.form("op")<>"" then
	operation = request.form("op")
end if 
 
Select Case operation
 
	case "ajout"
		ajout = 1
		num_materiel = Request.Form("materiel")
		dat = Request.Form("dat")
		km = Request.Form("km")
		evenement = Request.form("evenement")
		prestataire = Request.form("prestataire")
		montant = Request.form("montant")
		nb_heure = Request.form("nb_heure")
		commentaire = replace(Request.form("commentaire"),"'","''")
		commentaire = replace(commentaire , vbCrLf,"<br>")
 
		' Requete d'insertion Saisie --> Base de donnée
				requete = "insert into parc_gestion_vehicule "
				requete = requete & "values('"&num_materiel&"','"&dat&"','"&km&"','"&evenement&"','"&prestataire&"','"&montant&"','"&nb_heure&"','"&commentaire&"', '" & session("login") & "') "
				'response.write(requete)
				Db_sql.Execute(requete)
 
	mode = "ajout"
 
	case "mat"
		num_materiel = Request.Form("materiel")	
	mode = "affiche"
 
end select
%>
 
<html>
<head>
<title>Gestion du Parc : Saisie des Evenements</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<SCRIPT  SRC="/includes/calendar.js" language='javascript'></SCRIPT>
<script type="text/javascript">
function VerifSaisie() {
    if ( document.saisie.dat.value == "") {
      		alert("\nVous devez saisir une date.\n\n")
 			return false;
			}
 
	else if ( document.saisie.km.value == "") {
      		alert("\nVous devez saisir un kilometre.\n\n")
      		return false;
			}
 
	else if ( document.saisie.evenement.value == "") {
      		alert("\nVous devez saisir un evenement.\n\n")
      		return false;
			}
	else if ( document.saisie.prestataire.value == "") {
      		alert("\nVous devez saisir un prestataire.\n\n")
      		return false;
			}
 
	else if ( document.saisie.montant.value == "") {
      		alert("\nVous devez saisir un montant.\n\n")
      		return false;
			}
 
	else if ( document.saisie.nb_heure.value == "") {
      		alert("\nVous devez saisir le nombre d'heure.\n\n")
      		return false;
			}
}
 
function valide_choix(){
		document.Materiel.submit();
}
 
function test_chckbx() {
	var chkbx = document.forms['affichage'].getElementsByTagName("input");
	for (var i=0; i<chkbx.length; i++)  // Parcours les input du form
	  if (chkbx[i].type=="checkbox")   // Ne traite que les checkbox
		 if (chkbx[i].checked)  {// Si une cochée
			document.getElementById('validation').style.visibility = "visible";   // Affiche le bouton
			return true;    // Fin de la fonction
		  }
		document.getElementById('validation').style.visibility = "hidden";   // Si aucune trouvée => masque le bouton
}	
</script> 
<%		
			if request.form("validation") <> "" then 
				for i =0 to request.form("cpt")-1
					 if request.form("supp"&i&"") <> "" then
							requete = "delete from parc_gestion_vehicule "
							requete = requete & " where num_materiel ='"&request.form("mat"&i)&"' "
							requete = requete & " and dat ='"&request.form("dat"&i)&"' "
							requete = requete & " and km ='"&request.form("km"&i)&"' "
							requete = requete & " and evenement ='"&request.form("evt"&i)&"' "
							requete = requete & " and prestataire ='"&request.form("pst"&i)&"' "
							response.write(requete)
 
					end if					
				next
			end if 
 
 				'Requete de modification de ligne 
				'nouv = "UPDATE parc_gestion_vehicule" 
				'nouv = nouv & "Set km = 111111" 
				'nouv = nouv & " WHERE num_materiel = "&request.form("materiel") 
				'nouv = nouv & " and dat = "&request.form("dat") 
				'nouv = nouv & " and km="&request.form("km") 
				'nouv = nouv & " and evenement="&request.form("evenement")
				'nouv = nouv & " and prestataire="&request.form("prestataire")
%> 
 
<link rel="stylesheet" type="text/css" href="/transco.css"></head><body>
<table width="100%" height="100%" border="0">
  <tr> 
    <td width="106" height="110"> 
      <div align="center"><img src="../Images/logo%20TS%20couleur.jpg" width="100" height="100"></div></td>
    <td width="1122"> <!-- #include virtual="/includes/entete_simple.asp"--> </td><td width="0"></td>
  </tr>
  <tr> 
    <td height="100%" valign="top"> <BR> 
      <!-- #include virtual="/includes/menu_parc.asp"-->
    </td>
    <td valign="top">
	<div align="center"><font color="#fb764b" size="5" face="Comic Sans MS">Saisie des Evenements</font><BR>
 
 
		<form name="historique" method="post" action="Historique_evenement.asp">
			<input name='Submit3' type='submit' size=8 alt="Visualiser l'historique des saisies des évènements" value='Historique' >
			&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
            <img style=cursor:hand src='/images/excel.gif' width='25' height='25' border=0 
			onClick=document.Materiel.action='export_saisie_evenement.asp';document.Materiel.submit();>	
        </form>
 
	<form name="Materiel" method="post" action="SaisieEvenementR.asp">
		<input name="op" type="hidden" id="op" value="mat">
        	<select name="materiel" id="materiel" onchange="document.Materiel.submit();">
		  		<option value=0 > - </option>				
         	<%
				' Affichage de toutes les immatriculations de vehicules appartenant à l'agence -->OKK
				requete = "SELECT *,isnull(num_parc,'-') as parc   " 
				requete = requete & "FROM parc_materiel, parc_marque , parc_type_materiel "
				requete = requete & "WHERE parc_materiel.num_marque = parc_marque.num_marque and parc_type_materiel.num_type_mat = parc_materiel.num_type_mat and parc_materiel.num_agence = "&num_agence&" order by nom_materiel asc"
				Set rs = Server.CreateObject("ADODB.recordset")
				Set rs = Db_sql.Execute(requete)
				while not rs.eof
					num_parc = ""
					if rs("parc") <>  "-" then 
						num_parc = rs("parc")  & " - " 
					end if				
					if cint(rs("num_materiel")) = cint(num_materiel) then 
						Response.Write("<option selected value="&rs("num_materiel")&">"& num_parc & rs("nom_materiel")&" ( "&rs("nom_marque")&" ) </option>")
					else 
						Response.Write("<option value="&rs("num_materiel")&">"& num_parc &rs("nom_materiel")&" ( "&rs("nom_marque")&" ) </option>")
					end if
				rs.movenext
				wend	
			%>
			</select>
	</form>
      </div>
	  <HR>
      <%
	  		if not IsEmpty(num_materiel) then
				' Requete qui affiche les plaques d'immatriculation correspondant à un vehicule --> OKK
				requete = " Select nom_materiel from parc_materiel where num_materiel = '"&num_materiel&"'"
				Set rs = Server.CreateObject("ADODB.recordset")
				Set rs = Db_sql.Execute(requete)
		    		Response.write("<div align='center'><font face='Comic Sans MS'>Materiel : "&rs("nom_materiel")&"</font>")
				 if  ajout = 0 then
				 	Response.write("<div align='center'><img src='../Images/attention.jpg' width='40' height='40'> ")
                 	Response.write("<font face='Comic Sans MS'>Il existe déjà une intervention de ce type.")
				 	Response.write("<img src='../Images/attention.jpg' width='40' height='40'></font></div>")
				 end if
			else
					Response.write("<div align='center'><img src='../Images/attention.jpg' width='40' height='40'> ")
					Response.write("<font face='Comic Sans MS'>ATTENTION PAS DE MATERIEL SELECTIONNE <img src='../Images/attention.jpg' width='40' height='40'></font></div>")
			end if
	  %>
    </div>
	<HR>
		 <table width='100%' border='0' cellspacing='0'>
			<tr>		
          <td width='80'>Evenement </td> 
				<td >
				<form name='ajoutev' method='post' action=''>
        				<button onClick="document.getElementById(2).style.display=''; 
										 document.getElementById(4).style.display='none' ;  
										 document.getElementById(3).style.display='none' ; 
										 document.getElementById(5).style.display='none'">
							<img src='/Images/plus1.gif' alt="Ajouter un evenement" width='15' border='0'> 
						</button>
 
						<button onClick="document.getElementById(4).style.display=''; 
										 document.getElementById(2).style.display='none' ;
										 document.getElementById(3).style.display='none' ;
										 document.getElementById(5).style.display='none'">
							<img src='/Images/interdit_2.gif' alt="Supprimer un evenement" width='15' border='0'> 
						</button>
 
						<div id=2 style="display:none;">
							<input type='text' name='new_evt'> 
							<input type='submit' value='Ajouter un evenement'>
						</div>
					</form>				
					<form name='supev' method='post' action=''>
						<div id=4 style="display:none;">
							<select name='sup_evt' value='<%=evenement%>'>
									<% 
										lesevts="select * from parc_evenement"
											Set rsevts = Db_sql.Execute(lesevts)
													while not rsevts.EOF
													response.write("<option value="&rsevts("idevenement")&">"&rsevts("Libelle")&"</option>")
													rsevts.movenext
													wend
												rsevts.close
									%>
 
							</select>
							<input type='submit' value='Supprimer un evenement'>
						</div>
					</form>
<%
			if cstr(request.form("new_evt"))<>"" then
				insere="insert into parc_evenement(Libelle) values ('"&request.form("new_evt")&"')"
				db.execute(insere)
			end if			
%>
<%	
			if cstr(request.form("sup_evt"))<>"" then
				suppression="delete from parc_evenement where idevenement="&request.form("sup_evt")
				db.execute(suppression)
			end if
%>		
			<tr>
			<td width='80'>Prestataire</td>
        		<td> 
					<form name='ajoutps' method='post' action=''>
        				<button onClick="document.getElementById(3).style.display='';
										 document.getElementById(2).style.display='none';
										 document.getElementById(4).style.display='none';
										 document.getElementById(5).style.display='none'">
							<img src='/Images/plus1.gif' alt="Ajouter un prestataire" width='15' border='0'>
						</button>
 
						<button onClick="document.getElementById(5).style.display='';  
									     document.getElementById(2).style.display='none';
										 document.getElementById(3).style.display='none';
										 document.getElementById(4).style.display='none'">
							<img src='/Images/interdit_2.gif' alt="Supprimer un prestataire" width='15' border='0'> 
						</button>
 
							<div id=3 style="display:none;">
								<input type='text' name='new_pst'> 
								<input type='submit' value='Ajouter un prestataire'>
		 					</div>
					</form>
					<form name='supps' method='post' action=''>
						<div id=5 style="display:none;">
							<select name='sup_pst' value='<%=prestataire%>'>
									<% 
										lesevts="select * from parc_prestataire"
											Set rsevts = Db_sql.Execute(lesevts)
													while not rsevts.EOF
													response.write("<option value="&rsevts("idprestataire")&">"&rsevts("libellé")&"</option>")
													rsevts.movenext
													wend
												rsevts.close
								  %>
 
							</select>
							<input type='submit' value='Supprimer un prestataire'>
						</div>
					</form>
<%
			if cstr(request.form("new_pst"))<>"" then
				inser="insert into parc_prestataire(libellé) values ('"&request.form("new_pst")&"')"
				db.execute(inser)
			end if
%>
<%	
			if cstr(request.form("sup_pst"))<>"" then
				suppression="delete from parc_prestataire where idprestataire="&request.form("sup_pst")
				db.execute(suppression)
			end if
%>
		</td></tr>
 </table>
 
<%
 		if not IsEmpty(num_materiel) then
%>
 
	 <form name='saisie' method='post' action='SaisieEvenementR.asp' onSubmit='return VerifSaisie()'>
   		<table width='100%' border='0' cellspacing='0'>
			<tr> 
					<td align='center'>Date</td>
					<td align='center'>Km</td>
					<td align='center'>Evenement </td>
					<td align='center'>Prestataire </td>			
					<td align='center'>Cout €</td>
					<td align='center'>Temps en minutes</td>
					<td align='center'>Commentaire</td>
			</tr>
			<tr> 
				<td align='center' >
					<input name='dat' size=7 onfocus='this.select();lcs(this)' onclick='event.cancelBubble=true;this.select();lcs(this)' value'<%=dat%>'>
				</td>
				<td align='center' >
					<input name='km' size=5 value='<%=km%>'> 
				</td>
				<td align='center'>
					<select name='evenement' value='<%=evenement%>'>
 
					<% 
							lesevts="select * from parc_evenement"
									Set rsevts = Db_sql.Execute(lesevts)
									while not rsevts.EOF
									response.write("<option value="&rsevts("idevenement")&">"&rsevts("Libelle")&"</option>")
									rsevts.movenext
								wend
								rsevts.close
				  %>
 
					</select> 
				</td>
				<td align='center' >
					<select name='prestataire' value='<%=prestataire%>'>
 
					<% 
								lesevts="select * from parc_prestataire"
									Set rsevts = Db_sql.Execute(lesevts)
									while not rsevts.EOF
									response.write("<option value="&rsevts("idprestataire")&">"&rsevts("libellé")&"</option>")
									rsevts.movenext
								wend
								rsevts.close
					 %>
 
					</select>  
				</td>
				<td align='center'>
					<input name='montant'size=3 value='<%=montant%>'>
				</td>
				<td align='center' >
					<input name='nb_heure' size=3 value='<%=nb_heure%>'>
				</td>
				<td align='center' >
					<textarea rows="4" cols="33"  name='commentaire' ><% =commentaire %></textarea>
				</td>		
				<td align='center'>
					<input name='op' type='hidden' id='op' value='ajout'>
					<input name='materiel' type='hidden' id='materiel' value='<%=num_materiel%>'>
					<input name='Submit2' type='submit' size=8 value='Enregistrer' >
				</td>
			</tr>
		</table>
	</form>
<%	end if %>
 
     <form name="affichage" method="post" action=''>
			 <input name='mat' type='hidden'  value='<%=num_materiel%>'>
				<table width="100%" border="1" cellspacing="0">
					<tr> 
					  <td height="10"><div align="center" style="font-weight: bold">Date</div></td>
					  <td height="10"><div align="center" style="font-weight: bold">Km</div></td>
					  <td height="10"><div align="center" style="font-weight: bold">Evenement</div></td>
					  <td height="10"><div align="center" style="font-weight: bold">Prestataire</div></td> 
					  <td height="10"><div align="center" style="font-weight: bold">Cout €</div></td>
					  <td height="10"><div align="center" style="font-weight: bold">Nombre de minutes</div></td>
					  <td height="10"><div align="center" style="font-weight: bold">Commentaire</div></td>
					  <td height="10"><div align="center" style="font-weight: bold">Supp</div></td>
					</tr>
		  <% i=0
				if  not IsEmpty(num_materiel) then							
							requete = "select *  from parc_gestion_vehicule "
							requete = requete & " inner join parc_prestataire on prestataire = idprestataire "
							requete = requete & " inner join parc_evenement on evenement = idevenement and num_materiel = "&num_materiel&"  "
							requete = requete & " order by date desc "
							Set rs3 = Db_sql.Execute(requete)
							while not rs3.eof
 
							Response.write("<tr>")
								Response.write("<td align='center'>"&rs3("date")&"</td>")
								Response.write("<td align='center'>"&rs3("km")&"</td>")
								Response.write("<td align='center'>"&rs3("Libelle")&"</td>")
								Response.write("<td align='center'>"&rs3("libellé")&"</td>")
								Response.write("<td align='center'>"&rs3("montant")&"</td>")
								Response.write("<td align='center'>"&rs3("nb_heure")&"</td>")
								Response.write("<td align='center'>"&rs3("commentaire")&"</td>")
			%>
						<td align="center" >
							<input type="checkbox" name="supp<%=i%>" onclick="test_chckbx();">
							<input name="dat<%=i%>" type='hidden'  value="<%=dat%>">
							<input name="km<%=i%>"  type='hidden'  value="<%=km%>">
							<input name="evt<%=i%>" type='hidden'  value="<%=evenement%>">
							<input name="pst<%=i%>" type='hidden'  value="<%=prestataire%>">										
						</td>
					<%
							i=i+1							
							Response.write("</tr>")
							rs3.movenext 	
							wend
							 response.write("<input name='cpt' type='hidden' value="&i&">")
						end if
					%>
			<tr><td></td><td></td><td></td><td></td><td></td><td></td><td></td>
				  <td align="center">
					<input id="validation" name="validation" type="submit" value="Valider" style="visibility:hidden;">
				  </td>
			</tr>
	 </table>
	  </form>
      <p>&nbsp;</p></td>
  </tr>
  <tr>
    <td height="100%" valign="top">&nbsp;</td>
    <td></td>
  </tr>
</table>
</body>
</html>
<script language='JavaScript'>
   document.Materiel.materiel.focus();
</script>

Les values des hiddens sont vide. Tu dois les affecter des valeurs correspondantes lors de la génération de la page.

Citation:

<input name="dat0" type='hidden' value="">
<input name="km0" type='hidden' value="">
<input name="evt0" type='hidden' value="">
<input name="pst0" type='hidden' value="">

Tu me renvoies la page généré ... le souci vient certainement de la ..
Certain de mes champs input n'ont pas de valeur..
mais regarde bien :

Ca n'a strictement rien changé :
De toutes maniere il suffit de comparé betement :
Code:

1 2 <input name='nb_heure' size=3 value='<% =nb_heure %>'> <input name='nb_heure' size=3 value=''> <--PAS de value
Code:

1 2 <input name='materiel' type='hidden' id='materiel' value='<% =num_materiel %>'> <input name='materiel' type='hidden' id='materiel' value='355'><-- VALUE
C'est étrange
ps : la premiere ligne est toujours mon code
la seconde est toujours IE qui parle

Bonjour à tous,

Petite évolution :
en rentrant des values en dur exemple :
Code:

1 2 3 4 5 6 7 8 <td align="center" > <input type="checkbox" name="supp<%=i%>" onclick="test_chckbx();"> <input name="mat<%=i%>" type='hidden' value="7"> <input name="dat<%=i%>" type='hidden' value="97"> <input name="km<%=i%>" type='hidden' value="77"> <input name="evt<%=i%>" type='hidden' value="777"> <input name="pst<%=i%>" type='hidden' value="77777"> </td>
J'obtiens quelque chose de plus convenable.
ma requête s'exécute toujours et je vois des paramètres s'affiche..

Citation:

delete from parc_gestion_vehicule where num_materiel ='7' and dat ='97' and km ='77' and evenement ='777' and prestataire ='77777'

Le souci vient donc de l'incompréhension de ma valeur i au sein de ma requete, le i me permettant je rappelle de distinguer les différentes lignes...
ou alors dans mes input au niveau des value(s)

Avis aux experts
merci

ps ma requête :
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 if request.form("validation") <> "" then for i =0 to request.form("cpt")-1 if request.form("supp"&i&"") <> "" then requete = "delete from parc_gestion_vehicule " requete = requete & " where num_materiel ='"&request.form("mat"&i)&"' " requete = requete & " and dat ='"&request.form("dat"&i)&"' " requete = requete & " and km ='"&request.form("km"&i)&"' " requete = requete & " and evenement ='"&request.form("evt"&i)&"' " requete = requete & " and prestataire ='"&request.form("pst"&i)&"' " response.write(requete) end if next end if

Non ririch, ce n'est pas le i du qui pose le problème, c'est la façon dont tu remplis les hidden.
Code:

1 2 3 4 5 <input type="checkbox" name="supp<%=i%>" onclick="test_chckbx();"> <input name="dat<%=i%>" type='hidden' value="<%=dat%>"> <input name="km<%=i%>" type='hidden' value="<%=km%>"> <input name="evt<%=i%>" type='hidden' value="<%=evenement%>"> <input name="pst<%=i%>" type='hidden' value="<%=prestataire%>">
Tu dois le remplir chaque ligne avec le résultat d'une requête.

Citation:

Envoyé par ririch

ca c'est IE qui te le donne :

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
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
<form name='saisie' method='post' action='SaisieEvenementR.asp' onSubmit='return VerifSaisie()'>
   		<table width='100%' border='0' cellspacing='0'>
			<tr> 
					<td align='center'>Date</td>
					<td align='center'>Km</td>
					<td align='center'>Evenement </td>
					<td align='center'>Prestataire </td>			
					<td align='center'>Cout €</td>
					<td align='center'>Temps en minutes</td>
					<td align='center'>Commentaire</td>
			</tr>
			<tr> 
				<td align='center' >
					<input name='dat' size=7 onfocus='this.select();lcs(this)' onclick='event.cancelBubble=true;this.select();lcs(this)' value'<%=dat%>'>
				</td>
				<td align='center' >
					<input name='km' size=5 value='<%=km%>'> 
				</td>
				<td align='center'>
					<select name='evenement' value='<%=evenement%>'>
 
					<% 
							lesevts="select * from parc_evenement"
									Set rsevts = Db_sql.Execute(lesevts)
									while not rsevts.EOF
									response.write("<option value="&rsevts("idevenement")&">"&rsevts("Libelle")&"</option>")
									rsevts.movenext
								wend
								rsevts.close
				  %>
 
					</select> 
				</td>
				<td align='center' >
					<select name='prestataire' value='<%=prestataire%>'>
 
					<% 
								lesevts="select * from parc_prestataire"
									Set rsevts = Db_sql.Execute(lesevts)
									while not rsevts.EOF
									response.write("<option value="&rsevts("idprestataire")&">"&rsevts("libellé")&"</option>")
									rsevts.movenext
								wend
								rsevts.close
					 %>
 
					</select>  
				</td>
				<td align='center'>
					<input name='montant'size=3 value='<%=montant%>'>
				</td>
				<td align='center' >
					<input name='nb_heure' size=3 value='<%=nb_heure%>'>
				</td>
				<td align='center' >
					<textarea rows="4" cols="33"  name='commentaire' ><% =commentaire %></textarea>
				</td>		
				<td align='center'>
					<input name='op' type='hidden' id='op' value='ajout'>
					<input name='materiel' type='hidden' id='materiel' value='<%=num_materiel%>'>
					<input name='Submit2' type='submit' size=8 value='Enregistrer' >
				</td>
			</tr>
		</table>
	</form>
<%	end if %>
 
     <form name="affichage" method="post" action=''>
			 <input name='mat' type='hidden'  value='<%=num_materiel%>'>
				<table width="100%" border="1" cellspacing="0">
					<tr> 
					  <td height="10"><div align="center" style="font-weight: bold">Date</div></td>
					  <td height="10"><div align="center" style="font-weight: bold">Km</div></td>
					  <td height="10"><div align="center" style="font-weight: bold">Evenement</div></td>
					  <td height="10"><div align="center" style="font-weight: bold">Prestataire</div></td> 
					  <td height="10"><div align="center" style="font-weight: bold">Cout €</div></td>
					  <td height="10"><div align="center" style="font-weight: bold">Nombre de minutes</div></td>
					  <td height="10"><div align="center" style="font-weight: bold">Commentaire</div></td>
					  <td height="10"><div align="center" style="font-weight: bold">Supp</div></td>
					</tr>
		  <% i=0
				if  not IsEmpty(num_materiel) then							
							requete = "select *  from parc_gestion_vehicule "
							requete = requete & " inner join parc_prestataire on prestataire = idprestataire "
							requete = requete & " inner join parc_evenement on evenement = idevenement and num_materiel = "&num_materiel&"  "
							requete = requete & " order by date desc "
							Set rs3 = Db_sql.Execute(requete)
							while not rs3.eof
 
							Response.write("<tr>")
								Response.write("<td align='center'>"&rs3("date")&"</td>")
								Response.write("<td align='center'>"&rs3("km")&"</td>")
								Response.write("<td align='center'>"&rs3("Libelle")&"</td>")
								Response.write("<td align='center'>"&rs3("libellé")&"</td>")
								Response.write("<td align='center'>"&rs3("montant")&"</td>")
								Response.write("<td align='center'>"&rs3("nb_heure")&"</td>")
								Response.write("<td align='center'>"&rs3("commentaire")&"</td>")
			%>
						<td align="center" >
							<input type="checkbox" name="supp<%=i%>" onclick="test_chckbx();">
							<input name="dat<%=i%>" type='hidden'  value="<%=dat%>">
							<input name="km<%=i%>"  type='hidden'  value="<%=km%>">
							<input name="evt<%=i%>" type='hidden'  value="<%=evenement%>">
							<input name="pst<%=i%>" type='hidden'  value="<%=prestataire%>">										
						</td>
					<%
							i=i+1							
							Response.write("</tr>")
							rs3.movenext 	
							wend
							 response.write("<input name='cpt' type='hidden' value="&i&">")
						end if
					%>
			<tr><td></td><td></td><td></td><td></td><td></td><td></td><td></td>
				  <td align="center">
					<input id="validation" name="validation" type="submit" value="Valider" style="visibility:hidden;">
				  </td>
			</tr>
	 </table>
	  </form>

C'est scrupuleusement ce qu'il y avait dans mon ancien post..
Tu penses alors que mes valeurs ne sont jamais posté ?
Comment rétablir le souci ?

Pour etre "sur" de les poster, j'ai rajouter ca :
Code:

1 2 3 4 5 6 7 8 9 case "supp" supp = 1 mat = Request.Form("mat") dat = Request.Form("dat") km = Request.Form("km") evt = Request.form("evt") pst = Request.form("pst") mode = "supp"
Mais je me confonds les pinceaux entre la valeurs avant le = et celle entre quote.
De plus j'ai rajouter un champ caché
Code:

1 2 3 4 <td align="center"> <input name='op' type='hidden' id='op' value='supp'> <input id="validation" name="validation" type="submit" value="Valider" style="visibility:hidden;"> </td>