I'm trying to do a simple find method in an ADO recordset, and can't get it to work for the life of me.
The Access help file shows a Find Method for specific text in modules and class modules, but not the ADO Find Method?
The following code generates, "Run-time error '3001' - Args. are of wrong type, out of acceptable range, or in conflict with one another"
Dim intCatSortA As Integer
Dim rs As New ADODB.Recordset
rs.Open "SELECT * FROM tblEstCategories " & _
"ORDER BY CatSort", CurrentProject.Connection, _
adOpenKeyset, adLockOptimistic
intCatSortA = Me!lstCategories.Column(2, Me!lstCategories.ItemsSelected)
If intCatSortA <> 0 Then
rs.Find "CatSort = intCatSortA" <- hangs here
etc.
What is going wrong with the help system and my code?
Somebody?
Anybody?
Thanks,
Craig
The Access help file shows a Find Method for specific text in modules and class modules, but not the ADO Find Method?
The following code generates, "Run-time error '3001' - Args. are of wrong type, out of acceptable range, or in conflict with one another"
Dim intCatSortA As Integer
Dim rs As New ADODB.Recordset
rs.Open "SELECT * FROM tblEstCategories " & _
"ORDER BY CatSort", CurrentProject.Connection, _
adOpenKeyset, adLockOptimistic
intCatSortA = Me!lstCategories.Column(2, Me!lstCategories.ItemsSelected)
If intCatSortA <> 0 Then
rs.Find "CatSort = intCatSortA" <- hangs here
etc.
What is going wrong with the help system and my code?
Somebody?
Anybody?
Thanks,
Craig