Please help me in inserting data through DataTable

[dalaimanoj]

Hi experts,

I have a form in which there are 4 textboxes and few command buttons like New, View, Save, Delete. I want to insert the values entered in textboxes are to be stored in an Oracle database table 'mst_users' when the Save button is clicked.

I have declared the below variables in the form declaration section.

Dim conn As New OleDb.OleDbConn ection()
Dim da As New OleDb.OleDbData Adapter()
Dim dc As New OleDb.OleDbComm and()
Dim ds As New DataSet()
Dim dt As New DataTable()
Dim dr As DataRow()

I have a procedure as connectToDataba se() as below

Private Sub connectToDataba se()
Try

conn.Connection String = "provider=msdao ra;user id=scott;passwo rd=tiger;data source=orcl"
dc.Connection = conn
dc.CommandText = "select * from mst_users"
dc.CommandType = CommandType.Tex t
da.SelectComman d = dc

da.Fill(ds, "mst_users" )
Catch excp As Exception
MsgBox(excp.ToS tring())
End Try

End Sub

Then I have called that connectToDataba se() in the load event of the form as below

Private Sub frmMstUsers_Loa d(ByVal sender As System.Object, ByVal e As System.EventArg s) Handles MyBase.Load
connectToDataba se()
End Sub

Then here is my code of click event for Save button.

Private Sub Button4_Click(B yVal sender As System.Object, ByVal e As System.EventArg s) Handles Button4.Click
dt = ds.Tables("mst_ users")

dr = dt.NewRow()
dr(0) = TextBox1.Text
dr(1) = TextBox2.Text
dr(2) = TextBox3.Text
dr(3) = ComboBox1.Text

dt.Rows.Add(dr)
da.Update(ds, "mst_users" )
MsgBox("Data saved sucessfuly")
End Sub

But a blue error line comes under each line of code in bold...... as below

dr = dt.NewRow() 'Value of type 'System.Data.Da taRow' cannot be converted to '1-dimensional array of System.Data.Dat aRow'.

dr(0) = TextBox1.Text 'Value of type 'String' cannot be converted to 'System.Data.Da taRow'.
dr(1) = TextBox2.Text 'same error
dr(2) = TextBox3.Text 'same error
dr(3) = ComboBox1.Text 'same error

Please help as I am trying so many experiments but not getting any solution..
Thanks a lot in advance
Manoj