18/08/2004, 09:50
|
| | | Fecha de Ingreso: agosto-2004
Mensajes: 81
Antigüedad: 20 años, 9 meses Puntos: 0 | |
| vector = split (subcatagory,",")
for i=0 to UBound(vector)
sql1 = "SELECT Valor FROM Tabla2 Where subcatagory = '"&vector(i)&"'"
rs.Open sql1, conexion, 3, 3
TK = Request.Form("TK")
Mesa = Request.Form("Mesa")
Cantidad = Request.Form("Cantidad")
subcatagory = Request.Form("subcatagory")
sql11 = "INSERT INTO Mesa1 (TK, subcatagory, Mesa, Cantidad, Valor) VALUES ("&TK&", '"&vector(i)&"', "&Mesa&", "&Cantidad&", "&rs("Valor")&")"
rs1.Open sql11, conexion, 3, 3
response.write sql11
tuve que acomodarlo asi si no me dice "La operación no está permitida si el objeto está abierto" sobre rs.Open sql1, conexion, 3, 3
pero tampoco inserta nada |