It means that you didn't set Reference to a library.
For RDO -Microsoft Remote Data Object 2.0 Library.
If you are using ADO - Microsoft ActiveX Data Object 2.1 Library
Printable View
It means that you didn't set Reference to a library.
For RDO -Microsoft Remote Data Object 2.0 Library.
If you are using ADO - Microsoft ActiveX Data Object 2.1 Library
Your salad has apples and oranges in it. RDO apples relate to rdoEnvironment, rdoConnection and rdoResultsets. DAO delicious have good resultsets and ADO commands its own special flavor. *w*
An RDO purist might try....
Dim en As rdoEnvironment, cn As rdoConnection
Dim rs As rdoResultset, sql As String
On Error Goto oops
sql = "SELECT * FROM fruit_tree"
Set en = rdoEngine.rdoEnvironments(0)
With en
.CursorDriver = rdUseOdbc
End With
Dim cnStr As String
cnStr = "driver={SQL Server};server=mysvr;" & _
"database=pubs;uid=myuid;pwd=mypwd"
Set cn = en.OpenConnection(DSName:="", Prompt:=rdDriverNoPrompt, Connect:=cnStr)
Set rs = cn.OpenResultset(Name:=sql, Type:=rdOpenKeyset, Option:=rdAsyncEnable)
' do neat stuff...
oops:
rs.Close: cn.Close: en.Close
End Sub