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