D
dhstein
I have code:
Private Sub btnTest2_Click()
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
rs.ActiveConnection = CurrentProject.Connection
rs.Source = "tblTest2"
rs.CursorType = adOpenDynamic
rs.LockType = adLockOptimistic
rs.Open
MsgBox "The table is open"
rs.Close
End Sub
I get the message "User-defined type not defined on the statement
Dim rs As ADODB.Recordset
Thanks for any help you can provide
Private Sub btnTest2_Click()
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
rs.ActiveConnection = CurrentProject.Connection
rs.Source = "tblTest2"
rs.CursorType = adOpenDynamic
rs.LockType = adLockOptimistic
rs.Open
MsgBox "The table is open"
rs.Close
End Sub
I get the message "User-defined type not defined on the statement
Dim rs As ADODB.Recordset
Thanks for any help you can provide