'Declaration Public Shadows Property UpdateCommand As SQLiteCommand
public new SQLiteCommand UpdateCommand {get; set;}
'Declaration Public Shadows Property UpdateCommand As SQLiteCommand
public new SQLiteCommand UpdateCommand {get; set;}
Note: If execution of this command returns rows, these rows may be merged with the System.Data.DataSet depending upon how you set the Devart.Common.DbCommandBase.UpdatedRowSource property of the SQLiteCommand object.
public void UseDataAdapter(SQLiteConnection sqConnection) { SQLiteDataAdapter myAdapter = new SQLiteDataAdapter("SELECT DeptNo, DName FROM Dept", sqConnection); myAdapter.MissingSchemaAction = MissingSchemaAction.AddWithKey; DataSet myDataSet = new DataSet(); myAdapter.Fill(myDataSet,"Departments"); myDataSet.Tables["Departments"].Rows[3]["DName"] = "Researches"; myAdapter.UpdateCommand = new SQLiteCommand("UPDATE Dept SET DeptNo = :DeptNo, DName = :DName " + "WHERE DeptNo = :oldDeptNo", sqConnection); myAdapter.UpdateCommand.Parameters.Add("DeptNo", SQLiteType.Int32, 0, "DeptNo"); myAdapter.UpdateCommand.Parameters.Add("DName", SQLiteType.Text, 15, "DName"); myAdapter.UpdateCommand.Parameters.Add("oldDeptNo", SQLiteType.Int32, 0, "DeptNo").SourceVersion = DataRowVersion.Original; myAdapter.Update(myDataSet,"Departments"); //Get all data from all tables within the dataset foreach(DataTable myTable in myDataSet.Tables) { foreach(DataRow myRow in myTable.Rows) { foreach (DataColumn myColumn in myTable.Columns) { Console.Write(myRow[myColumn]+"\t"); } Console.WriteLine(); } Console.WriteLine(); } }
Public Sub UseDataAdapter(ByVal sqConnection As SQLiteConnection) Dim myAdapter As SQLiteDataAdapter = New SQLiteDataAdapter("SELECT DeptNo, DName FROM Dept", sqConnection) myAdapter.MissingSchemaAction = MissingSchemaAction.AddWithKey Dim myDataSet As DataSet = New DataSet myAdapter.Fill(myDataSet, "Departments") myDataSet.Tables("Departments").Rows(3)("DName") = "Researches" myAdapter.UpdateCommand = New SQLiteCommand("UPDATE Dept SET DeptNo = :DeptNo, DName = :DName " & _ "WHERE DeptNo = :oldDeptNo", sqConnection) myAdapter.UpdateCommand.Parameters.Add("DeptNo", SQLiteType.Int32, 0, "DeptNo") myAdapter.UpdateCommand.Parameters.Add("DName", SQLiteType.Text, 15, "DName") myAdapter.UpdateCommand.Parameters.Add("oldDeptNo", SQLiteType.Int32, 0, "DeptNo").SourceVersion = DataRowVersion.Original myAdapter.Update(myDataSet, "Departments") Dim myTable As DataTable Dim myRow As DataRow Dim myColumn As DataColumn ' Get all data from all tables within the dataset For Each myTable In myDataSet.Tables For Each myRow In myTable.Rows For Each myColumn In myTable.Columns Console.Write(myRow(myColumn) & Chr(9)) Next myColumn Console.WriteLine() Next myRow Console.WriteLine() Next myTable End Sub