ADODB Problem

[albe_ACC]

Hello guys!
I need to use an ADODB.command in a private subfunction.

Dim cmd As New ADODB.Command
Dim rst As ADODB.Recordset



Access is returning me a compile error when I try to execute them.
Same goes for ADODB.connection

Am I using them in the wrong way?
Thank you very much for your time

[nicknameoscar]

I would think you would need to show us the rest of the code such as the below examples from my database:

Set rst = New ADODB.Recordset
.
.
.
With rst
.ActiveConnection = CurrentProject.Connection
.CursorType = adOpenStatic 'Allow forward and backward movement in recordset
.LockType = adLockOptimistic 'Lock record after Update method is issued
.Open strSQL

************************************************** ************
Set cmd = New ADODB.Command
Set cmd = cat.Views(strqryName).Command

[albe_ACC]

Here it is!
The compiler stops at "Dim cmd As New ADODB.Command"

Private Sub DA_Click()

If Check() = True Then
Exit Sub
End If


Dim ID_1 As Integer
ID_1 = Me.Parent![Data]

Dim ID_2 As Integer
ID_2 = Me.Data2

Dim strQuery As String
Dim cmd As New ADODB.Command
Dim rst As ADODB.Recordset
Dim recordAffected As Long
Set cmd.ActiveConnection = Application.CurrentProject.Connection

strQuery = (omitted operations on ID_1 and ID_2)
cmd.CommandText = strQuery
Set rst = cmd.Execute(recordAffected)

Set rst = Nothing

Me.Refresh
Me.Requery


End Sub

[nicknameoscar]

I hesistate to say your way is wrong because I know there are certain things you can do as

dim xxx as New yyyy.zzz

but try this:

dim cmd as ADODB.Command
Set cmd = New ADODB.Command

[albe_ACC]

It does not seem to work either!
The compiler stops when facing the "ADODB.Command".
I'm a beginner, as u may have got...maybe do I have to somehow initialize the ADODB?

[nicknameoscar]

Oh, duh I just remembered. Did you set a reference to the ADODB and/or ADOX libraries? In the VBA edit window click on Tools|References and scroll down, down, down and check the box next to the ADODB and ADOX libraries. In my Access 2007 I have the "Microsoft ActiveX Data Objects 2.8 Library" and "Microsoft ADO Extensions 2.8 for DDL and Security" libraries checked.

[albe_ACC]

Thank you very much Nicknameoscar, it worked
Have a nice day!!!

[nicknameoscar]

Awesome, you are quite welcome.