We have a Personal Oracle DB on a XP Pro Pentium IV box. VB is being used to open the DB through the Oracle InProc Server type library, See code below. The Oracle Service has a status of stopped. If we run another aplication written with Oracle Tools the service starts and all works. My question is why doesn't the service automatically kick off throught the code below, and is ther something else I can try in code?

Many thanks,


' Workaround to raise a message (and avoid an error) that the user does not have access to SSS
On Error Resume Next
Set objOracleSession = CreateObject("OracleInProcServer.XOraSession")
If Err.Number = 429 Then 'ie: the users do not have the oracle drivers on the PC
Exit Function
End If

Set objOracleDatabase = objOracleSession.dbOpenDatabase("", "testuser/testing", &H0&)
If Not (objOracleDatabase Is Nothing) Then
Set rsRetrievedDynaset = objOracleDatabase.dbCreateDynaset(strSQL, 0&)

' Tidy up
End If