CODIGO DE CONECCION A ORACLE PERSONAL CON HERRAMIENTA OLEDBCONNECTION

'Aclaro: esta coneccion se realiza con OleDbConnection para ORACLE PERSONAL

Imports System.Data.OleDb 'IMPORTANDO LA LIBRERIA
Public Class Form1

'Definiendo variables para user password y database de Oracle y la coneccion de tipo OleDbConnection
Public user As String
Public password As String
Public database As String
Public myConeccion As New OleDbConnection

user = Me.TextBox1.Text
password = Me.TextBox2.Text
database = Me.TextBox3.Text
Try

'Inicializando la Coneccion
myConeccion = New OleDbConnection()

'Definiendo la Cadena de coneccion directamente en myconeccion
'myConeccion.ConnectionString = "Provider=MSDAORA.1;" + "Data Source= " + database + ";" + "User id= " + user + ";" + "Password=" + password + ";"

'myConeccion.Open() 'Abrir la coneccion
MessageBox.Show("se conecto correctamente")
myConeccion.Close()
Catch ex As Exception
'mensaje con el fallo en TRY CATCH
MessageBox.Show("no se pudo conectar " & ex.Message)
End Try