Dim da As OracleDataAdapter
Dim dt As New Data.DataTable("dt")
Dim strSQL As String = ""
strSQL = "SELECT * FROM TBL_TABLE where ID = '1'"
ConnectionOpen()
da = New OracleDataAdapter(strSQL, conn)
Dim SqldtSearch As OracleCommandBuilder = New OracleCommandBuilder(da)
dt.Columns.Clear()
dt.Rows.Clear()
da.Fill(dt)
' Edit Datatble Update " Braaaaaa......."
da.Update(dt)
MsgBox("Save Complete !!!")
ConnectionClose()
