16/08/2004, 12:49
|
| | | Fecha de Ingreso: agosto-2004
Mensajes: 81
Antigüedad: 20 años, 9 meses Puntos: 0 | |
| bueno pasando a limpio queda supongo asi:
Set conexion = Server.CreateObject("ADODB.Connection")
conexion.Mode=3
conexion.Open("Provider=Microsoft.Jet.OLEDB.4.0;Da ta Source=" & Server.MapPath("db2.mdb"))
Set rs = Server.createobject("ADODB.Recordset")
Set rs1 = Server.createobject("ADODB.Recordset")
TK = Request.Form("TK")
Mesa = Request.Form("Mesa")
Cantidad = Request.Form("Cantidad")
subcatagory = Request.Form("subcatagory")
sql1 = "SELECT Valor FROM Tabla2 Where subcatagory LIKE '"&request("subcatagory")&"'"
response.write sql1
rs.Open sql1, conexion, 3, 3
sql11 = "INSERT INTO Mesa1 (TK, subcatagory, Mesa, Cantidad, Valor) VALUES ('" & request("TK") & "', '" & request("subcatagory") & "', " & request("Mesa") & ", " & request("Cantidad") & ", "&rs(4)&")"
response.write sql11
rs1.Open sql11, conexion, 3, 3
[/c]
perdona tanta molestia pero el error ahora dice asi:
ADODB.Recordset (0x800A0CC1)
No se encontró el elemento en la colección que corresponde con el nombre o el ordinal pedido.
/insert.asp, line 32
la linea 32 hace referencia a sql11 pero creo que lo que no encuentra es el valor de rs(4)
perdon si te he mareado |