Ciao a tutti,
devo eliminare tutti i record da un database tramite un dataset. il dataset e il dataAdapter sono generati in modo automatico da Visual Studio 2010 quindi dovrei avere già tutto quello che serve. Riesco a fare operazioni di inserimento, modifica, eliminazione di UN solo record. Al momento dell'eliminazione di un solo record passo al metodo Delete del dataAdapter ciascuno dei parametri presenti nella riga da eliminare e non la riga stessa. Il metodo lo richiede e non ho trovato altro modo. Ma qui non c'è problema, la riga viene eliminata. Il problema si presenta se devo eliminare tutte le righe. Il metodo Update del DataAdapter dovrebbe apportare tutte le modifiche fatte al DataSet e perciò se chiamo il metodo Clear del DataSet, poi acceptChanges e infine Update del DataAdapter il database dovrebbe svuotarsi. Questo non accade e chiedo a voi il perché...

Posto il codice all'interno della classe

codice:
Dim DbScuoleDataSet As IDAT.DbScuoleDataSet
    Dim DbScuoleDataSetInfoScuolaEntityTableAdapter As IDAT.DbScuoleDataSetTableAdapters.InfoScuolaEntityTableAdapter

    Private Sub Window_Loaded(ByVal sender As System.Object, ByVal e As System.Windows.RoutedEventArgs)
        DbScuoleDataSet = CType(Me.FindResource("DbScuoleDataSet"), IDAT.DbScuoleDataSet)
        DbScuoleDataSetInfoScuolaEntityTableAdapter = New IDAT.DbScuoleDataSetTableAdapters.InfoScuolaEntityTableAdapter()
        DbScuoleDataSetInfoScuolaEntityTableAdapter.Fill(DbScuoleDataSet.InfoScuolaEntity)
    End Sub

    Private Sub ButtonCancella_Click(ByVal sender As System.Object, ByVal e As System.Windows.RoutedEventArgs) Handles ButtonCancella.Click
        Dim Conferma = MsgBox("Sei sicuro di voler eliminare tutti i record del database?", vbYesNo)
        Select Case Conferma
            Case vbYes

                DbScuoleDataSet.Clear()
                DbScuoleDataSet.AcceptChanges()
                DbScuoleDataSetInfoScuolaEntityTableAdapter.Update(DbScuoleDataSet)
                MsgBox("Tutti i record sono stati cancellati")

            Case vbNo

        End Select

    End Sub
Grazie