I have some ADO code that I am trying to convert to ADO and I am getting stumpt on converting this line:
rstTblFill.FindLast "[Equip] ='" & strCurrLine & "'"
I tried using just: rstTblFill.Find but that takes me to only the first occurance. And "MoveLast" takes me to the end of all the records and not just the one that matches the criteria I need.
Then I tried: rstTblFill.Seek "[Equip] ='" & strCurrLine & "'", adSeekLastEQ but that game me an error with a number 0 (whatever that means) and I was using "server side cursurs" when I opened the recordset the following way:
So, I am open for any suggestions. I am using Access 2002 and SQL2000
rstTblFill.FindLast "[Equip] ='" & strCurrLine & "'"
I tried using just: rstTblFill.Find but that takes me to only the first occurance. And "MoveLast" takes me to the end of all the records and not just the one that matches the criteria I need.
Then I tried: rstTblFill.Seek "[Equip] ='" & strCurrLine & "'", adSeekLastEQ but that game me an error with a number 0 (whatever that means) and I was using "server side cursurs" when I opened the recordset the following way:
Code:
Set rstTblFill = New Recordset
With rstTblFill
.ActiveConnection = CurrentProject.Connection
.Source = "zzz_Schedule_ReportFill"
.CursorLocation = adUseServer
.CursorType = adOpenDynamic
.LockType = adLockOptimistic
.Open Options:=adCmdTable
End With
So, I am open for any suggestions. I am using Access 2002 and SQL2000