Conexion a Oracle con Visual Basic 6

mausdavid
26 de Julio del 2004
Necesito las sentencias de conexion a oracle desde Visual Basic, porque no me deja las que tenía anteriormete, por favor...

Rodolfo Reyes
26 de Julio del 2004
Te envio un pequeño ejemplo:

Dim Conexion As ADODB.Connection
Dim resultSet As ADODB.Recordset
Dim ssql As String

Set Conexion = New ADODB.Connection
Conexion.ConnectionString = "Provider=OraOLEDB.Oracle; Data Source=ALIAS ; User Id=USURIO; Password=XXXX"
Conexion.Open

ssql = "select SYSDATE, user FROM DUAL"
Set resultSet = New ADODB.Recordset
Set resultSet = Conexion.Execute(ssql)


MsgBox "Fecha: " & resultSet!sysdate.Value & " Usuario: " & resultSet!user.Value, vbInformation + vbOKOnly, "Form002"

Conexion.Close



En "Project" --> "References" tienes que tener selccionado:

Ole Automation
Microsoft Activex Data Objects 2.7 Library

El ejemplo anteriro es para conectarte a Oracle por medio de OLEDB de Oracle. Si quieres conectarte con OLEDB de Microsoft solo cambia la linea de Conexión por la siguiente:

Conexion.ConnectionString "Provider=msdaora; Data Source=MyOracleDB; User Id=myUsername; Password=myPassword"