'Declaration Public Shadows Property UpdateCommand As DB2Command
public new DB2Command UpdateCommand {get; set;}
'Declaration Public Shadows Property UpdateCommand As DB2Command
public new DB2Command UpdateCommand {get; set;}
public void UseDataTable(DB2Connection db2Connection) { DB2DataTable myDataTable = new DB2DataTable("SELECT * FROM Dept", db2Connection); try { myDataTable.Active = true; myDataTable.Rows[3]["DName"] = "Researches"; myDataTable.UpdateCommand = new DB2Command("UPDATE Dept SET DeptNo = :DeptNo, DName = :DName, Loc = 'Modified' " + "WHERE DeptNo = :oldDeptNo", db2Connection); myDataTable.UpdateCommand.Parameters.Add("DeptNo", DB2Type.Int, 0, "DeptNo"); myDataTable.UpdateCommand.Parameters.Add("DName", DB2Type.VarChar, 15, "DName"); myDataTable.UpdateCommand.Parameters.Add("oldDeptNo", DB2Type.Int, 0, "DeptNo").SourceVersion = DataRowVersion.Original; 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 myDataTable.Rows(3)("DName") = "Researches" myDataTable.UpdateCommand = New DB2Command("UPDATE Dept SET DeptNo = :DeptNo, DName = :DName, Loc='Modified' " & _ "WHERE DeptNo = :oldDeptNo", db2Connection) myDataTable.UpdateCommand.Parameters.Add("DeptNo", DB2Type.Int, 0, "DeptNo") myDataTable.UpdateCommand.Parameters.Add("DName", DB2Type.VarChar, 15, "DName") myDataTable.UpdateCommand.Parameters.Add("oldDeptNo", DB2Type.Int, 0, "DeptNo").SourceVersion = DataRowVersion.Original 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
Target Platforms: Windows 7, Windows Vista SP1 or later, Windows XP SP3, Windows Server 2008 (Server Core not supported), Windows Server 2008 R2 (Server Core supported with SP1 or later), Windows Server 2003 SP2