Newsgroup: it.comp.appl.access
Titolo: il solito problema dell'aggiornamento not in list da maschera esterna che non funziona

Pare sia un problema tipico, ma non sono riuscito a trovare una risoluzione 
definitiva in rete.
form principale con combo
solo in elenco si
su evento not in list si mette response a continue e si apre una nuova 
maschera per inserimento di altri dati accessori a quello inserito nella 
combo
A questo punto ci sono due opzioni
se la maschera � collegata e io scrivo direttamente nella tabella, e alla 
fine salvo il record, quando faccio
forms("principale").combo = ID
forms("principale").requery
funziona tutto
Se invece io da form lancio una query che mi accoda nella tabella i dati 
inseriti nei vari controlli, quando faccio
ID = Dmax("ID","tabella")
forms("principale").combo = ID
forms("principale").requery
mi da il famigerato errore 2118
E' necessario salvare il campo corrente prima di eseguire l'azione 
RieseguiQuery
Ho trovato un suggerimento di A.Cara che diceva di fare
forms("principale").combo = ID
forms("principale").combo = forms("principale").combo
forms("principale").requery
ma una volta ha funzionato (???) le altre no
Come se ne esce?
Grazie
Antonio 

 Come se ne esce?
Non posso riprodurre il problema.
Se non riesci forse puoi prepare un download con un piccolo
mdb solo con le parti rilevanti che presenta il problema.
-- 
cu
Karl
*********
Access FAQ: 
www.donkarl.com/it
 


Io personalmente mi comporto in questa maniera: 
response=acdataerrcontinue
me.combo.value=null
docmd.openform "Inserisci",,,,,dialog
me.combo.requery
me.combo.value = Form!Inserisci.CampoId
docmd.close acform, "Inserisci"
e controllo l'errore 2450 (form non trovata). 
In tutte le form d'inserimento ho 2 pulsanti: Esci (che chiude tutto) e
Inserisci (che la apre Hidden). Cos� le posso usare da ogni punto
dell'applicativo.....Io mi son trovato bene......spero possa essere d'aiuto!
-- 
Questo articolo e` stato inviato dal sito web 
http://www.nonsolonews.it

 ha scritto nel messaggio 
news:Q2f5n.124343$9f6.1...@twister1.libero.it...

Ciao Bisone
Nella form aggiungi il record
Apri la form filtrando l'id
dopo update del record disconnesso
il vantaggio � che avendo aggiunto nella combo non hai problemi nel requery
Non ho ben capito perch� la apri disconnessa, ma cmq cos� funzia


Ho visto che invece di un download mi hai mandanto un mail
con un allegato nemmeno zippato... zzz ;-)
Secondo me il colpevole non ï¿œ il fatto di essere legato o no
ma che c'ï¿œ un'interferenza con l'origine record della prime maschera.
Questo solo per il primo record nell'origine record, giï¿œ con un solo
record nelle tabelle il problema non c'ï¿œ piï¿œ.
Come workaround ho cambiato il tuo codice nella maschera
per l'inserimento dati dopo questa riga:
        ultimo_ID = DMax("ID_Material", "A_Materials")
        DoCmd.SetWarnings False
        DoCmd.RunSQL sql_cmd
        DoCmd.SetWarnings True
        ultimo_ID = DMax("ID_Material", "A_Materials")
Dim strSource As String
strSource = Forms("Material List").RecordSource
Forms("Material List")!Filtro_Code.Undo
Forms("Material List").RecordSource = ""
        Forms("Material List").Filtro_Code = ultimo_ID
        Forms("Material List").Filtro_Code.Requery
Forms("Material List").RecordSource = strSource
        End If
Cioï¿œ un Undo alla combo, cancellare il Recordsource, aggiornare
la combo e finalmente restaurare il Recordsource. Cosï¿œ funziona
nelle mie prove.
-- 
HTH
