Home » Applications » Other Application Suites » How does one connect to an Oracle Database using OO4O as sysdba using VB 6?
How does one connect to an Oracle Database using OO4O as sysdba using VB 6? [message #154585] Mon, 09 January 2006 09:53
kishore_pen
Messages: 1
Registered: January 2006
Junior Member
Hi,

Can any one give suggestion to connect an Oracle Database using OO4O as sysdba using VB 6.0.

For Eg:

Option Explicit

Dim m_oraSession As Object
Dim m_oraDatabase As Object

Private Sub Command1_Click()
Set m_oraSession = CreateObject("OracleInProcServer.XOraSession")
Set m_oraDatabase = m_oraSession.DBOpenDatabase("Database", "user/password", 0&)

MsgBox "Connected to " & m_oraDatabase.Connect & "@" & m_oraDatabase.DatabaseName
End Sub

Private Sub Form_Unload(Cancel As Integer)
Set m_oraDatabase = Nothing
Set m_oraSession = Nothing
End Sub

Thanks & Regards,
Kishore.P
E-Mail: kishore_pen@yahaoo.com
Previous Topic: Heat Call Logging?
Next Topic: istudio
Goto Forum:
  


Current Time: Thu Mar 28 09:24:48 CDT 2024