Dev Studio 2005/VB 2005 Oracle DB
I would be so grateful if anyone could help me with question.
I pulled some data from an Oracle database and wrote some code to re-index the data (code below).
My question is this: How do I now write the (local) data back to Oracle?
Private Sub pbResetRowID_Cl ick(...)
'` Get data from Oracle
Dim strSQL As String = _
"SELECT * FROM TABLE_AB"
Dim objcommand As New OleDb.OleDbComm and(strSQL, objConnection)
Dim objdataadapter As New OleDb.OleDbData Adapter(objcomm and)
'` Save results locally
Dim objdatatable As New Data.DataTable( "Results0")
objdataadapter. Fill(objdatatab le)
Dim objDataRow As DataRow
' Seed the index
Dim nIdx As Int32 = 100
'` Walk down the rows
For Each objDataRow In objdatatable.Ro ws
'` Assign index
objDataRow.Item ("IDX") = nIdx
'` Bump up index value
nIdx += 10
Next
Thank you all in advance.
I would be so grateful if anyone could help me with question.
I pulled some data from an Oracle database and wrote some code to re-index the data (code below).
My question is this: How do I now write the (local) data back to Oracle?
Private Sub pbResetRowID_Cl ick(...)
'` Get data from Oracle
Dim strSQL As String = _
"SELECT * FROM TABLE_AB"
Dim objcommand As New OleDb.OleDbComm and(strSQL, objConnection)
Dim objdataadapter As New OleDb.OleDbData Adapter(objcomm and)
'` Save results locally
Dim objdatatable As New Data.DataTable( "Results0")
objdataadapter. Fill(objdatatab le)
Dim objDataRow As DataRow
' Seed the index
Dim nIdx As Int32 = 100
'` Walk down the rows
For Each objDataRow In objdatatable.Ro ws
'` Assign index
objDataRow.Item ("IDX") = nIdx
'` Bump up index value
nIdx += 10
Next
Thank you all in advance.