DSN-less DAO Connection string for Oracle.

I need to open a read-only, DAO recordset from Oracle to pass to Crystal Reports, and I don't want to have to use a DSN.  Is it possible to use a DSN-less connection string to connect to Oracle as in ADO?  How would I do this?
LVL 1
smithdesignsAsked:
Who is Participating?
 
mdouganConnect With a Mentor Commented:
Option Explicit
Dim db As DAO.Database
Dim rs As DAO.Recordset
Private Sub Command1_Click()
Set db = OpenDatabase("", dbDriverNoPrompt, False, "DRIVER={Oracle ODBC Driver};UID=youruserid;PWD=yourpassword;DBQ=yourinstance.WORLD;DBA=W")
Set rs = db.OpenRecordset("Select * from DEPARTMENT", dbOpenSnapshot, 64)
Me.Cls
While Not rs.EOF
    Me.Print rs.Fields(1).Value
    rs.MoveNext
Wend
rs.Close
db.Close
End Sub

0
All Courses

From novice to tech pro — start learning today.