Ciao a tutti, premetto che sono una principiante percui non arrabbiatevi...
Mi da questo errore quando esegue la Edit su un recordset:
Dim OrdAcq As DAO.Recordset
StrSql = "Select * from FabbisogniOrdiniAcquisto WHERE Articolo = '" & ImpProd.Fields("Componente") & "'"
Set OrdAcq = DBCorrente.OpenRecordset(StrSql)
OrdAcq.Edit
FabbisogniOrdiniAcquisto è una query cosi definita
SELECT WTK60DAT_GAMOV00F.TDOCAO, WTK60DAT_GAMOV01F.NRORAO, WTK60DAT_GAMOV01F.NRRGAO, WTK60DAT_GAMOV01F.CDARAO AS Articolo, WTK60DAT_GAMOV01F.QTGSAO AS QtàOrd, WTK60DAT_GAMOV01F.DTRCAO, WTK60DAT_GAMOV00F.CDCFAO, WTK60DAT_GAMOV01F.QTGSAO AS Residuo
FROM WTK60DAT_GAMOV01F INNER JOIN WTK60DAT_GAMOV00F ON (WTK60DAT_GAMOV01F.TDOCAO = WTK60DAT_GAMOV00F.TDOCAO) AND (WTK60DAT_GAMOV01F.NRORAO = WTK60DAT_GAMOV00F.NRORAO)
WHERE (((WTK60DAT_GAMOV01F.CDARAO)<>"") AND ((WTK60DAT_GAMOV01F.QTGSAO)>0) AND ((WTK60DAT_GAMOV01F.SAACAO)<>"S"));
Dov'è il problema?