Had To Repost This - Need Help Urgently

[Joseph Yeo]

I have the following codes which works perfectly:
Dim Db As Database
Dim Rs As Recordset
On Error GoTo ErrorControl
Set Db = CurrentDb
Set Rs = Db.OpenRecordset("Clients")
Rs.Index = "PersonID"
Rs.Seek "=", CLng(PersonID)
However, after splitting the database, I get an error message on this line:
Rs.Index = "PersonID"
"Operation is not supported for this type of object"

Any ideas why? Please help.

 

[Fizzio]

Have you tried using Rs.Index = Rs("PersonID") ?

 

[Pat Hartman]

You can't use Seek on a linked table. A much more efficient method is a parameter query.

 

[theprez]

You may also be able to use the command

rs.findfirst ([Field Name] = '" & rs![PersonID] & "'")

 

[Joseph Yeo]

Found it!!
Thanks anyhow.

For those who encountered the same problem, the answer can be found in:
http://support.microsoft.com/support/kb/articles/Q131/8/29.ASP?LN=EN-AU&SD=gn&FR=0

"How to use the Seek method on linked tables"