Public dsInfo As New DataSet Public daInfo As New OleDb.OleDbDataAdapter Dim LoadQuiz As String Private Sub LoadQuizDatabase() LoadQuiz = "SELECT * FROM QuizInfo" daInfo = New OleDb.OleDbDataAdapter(LoadQuiz, PublicModule.con) daInfo.Fill(dsInfo, "QuizInfo") End Sub
Private Sub UpdateQuizInfo() dsInfo.Tables("QuizInfo").Rows(PublicModule.QuizInfoRow).Item("Questions") = MaxRows dsInfo.Tables("QuizInfo").Rows(PublicModule.QuizInfoRow).Item("Modified") = Date.Now daInfo.Update(dsInfo, "QuizInfo") End Sub
Quote:Update requires a valid UpdateCommand when passed DataRow collection with modified rows.
Dim cb As New OleDb.OleDbCommandBuilder(TableAdapter)
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)