Group: microsoft.public.access
From: =?Utf-8?B?VGltIEhhYXM=?=
Date: Tuesday, October 23, 2007 9:30 AM
Subject: Re: Enhancing database how to

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" wrote in message
> 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
>
>
>