Click here to Skip to main content
13,352,161 members (72,540 online)
Click here to Skip to main content
Add your own
alternative version


16 bookmarked
Posted 26 Jul 2006

How to retrieve, add, modify, and delete Oracle Data with a DataGrid

, 26 Jul 2006
Rate this:
Please Sign up or sign in to vote.
a few lines of code to do many tasks on the Oracle Data
  • <A href="DataGridEditor/"></A><A href="DataGridEditor/">Download source files - 2 Kb</A> 
  • Download demo project - 16 Kb

Sample Image - DatagridImg.jpg


            We all know that a good application is that one which the user can use easily, simply and have his jobs done quickly, I thought it will be great to have all this done by one tool and small code using a DataGrid.

This sample application shows how to Retrieve, Add, Modify, Delete Data from an Oracle Data Base.

<?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" /><o:p> 





    You have to run this sql statement on the SQL plus to create the required table:

Create table testTbl (id number(3),name varchar2(10), job varchar2(10));



If you don't have oracle tools installed on your system then install it and then add “Oracle.DataAccess.DLL” from Project => Add Reference => Brows




Imports</FONT> Oracle.DataAccess.Client


Dim conn As New OracleConnection("Data Source=ServiceName;User ID=UserName;Password=Password")

Dim da As OracleDataAdapter = New OracleDataAdapter

Dim ds As New DataSet

Retrieving Code

da.SelectCommand = New OracleCommand("select * from testTbl", conn)


If conn.State = ConnectionState.Closed Then conn.Open()

da.Fill(ds, "test")

myDataGrid.DataSource = ds.Tables("test")


Catch ex As Exception


End Try


Insert, Update, Delete Code

Dim param As OracleParameter

If conn.State = ConnectionState.Closed Then conn.Open()

Dim command_builder As New OracleCommandBuilder(da) 'create new command builder and passing the Dataadapter to it


da.UpdateCommand = New OracleCommand("UPDATE testTbl SET name=:name, job=:job where id=:OLDid", conn) 'building Update command

da.DeleteCommand = New OracleCommand("DELETE FROM testTbl where id=:OLDid", conn) ' building Delete command

da.UpdateCommand.Parameters.Add(":name", OracleDbType.Varchar2, 10, "name") 'Passing parameters to the command builder

da.UpdateCommand.Parameters.Add(":job", OracleDbType.Varchar2, 10, "job")

param = da.UpdateCommand.Parameters.Add(":OLDid", OracleDbType.Int32, 3, "id")

param = da.DeleteCommand.Parameters.Add(":OLDid", OracleDbType.Int32, 3, "id")

param.SourceVersion = DataRowVersion.Original

da.Update(ds, "test") 'Update Data in the Table


Catch ex As Exception


End Try


This article has no explicit license attached to it but may contain usage terms in the article text or the download files themselves. If in doubt please contact the author via the discussion board below.

A list of licenses authors might use can be found here


About the Author

Najeeb Al-Majidy
Web Developer
Yemen Yemen
No Biography provided

You may also be interested in...


Comments and Discussions

QuestionThanks Najeeb! Pin
Member 90915697-Jun-12 23:08
memberMember 90915697-Jun-12 23:08 

General General    News News    Suggestion Suggestion    Question Question    Bug Bug    Answer Answer    Joke Joke    Praise Praise    Rant Rant    Admin Admin   

Use Ctrl+Left/Right to switch messages, Ctrl+Up/Down to switch threads, Ctrl+Shift+Left/Right to switch pages.

Permalink | Advertise | Privacy | Terms of Use | Mobile
Web01 | 2.8.180111.1 | Last Updated 27 Jul 2006
Article Copyright 2006 by Najeeb Al-Majidy
Everything else Copyright © CodeProject, 1999-2018
Layout: fixed | fluid