Macro base - il campo aggiornato non viene memorizzato

pieralberto76 · February 10, 2021, 10:07pm

Ciao a tutti,
mi sto cimentando in un gestionale ma ho vari problemi dovuti da una quasi totale assenza di conoscenze.
Tra questi ne ho uno con questa sub perchè il testo che viene a “copia e incollato” nel campo di destinazione viene visualizzato nel formulario ma non si salva nel record. Cosa buffa che se vado ad editare il testo ed esco dal controllo si salva nel record corrente.
Ringrazio anticipatamente.

dim img00 as string
dim oForm, oDest, oImg00 as object	

oForm = oEvent.Source.Model.Parent.SubFormConteggiTotaliEFoto
oDest = oEvent.Source.Model.Parent.SubFormCommesse	
img00 = oForm.getByName("PathFoto00").Text
oImg00 = oDest.GetByName("COMM_foto00")
oImg00.Text = img00

charlie.it · February 11, 2021, 6:21am

Ciao, è difficile ragionare su un frammento di codice. Ti assegno un punteggio (Karma) per permetterti di allegare un file di esempio.

charlie.it · February 13, 2021, 5:11pm

Ciao, aggiungi questo codice alla macro:

riga da inserire sotto alle altre oDest.getByName

id = oDest.getByName("COMM_id").value

righe da aggiungere in fondo alla macro

Statement = oDest.ActiveConnection.createStatement()' Crea istruzione da eseguire  
sSQL= "UPDATE ""TAB_COMMESSE"" SET ""COMM_foto00"" = '" +img00 + "' , ""COMM_foto01"" = '" +img01 + "', ""COMM_foto02"" = '" +img02 + "' WHERE ""COMM_id"" = '" + Id +"'"
Statement.executeUpdate(sSQL)' Esegue l'struzione SQL
oDest.Reload ' aggiorna il formulario

N.B. il campo COMM_id deve essere presente nel SubFormCommesse per poter acquisire il valore "id"

Database: File_modificato.odb

pieralberto76 · February 13, 2021, 7:41pm

Grazie mille Charlie, ho visto che hai risolto con lo stesso metodo anche a mariog! FUNZIONA!!!
L’unica cosa che non mi piace è il fatto che aggiornando il formulario perde il focus dal record in cui stavo lavorando e si posiziona sul primo. C’è un modo per evitarlo?

charlie.it · February 14, 2021, 9:03am

A me non pare che perda il focus. Ti ho allegato il database da me modificato, controlla se mi sbaglio.

pieralberto76 · February 14, 2021, 9:21am

Hai ragione, non perde il focus aggiornando la sotto maschera! io aggiornavo la MAINFORM. Grazie

mariog · February 11, 2021, 10:10am

Interessante! anch’io ho lo stesso identico problema!

pieralberto76 · February 14, 2021, 9:21am

pieralberto76 · February 11, 2021, 7:56pm

Gestione_PIER3D_vuoto.odb

la macro si attiva con il pulsante “Macro prova”