Private Sub salva() Me.Validate() Me.BancaBindingSource.EndEdit() Me.BancaTableAdapter.Update(Me.AssegniDataSet.Banca) ' Risolve il problema dell'ID=0 assegnato al primo record inserito in una tabella vuota: If Me.BancaBindingSource.Count = 1 Then Me.BancaTableAdapter.Fill(Me.AssegniDataSet.Banca) End If Me.CausaleBindingSource.EndEdit() Me.CausaleTableAdapter.Update(Me.AssegniDataSet.Causale) ' Risolve il problema dell'ID=0 assegnato al primo record inserito in una tabella vuota: If Me.CausaleBindingSource.Count = 1 Then Me.CausaleTableAdapter.Fill(Me.AssegniDataSet.Causale) End If Me.BeneficiarioBindingSource.EndEdit() Me.BeneficiarioTableAdapter.Update(Me.AssegniDataSet.Beneficiario) ' Risolve il problema dell'ID=0 assegnato al primo record inserito in una tabella vuota: If Me.BeneficiarioBindingSource.Count = 1 Then Me.BeneficiarioTableAdapter.Fill(Me.AssegniDataSet.Beneficiario) End If End Sub |