[VB.net][Oracle][example] Add items to datagridView from Orcale

This part of script is from one of the vb projects.

beware that there is some syntax such as OracleDataAdapter Class has been deprecated :

Imports System.Data

Imports System.IO

Imports Orcale.DataAccess.Client

Imports Orcale.DataAccess.Types

Public Class Form1

  Private connStr As String = "Data Source=192.168.1.1/TestDb; User Id=user; password=pwd"

  Private conn As New OrcaleConnection

  Private Sub Form1_load(ByVal sender As System.Object, ByVal e As Sysstem.EventArgs) Handles MyBase.Load

  Try

    Dim ds As New DaatSet()

    Using conn As OracleConnection = New OracleConnection(connStr)

      conn.Open()

      Using cmd As OracleCommand = New OracleCommand("SELECT * FROM TEST_TABLE ORDER BY ID",conn)

      Dim dr As OracleDataReader = cmd.ExecuteReader()

        While dr.Read()

          Dim rowId As Integer = DataGridView1.Rows.Add()

          Dim row As DataGridViewRow = DataGridView1.Rows(rowId)

          row.Cells("idColumn").Value = dr.Item(0)

          row.Cells("typeColumn").Value = dr.Item(1)

        End While

      End Using

    End Using

  Catch ex As Exception

    Debug.WriteLine(ex.ToString())

  Finally

    conn.Dispose()

  End Try

End Sub

Reference

• https://www.codegrepper.com/code-examples/csharp/vb.net+add+row+to+datagridview+programmatically
• https://www.oracle.com/webfolder/technetwork/tutorials/obe/db/dotnet/GettingStartedVBVersion/GettingStartedNET_VBVersion.htm