I created a database containing the following code:
Dim db As Database
Dim rec As RecordSet
Set db = CurrentDb()
Set rec = db.OpenRecordset("tblFLSA")
rec.Index = "PrimaryKey"
rec.Seek "=", FLSA
If rec.NoMatch Then
WhatFLSA = ""
Else
WhatFLSA = rec("ExemptStatus")
End If
rec.Close
After splitting the database I encountered:
Run -time error '3251':
Operation is not supported for this type of object.
rec.Index = “PrimaryKeyâ€
Do anyone have an idea while this line fails after splitting the database?
"Albert D. Kallal" wrote:
> "Phil"
> news:D124D4CC-8562-40F7-B895-A94DE004EEB6@microsoft.com...
> > Makes sense. How do I split it?
> >
> > "Cheese_whiz" wrote:
> >
>
> I have an article that explains the whole approach to the split concept here
>
> http://www.members.shaw.ca/AlbertKallal/Articles/split/index.htm
>
>
> --
> Albert D. Kallal (Access MVP)
> Edmonton, Alberta Canada
> pleaseNOOSpamKallal@msn.com
>
>
>