'Declaration Public Shadows Property InsertCommand As DB2Command
public new DB2Command InsertCommand {get; set;}
'Declaration Public Shadows Property InsertCommand As DB2Command
public new DB2Command InsertCommand {get; set;}
public void UseDataTable(DB2Connection db2Connection) { DB2DataTable myDataTable = new DB2DataTable("SELECT * FROM Dept", db2Connection); try { myDataTable.Active = true; myDataTable.Rows.Add(new object[] {30,"Sales2"}); myDataTable.InsertCommand = new DB2Command("INSERT INTO Dept (DeptNo, DName, Loc) " + "VALUES (:DeptNo, :DName, 'Unverified')", db2Connection); myDataTable.InsertCommand.Parameters.Add("DeptNo", DB2Type.Int, 0, "DeptNo"); myDataTable.InsertCommand.Parameters.Add("DName", DB2Type.VarChar, 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 db2Connection As DB2Connection) Dim myDataTable As DB2DataTable = New DB2DataTable("SELECT * FROM Dept", db2Connection) Try myDataTable.Active = True Dim rowVals() As Object = {30, "Sales2"} myDataTable.Rows.Add(rowVals) myDataTable.InsertCommand = New DB2Command("INSERT INTO Dept (DeptNo, DName, Loc) " & _ "VALUES (:DeptNo, :DName, 'Unverified')", db2Connection) myDataTable.InsertCommand.Parameters.Add("DeptNo", DB2Type.Int, 0, "DeptNo") myDataTable.InsertCommand.Parameters.Add("DName", DB2Type.VarChar, 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