Error 3073 - Operation must use an updatable query

Error 3073 - Operation must use an updatable query

Post by Alvaro La » Fri, 26 Nov 1999 04:00:00



I'm confrontating the following error trying to modify a table in
dbaseIII format linked thru Access 97, and accessed by VB6 using DAO 3.5:
Error 3073- Operation must use an updatable query

Have a query in Access that simulate the process of inserting new records in
the Dbase table, and it work fine from Access97 but when i put the same SQL
string and try to execute it from VB6 it doesn't work, but instead send me
the error before mentioned

The code as follows:
'====================
        Set dbs = OpenDatabase(Setup.dbdir)

        Ejecuta = "INSERT INTO JCTRANSA ( JCTRNUM, JCTRSCOD, JCTRPROVEE,
JCTRINVOIC, JCTRDATE, JCTRAMOUNT, JCTRDESCRI, JCTRTIPO, JCTRPROVE1 ) " & _
                    "SELECT Rec1.NoProyecto, Right([CuentaCosto],4) AS
Expr1, Rec1.NoSuplidor, DetalleRecibo.NoFactura, DetalleRecibo.Fecha,
DetalleRecibo.Monto, Rec1.Descripcion, 'F' AS Tipo, Rec1.Compania " & _
                    "FROM DetalleRecibo INNER JOIN Rec1 ON
DetalleRecibo.RegOC = Rec1.ID " & _
                    "WHERE ((Rec1.NoProyecto<>'ZZ') AND
(DetalleRecibo.Fecha>=#" & CDate(varDesde) & "#) And
(DetalleRecibo.Fecha<=#" & CDate(varHasta) & "#) AND (Rec1.Sociedad = '001')
AND (DetalleRecibo.StEnvioCostos=False));"

        dbs.Execute Ejecuta
'================

TIA,

Alvaro Lao