Ciao a tutti,
ho creato una semplice applicazione MSACCESS che si occupa di gestire una sorta di magazzeno.
Tutto ok, tranne che durante l'inserimento di un nuovo record da maschera e usando VBA, ottengo due righe.
La maschera ha un pulsante che si occupa di far "partire" il seguente codice:
Private Sub Comando70_Click()
On Error GoTo Err_Comando70_Click
Dim ssql As String
ssql = "q_inserimento_prodotto"
DoCmd.SetWarnings False
DoCmd.OpenQuery ssql, , acReadOnly
DoCmd.Close acQuery, ssql
DoCmd.Close acForm, "Inserimento", acSaveNo
DoCmd.SetWarnings True
Exit_Comando70_Click:
Exit Sub
Err_Comando70_Click:
MsgBox Err.Description
Resume Exit_Comando70_Click
End Sub
la maschera è a sua volta richiamata da una maschera principale a cui ritorna il controllo alla fine delle operazioni.
Non sono molto esperto e non so se ci sono altri eventi da dover gestire o se il problema è nella sintassi. La query l'ho provata nel db e funziona.
Ringrazio in anticipo chi mi aiuterà nella soluzione di questo problema.
Ciao ciao