'Declaration Public Shadows Property DeleteCommand As OracleCommand
public new OracleCommand DeleteCommand {get; set;}
'Declaration Public Shadows Property DeleteCommand As OracleCommand
public new OracleCommand DeleteCommand {get; set;}
public void UseDataAdapter(OracleConnection myConnection) { OracleDataAdapter myAdapter = new OracleDataAdapter("SELECT DeptNo, DName FROM Test.Dept", myConnection); myAdapter.MissingSchemaAction = MissingSchemaAction.AddWithKey; DataSet myDataSet = new DataSet(); myAdapter.Fill(myDataSet,"Departments"); myDataSet.Tables["Departments"].Rows[3].Delete(); myAdapter.DeleteCommand = new OracleCommand("DELETE FROM Test.Dept WHERE DeptNo = :DeptNo", myConnection); myAdapter.DeleteCommand.Parameters.Add("DeptNo", OracleDbType.Integer, 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 myConnection As OracleConnection) Dim myAdapter As OracleDataAdapter = New OracleDataAdapter("SELECT DeptNo, DName FROM Test.Dept", myConnection) myAdapter.MissingSchemaAction = MissingSchemaAction.AddWithKey Dim myDataSet As DataSet = New DataSet myAdapter.Fill(myDataSet, "Departments") myDataSet.Tables("Departments").Rows(3).Delete() myAdapter.DeleteCommand = New OracleCommand("DELETE FROM Test.Dept WHERE DeptNo = :DeptNo", myConnection) myAdapter.DeleteCommand.Parameters.Add("DeptNo", OracleDbType.Integer, 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
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