18/08/2004, 11:23
|
 | Colaborador | | Fecha de Ingreso: enero-2002 Ubicación: Centro de la república
Mensajes: 8.849
Antigüedad: 23 años, 3 meses Puntos: 146 | |
Hazlo así:
Código:
for i=0 to UBound(vector)
sql1 = "SELECT Valor FROM Tabla2 Where subcatagory = '"&vector(i)&"'"
rs.Open sql1, conexion, 3, 3
rs.Close
sql11 = "INSERT INTO Mesa1 (TK, subcatagory, Mesa, Cantidad, Valor) VALUES ("&TK&", '"&vector(i)&"', "&Mesa&", "&Cantidad&", "&rs("Valor")&")"
'conexion.execute(sql11)
response.write sql11
Next
Ojo, los .Execute solo se usan para ejecutar consultas que NO regresan datos, como los Insert o los Delete.
Última edición por Myakire; 18/08/2004 a las 11:24 |