Impossibile aggiornare. Database o oggetto di sola lettura

di Anonimizzato9688 il
4 risposte
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?

4 Risposte

  • Le Query sono singolarmente editabili...?

    La query FabbisogniOrdiniAcquisto l'hai aperta... in EDIT...?

    Hai gli INDICI nelle tabelle [WTK60DAT_GAMOV01F] e [JOIN WTK60DAT_GAMOV00F]...?
  • Lasciate stare...cambio approccio. Grazie comunque
  • Mi sono creata delle tabella di appoggio.
  • Chiaramente tu devi approciare come credi...

    Personalmente, ma potrei aver frainteso lo scenario visto che di dettagli non ne hai dati, mi sento solo di dirti che non è un metodo ortodosso e tecnicamente sostenibile.
Devi accedere o registrarti per scrivere nel forum
4 risposte