doctorAle85
29-04-2015, 09:31
Ciao a tutti,
Ho la seguente sub:
Private Sub Command1_Click()
DoCmd.SetWarnings False
DoCmd.OpenQuery ("delete_t1")
DoCmd.OpenQuery ("insert_t1")
MsgBox ("t1 valorizzata con successo")
DoCmd.OpenQuery ("delete_t2")
MsgBox ("Aggiornamento t2 avvenuto con successo")
DoCmd.SetWarnings True
End Sub
Vorrei far comparire popup con la specifica del numero di record inseriti/cancellati.
Il codice dovrebbe diventare una cosa del genere:
Private Sub Command1_Click()
DoCmd.SetWarnings False
DoCmd.OpenQuery ("delete_t1")
DoCmd.OpenQuery ("insert_t1")
.....
num_ins=...
...
MsgBox ("Inseriti "+num_ins+" record")
DoCmd.OpenQuery ("delete_t2")
.....
num_del=...
...
MsgBox ("Cancellati "+num_del+" record")
DoCmd.SetWarnings True
End Sub
E' possibile calcolare le variabili num_ins e num_del?
C'è qualche funzione in vba che permette di restituire il numero di record inseriti/cancellati con una query?
Grazie
Ho la seguente sub:
Private Sub Command1_Click()
DoCmd.SetWarnings False
DoCmd.OpenQuery ("delete_t1")
DoCmd.OpenQuery ("insert_t1")
MsgBox ("t1 valorizzata con successo")
DoCmd.OpenQuery ("delete_t2")
MsgBox ("Aggiornamento t2 avvenuto con successo")
DoCmd.SetWarnings True
End Sub
Vorrei far comparire popup con la specifica del numero di record inseriti/cancellati.
Il codice dovrebbe diventare una cosa del genere:
Private Sub Command1_Click()
DoCmd.SetWarnings False
DoCmd.OpenQuery ("delete_t1")
DoCmd.OpenQuery ("insert_t1")
.....
num_ins=...
...
MsgBox ("Inseriti "+num_ins+" record")
DoCmd.OpenQuery ("delete_t2")
.....
num_del=...
...
MsgBox ("Cancellati "+num_del+" record")
DoCmd.SetWarnings True
End Sub
E' possibile calcolare le variabili num_ins e num_del?
C'è qualche funzione in vba che permette di restituire il numero di record inseriti/cancellati con una query?
Grazie