'Declaration Public Shadows Property UpdateCommand As PgSqlCommand
public new PgSqlCommand UpdateCommand {get; set;}
'Declaration Public Shadows Property UpdateCommand As PgSqlCommand
public new PgSqlCommand UpdateCommand {get; set;}
public void UseDataTable(PgSqlConnection pgConnection) { PgSqlDataTable myDataTable = new PgSqlDataTable("SELECT * FROM Test.Dept", pgConnection); try { myDataTable.Active = true; myDataTable.Rows[3]["DName"] = "Researches"; myDataTable.UpdateCommand = new PgSqlCommand("UPDATE Test.Dept SET DeptNo = :DeptNo, DName = :DName, Loc = 'Modified' " + "WHERE DeptNo = :oldDeptNo", pgConnection); myDataTable.UpdateCommand.Parameters.Add("DeptNo", PgSqlType.Int, 0, "DeptNo"); myDataTable.UpdateCommand.Parameters.Add("DName", PgSqlType.VarChar, 15, "DName"); myDataTable.UpdateCommand.Parameters.Add("oldDeptNo", PgSqlType.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 pgConnection As PgSqlConnection) Dim myDataTable As PgSqlDataTable = New PgSqlDataTable("SELECT * FROM Test.Dept", pgConnection) Try myDataTable.Active = True myDataTable.Rows(3)("DName") = "Researches" myDataTable.UpdateCommand = New PgSqlCommand("UPDATE Test.Dept SET DeptNo = :DeptNo, DName = :DName, Loc='Modified' " & _ "WHERE DeptNo = :oldDeptNo", pgConnection) myDataTable.UpdateCommand.Parameters.Add("DeptNo", PgSqlType.Int, 0, "DeptNo") myDataTable.UpdateCommand.Parameters.Add("DName", PgSqlType.VarChar, 15, "DName") myDataTable.UpdateCommand.Parameters.Add("oldDeptNo", PgSqlType.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