[VB2010 Exp] Scrittura su DB access 2010

[Neo996sps]

Ciao a tutti,

stò riprendendo in mano visual basic e tramite la versione 2010 express ho creato una piccola applicazione connessa ad un DB access 2010. Dopo aver inserito la mia sorgente dati ho inserito in un form un datagridview i cui dati sono il risultato di un table adapter in cui eseguo questa query

SELECT     tblClienti.ragionesociale1, tblClienti.cf, tblClienti.piva, tblCategoria.categoria
FROM         (tblCategoria INNER JOIN tblClienti ON tblCategoria.id = tblClienti.idCategoria)

e se inserisco manualmente i dati da access nel form li vedo.

Ho fatto un passo avanti e ho creato un secondo form in cui ho i campi di testo da cui vorrei salvare i dati nel database. Il codice per il salvataggio è questo:

Try
            Me.Validate()
            Me.TblClientiBindingSource.EndEdit()
            Me.TableAdapterManager.UpdateAll(Me.DbPeritiDataSet)
        Catch ex As Exception
            MsgBox("ERRORE", MsgBoxStyle.Exclamation)
        End Try

ma i dati non vengono registrati nel db. Come prova aggiuntiva ho dato al db la proprietà copia nella directory: copia se più recente ma non è cambiato nulla.

Che cosa sbaglio?

[Neo996sps]

Ho fatto un passo avanti. Praticamente non vedo i dati in quanto non mi va ad inserire il valore della combobox nella cella del record corretta. A questo punto il topic cambia:

come posso aggiornare il mio database tramite questa query:

Dim salva As String = "INSERT INTO tblClienti (id, ragionesociale1, ragionesociale2, cf, piva, indirizzo, idComune, idCategoria) VALUES" &
                              "'NULL', '" & Ragionesociale1TextBox.Text & "', '" & Ragionesociale2TextBox.Text & "',  '" & CfTextBox.Text & "','" & PivaTextBox.Text & "'," &
                              "'" & IndirizzoTextBox.Text & "','NULL','" & CategoriaComboBox.SelectedValue & "'"

in modo tale da avere l'aggiornamento del DB?

[Neo996sps]

Signori ho risolto. Ho trovato un topic che parlava di un problema simile. Praticamente ho modificato il codice in questo modo:

Try
            Me.Validate()
            Me.TblClientiBindingSource.EndEdit()
            Me.TblClientiTableAdapter.Insert(Ragionesociale1TextBox.Text, Ragionesociale2TextBox.Text, CfTextBox.Text, PivaTextBox.Text, IndirizzoTextBox.Text, CategoriaComboBox.SelectedValue, CategoriaComboBox.SelectedValue)
        Catch ex As Exception
            MsgBox("ERRORE", MsgBoxStyle.Exclamation)
        End Try

Praticamente valido i dati, termino la modifica del binding source, e successivamente mi va ad inserire i valori nella mia tabella. Non so se la teoria è giusta, però funziona.