Ver Mensaje Individual
  #13 (permalink)  
Antiguo 29/10/2003, 05:45
knarfy
 
Fecha de Ingreso: julio-2003
Mensajes: 116
Antigüedad: 21 años, 10 meses
Puntos: 0
Nada, no funciona. Ni con una solución ni con otra. Os pongo el código de las dos páginas que uso para ver si hay algo mal en ella. Voy a quitar lo poco importante pq me dice que el mensaje es muy largo.

--------------------------------------------------------------
pedidos2.asp
--------------------------------------------------------------
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>


<form name="form1" method="post" action="procesa_pedidos.asp">

<table width="100%" border="0" cellpadding="2">
<tr>
<input name="textfield2" type="text" class="campo">
</tr>
<tr>
<td height="23"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<label>
<input type="checkbox" name="chk1" value="1400">
</label>
Varios sabores</font></td>
<td width="21%" height="23"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<label>
<input name="textfield3" type="text" class="campo" size="15" maxlength="15" value="0" dir="rtl">
</label>
</font></td>
<td width="23%"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<label>
<input type="checkbox" name="chk2" value="1401">
At&uacute;n </label>
</font></td>

</tr>
<tr>
<td height="23"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<label>
<input type="checkbox" name="chk3" value="1402">
At&uacute;n con tomate </label>
</font></td>
<td height="23"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<label>
<input type="checkbox" name="chk4" value="1403">
Cangrejo </label>
</font></td>
</tr>
<tr>
<td height="23"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<label>
<input type="checkbox" name="chk5" value="1404">
Cocktail de cangrejo </label>
</font></td>
<td height="23"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<input name="textfield33" type="text" class="campo" size="15" maxlength="15" value="0" dir="rtl">&nbsp;
</font></td>
<td height="23"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<label>
<input type="checkbox" name="chk6" value="1405">
Chorizo </label>
</font></td>
<td height="23"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<input name="textfield313" type="text" class="campo" size="15" maxlength="15" value="0" dir="rtl">
</font></td>
</tr>
<tr>
<td height="23"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<label>
<input type="checkbox" name="chk7" value="1406">
Dog Bacon</label>
</font></td>
<td height="23"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<input name="textfield34" type="text" class="campo" size="15" maxlength="15" value="0" dir="rtl">&nbsp;
</font></td>
<td height="23"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<label>
<input type="checkbox" name="chk8" value="1407">
Ensaladilla</label>
</font></td>
<td height="23"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<input name="textfield314" type="text" class="campo" size="15" maxlength="15" value="0" dir="rtl">
&nbsp;</font></td>
</tr>
<tr>
<td height="23"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<label>
<input type="checkbox" name="chk9" value="1408">
Sobrasada </label>
</font></td>
<td height="23"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<input name="textfield35" type="text" class="campo" size="15" maxlength="15" value="0" dir="rtl">&nbsp;
</font></td>
<td height="23"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<label>
<input type="checkbox" name="chk10" value="1409">
Integral de pavo</label>
</font></td>
<td height="23"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<input name="textfield315" type="text" class="campo" size="15" maxlength="15" value="0" dir="rtl">
&nbsp;</font></td>
</tr>
<tr>
<td height="23"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<label>
<input type="checkbox" name="chk11" value="1410">
Mixto </label>
</font></td>
<td height="23"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<input name="textfield36" type="text" class="campo" size="15" maxlength="15" value="0" dir="rtl">&nbsp;
</font></td>
<td height="23"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<label>
<input type="checkbox" name="chk12" value="1414">
Salami
</label>
</font></td>
<td height="23"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<input name="textfield316" type="text" class="campo" size="15" maxlength="15" value="0" dir="rtl">
&nbsp;</font></td>
</tr>
<tr>
<td height="23"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<label>
<input type="checkbox" name="chk13" value="1415">
Tortilla </label>
</font></td>
<td height="23"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<input name="textfield37" type="text" class="campo" size="15" maxlength="15" value="0" dir="rtl">&nbsp;
</font></td>
<td height="23"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<label>
<input type="checkbox" name="chk14" value="1416">
Vegetal con at&uacute;n</label>
</font></td>
<td height="23"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<input name="textfield317" type="text" class="campo" size="15" maxlength="15" value="0" dir="rtl">
&nbsp;</font></td>
</tr>
<tr>
<td height="23"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<label>
<input type="checkbox" name="chk15" value="1417">
Pat&eacute; </label>
</font></td>
<td height="23"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<input name="textfield38" type="text" class="campo" size="15" maxlength="15" value="0" dir="rtl">&nbsp;
</font></td>
<td height="23"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<label>
<input name="chk16" type="checkbox" id="chk16" value="1420">
Roquefort
</label>
</font></td>
<td height="23"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<input name="textfield318" type="text" class="campo" size="15" maxlength="15" value="0" dir="rtl">
&nbsp;</font></td>
</tr>
<tr>
<td height="23"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<label>
<input name="chk17" type="checkbox" id="chk17" value="1421">
Salm&oacute;n </label>
</font></td>
<td height="23"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<input name="textfield39" type="text" class="campo" size="15" maxlength="15" value="0" dir="rtl">&nbsp;
</font></td>
<td height="23"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<label>
<input name="chk18" type="checkbox" id="chk18" value="1422">
Queso con nueces
</label>
</font></td>
<td height="23"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<input name="textfield319" type="text" class="campo" size="15" maxlength="15" value="0" dir="rtl">
&nbsp;</font></td>
</tr>
<tr>
<td height="23"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<label>
<input name="chk19" type="checkbox" id="chk19" value="1423">
Pollo Trufado </label>
</font></td>
<td height="23"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<input name="textfield310" type="text" class="campo" size="15" maxlength="15" value="0" dir="rtl">&nbsp;
</font></td>
<td height="23"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<label>
<input type="checkbox" name="chk20" value="1424">
Pavo rosa
</label>
</font></td>
<td height="23"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<input name="textfield320" type="text" class="campo" size="15" maxlength="15" value="0" dir="rtl">&nbsp;
</font></td>
</tr>
<tr>
<td height="23"><label>
<input type="submit" name="Submit" value="Enviar">
</label></td>
<td height="23" colspan="2">&nbsp;</td>
<td height="23">&nbsp;</td>
</tr>
</table>

</form>


----------------------------------------------------
procesa_pedidos.asp
----------------------------------------------------
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%
set rs=Server.CreateObject("ADODB.Recordset")
set conn=Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("\databases\db1.mdb")
dim a(20)

for i=1 to 20
a(i)=request.form("chk"&i)
if a(i)="" then
a(i)=0
end if
next

for i=1 to 20
if a(i)<>0 then
SQL="INSERT INTO [pedidos productos] [(código producto)] values ('"&a(i)&"')"
set rs=conn.execute(SQL)
response.write "<br>Insertado: "&a(i)
end if
next


%>

A ver si alguien me puede decir que falla y que no falla porque necesito hacer eso, es muy urgente e importante para mí. Gracias a todos.

Última edición por knarfy; 29/10/2003 a las 05:46