cellorando
asked on
"rowset does not support scrolling backwards" in Access2000
I keep on getting "rowset does not support scrolling backwards" on the rst.Find. When I hit "Debug" to get to that line in the code and F8 to run it again, it executes, but goes to EOF. Before the F8, EOF and BOF are false, and the record set is, in fact, at the first record. I know for a fact that the record searched for is there. And if it weren't, it would just go EOF. Here's the code.
If rst Is Nothing Then Set rst = New ADODB.Recordset
If rst.State <> adStateOpen Then
rst.CursorLocation = adUseClient
If Recordset!SOURCE = "COUNTY_NM" Then
rst.Open "SELECT * FROM county_nm", CurrentProject.Connection,
Else
rst.Open "SELECT * FROM permits_nm", CurrentProject.Connection,
End If
End If
If Not (rst.BOF Or rst.EOF) Then
strFind = "ADDRESS='" & Me.ADDRESS & "'"
rst.MoveFirst
rst.Find strFind
If Not rst.EOF Then
' record is found and load it.
If rst Is Nothing Then Set rst = New ADODB.Recordset
If rst.State <> adStateOpen Then
rst.CursorLocation = adUseClient
If Recordset!SOURCE = "COUNTY_NM" Then
rst.Open "SELECT * FROM county_nm", CurrentProject.Connection,
Else
rst.Open "SELECT * FROM permits_nm", CurrentProject.Connection,
End If
End If
If Not (rst.BOF Or rst.EOF) Then
strFind = "ADDRESS='" & Me.ADDRESS & "'"
rst.MoveFirst
rst.Find strFind
If Not rst.EOF Then
' record is found and load it.
SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
ASKER
None of the comments helped me unfortunately. I was hoping someone had run into the problem. I was probably supposed to put the question into the DB/Access instead of programming. Lean's link to www.activeserverpages.ru is a useful one.
I have dupmed the code entirely and am finished a completely different module which I had already started.
I have dupmed the code entirely and am finished a completely different module which I had already started.
Very generous, in the curcumstances
ASKER