INSERT y SELECT

[Looser]

tengo un problema tengo una tabla pago y otra factura

quiero ingresar un pago en la tabla pago

por ej
insert into pago (cod_factura,fecha_pago) values (1,'2005-08-21')

pero no tengo el cod_factura q es clave primaria de otra tabla pero si tengo un dato q es unico en esa tabla

se podria hacer algo asi???'
insert into pago (cod_factura,fecha_pago) values ((select cod_factura from facturas where mi dato=123) as cod_factura),'2005-08-21')

demas esta decir que lo escrito esta malo

hay alguna forma de hacer eso????

[jrp01]

Estas usando algun lenguaje de programacion?

[Looser]

visual basic 6

[jrp01]

Por que no guardas el resultado del select en un recordset y luego el resultado lo mandas al insert

Set rs=cn.execute("tu Select")
SQL="insert into tabla(campo1,campo2) values (" & rs(0) & "," & campo2 & ")"
cn.execute(SQL)

Cn es la conexion a la BD.

[Vice]

Si conoces la fecha, puedes hacer esto:

Código:

insert into pago (cod_factura,fecha_pago) 
(select cod_factura, "2005-08-21" from facturas where mi dato=123)

Donde la fecha la puedes sustituir por el varlo de una variable. La idea es que obtienes de la tabla facturas el código y una constante, que te da los dos datos que necesitas insertar.
Un saludo.