'Declaration Public Shadows Property InsertCommand As SQLiteCommand
public new SQLiteCommand InsertCommand {get; set;}
'Declaration Public Shadows Property InsertCommand As SQLiteCommand
public new SQLiteCommand InsertCommand {get; set;}
public void UseDataTable(SQLiteConnection sqConnection) { SQLiteDataTable myDataTable = new SQLiteDataTable("SELECT * FROM Dept", sqConnection); try { myDataTable.Active = true; myDataTable.Rows.Add(new object[] {30,"Sales2"}); myDataTable.InsertCommand = new SQLiteCommand("INSERT INTO Dept (DeptNo, DName, Loc) " + "VALUES (:DeptNo, :DName, 'Unverified')", sqConnection); myDataTable.InsertCommand.Parameters.Add("DeptNo", SQLiteType.Int32, 0, "DeptNo"); myDataTable.InsertCommand.Parameters.Add("DName", SQLiteType.Text, 15, "DName"); Console.WriteLine(myDataTable.Update()+" rows updated."); myDataTable.Active = false; //Refresh the table to check custom updates myDataTable.Active = true; foreach(DataRow myRow in myDataTable.Rows) { foreach(DataColumn myCol in myDataTable.Columns) { Console.Write(myRow[myCol]+"\t"); } Console.WriteLine(); } } finally { myDataTable.Active = false; } } public void UseDataTable(SQLiteConnection sqConnection) { SQLiteDataTable myDataTable = new SQLiteDataTable("SELECT * FROM Dept", sqConnection); try { myDataTable.Active = true; myDataTable.Rows.Add(new object[] {30,"Sales2"}); myDataTable.InsertCommand = new SQLiteCommand("INSERT INTO Dept (DeptNo, DName, Loc) " + "VALUES (:DeptNo, :DName, 'Unverified')", sqConnection); myDataTable.InsertCommand.Parameters.Add("DeptNo", SQLiteType.Int32, 0, "DeptNo"); myDataTable.InsertCommand.Parameters.Add("DName", SQLiteType.Text, 15, "DName"); Console.WriteLine(myDataTable.Update()+" rows updated."); myDataTable.Active = false; //Refresh the table to check custom updates myDataTable.Active = true; foreach(DataRow myRow in myDataTable.Rows) { foreach(DataColumn myCol in myDataTable.Columns) { Console.Write(myRow[myCol]+"\t"); } Console.WriteLine(); } } finally { myDataTable.Active = false; } }
Public Sub UseDataTable(ByVal sqConnection As SQLiteConnection) Dim myDataTable As SQLiteDataTable = New SQLiteDataTable("SELECT * FROM Dept", sqConnection) Try myDataTable.Active = True Dim rowVals() As Object = {30, "Sales2"} myDataTable.Rows.Add(rowVals) myDataTable.InsertCommand = New SQLiteCommand("INSERT INTO Dept (DeptNo, DName, Loc) " & _ "VALUES (:DeptNo, :DName, 'Unverified')", sqConnection) myDataTable.InsertCommand.Parameters.Add("DeptNo", SQLiteType.Int32, 0, "DeptNo") myDataTable.InsertCommand.Parameters.Add("DName", SQLiteType.Text, 15, "DName") Console.WriteLine(myDataTable.Update() & " rows updated.") myDataTable.Active = False ' Refresh the table to check custom updates myDataTable.Active = True Dim myRow As DataRow Dim myCol As DataColumn For Each myRow In myDataTable.Rows For Each myCol In myDataTable.Columns Console.Write(myRow(myCol) & Chr(9)) Next myCol Console.WriteLine() Next myRow Finally myDataTable.Active = False End Try End Sub Public Sub UseDataTable(ByVal sqConnection As SQLiteConnection) Dim myDataTable As SQLiteDataTable = New SQLiteDataTable("SELECT * FROM Dept", sqConnection) Try myDataTable.Active = True Dim rowVals() As Object = {30, "Sales2"} myDataTable.Rows.Add(rowVals) myDataTable.InsertCommand = New SQLiteCommand("INSERT INTO Dept (DeptNo, DName, Loc) " & _ "VALUES (:DeptNo, :DName, 'Unverified')", sqConnection) myDataTable.InsertCommand.Parameters.Add("DeptNo", SQLiteType.Int32, 0, "DeptNo") myDataTable.InsertCommand.Parameters.Add("DName", SQLiteType.Text, 15, "DName") Console.WriteLine(myDataTable.Update() & " rows updated.") myDataTable.Active = False ' Refresh the table to check custom updates myDataTable.Active = True Dim myRow As DataRow Dim myCol As DataColumn For Each myRow In myDataTable.Rows For Each myCol In myDataTable.Columns Console.Write(myRow(myCol) & Chr(9)) Next myCol Console.WriteLine() Next myRow Finally myDataTable.Active = False End Try End Sub