error con INSERT

[lexus]

Hola a todos,

estoy tratando de duplicar unos valores que ya estan en mi base de datos access, lo que estoy haciendo es esto:



Dim bd
bd = "../carpeta/basededatos.mdb"
set con = Server.CreateObject("ADODB.Connection")
con.Open "DRIVER={Microsoft Access Driver (*.mdb)};uid=;pwd=clave;DBQ=" & Server.MapPath(bd)

set rs = con.Execute("INSERT INTO facturacion SELECT cliente, codigo, fecha_facturaano, fecha_factura_mes, tipo_factura FROM facturacion WHERE fecha_facturames LIKE '%" & _
Request.QueryString("mes") & "%' And fecha_facturaano LIKE '%" & _
Request.QueryString("ano") & "%' And tipo_factura = 'comun'")




y me sale este error:
Tipo de error:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E10)
[Microsoft][Controlador ODBC Microsoft Access] Pocos parámetros. Se esperaba 1.
/prog/facturacion/crear_todas_facturas.asp, línea 15


donde linea 15 es la que esta en negrita



alguien sabe que puede ser o como es la manera correcta de hacer esto?

gracias

[lexus]

simplifiqué aun mas la consulta asi

set rs = con.Execute("INSERT INTO facturacion SELECT cliente, codigo, fecha_facturaano, fecha_facturames, tipo_factura FROM facturacion")


y ahora me sale otro error que no se porque sera:

Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[Microsoft][Controlador ODBC Microsoft Access] El número de valores de consulta y el número de campos de destino son diferentes.
/prog/facturacion/crear_todas_facturas.asp, línea 15

[lexus]

saludos de nuevo,
me he puesto a probar y ya me funciona, pero solo si quito en campo id autonumerico de mi base de datos, si no no me funciona...
el problema es que necesito ese campo para muchas cosas y no lo puedo quitar asi porque si..

alguien sabe como puedo solucionar este problema.. como seria la consulta correcta?

[lexus]

alguna sugerencia?

[korev]

hmm pues dependiendo de para qué lo quieras y en el momento en que quieras hacerlo, una alternativa sería usar una tabla temporal.