Listing A: Accessing Oracle data
Dim oracleConnection As New OracleConnection()
Dim oracleCommand As New OracleCommand()
Dim oracleReader As OracleDataReader
Dim sqlString As String

sqlString = "data source=oracle.server;user id=test;password=test"
oracleConnection.ConnectionString = oracleConnection.Open()
oracleCommand.CommandText = "SELECT * FROM DBTEST.PEOPLE"
oracleCommand.Connection = oracleConnection
oracleReader = oracleCommand.ExecuteReader