After Splitting DB error - Object isn't supported

rzielins

Registered User.
Local time
Today, 22:40
Joined
May 2, 2001
Messages
13
My database worked fine before I split using the MS Access DB Split Wizard.

However, now it produces the following error message in one of my forms:

"Operation is not supported for this type of object".

It occurs at the statement

StudentICASelectionstbl.Seek

and StudentICASelectionstbl is a recordset defined by the followinf code:

Set StudentICASelectionstbl = ICADB.OpenRecordset("tblStudentICASelections")

Is the error being generated because the FrontEnd cannot find the backend table "tblStudentICASelections"? I would have thought that the database splitter wizard would have taken care of issues like this. If indeed this is the probelm, is there a way around it?

thanks!
Rob
 
need help

just trying to bump this query back onto the notice board as i am still really stuck.

the guts of the problem is that with a split database i receive an errorthat the Object Type is not supported when I use the SEEK command to find a record in a table.

see my earlier post for the full details.

please help!
thx Rob
 
You cannot use the Seek method on linked tables because it requires a table-type recordset.

You have two options for fixing this issue. You can either directly open the database containing the required table in code or use the Find commands (which aren't nearly as fast as Seek).

How to open another database in code? Use code like this:

Set wrk=DBEngine.Workspaces(0)
Set dbExternal=wrk.Database("name of database including path", _
  False, False, "")
Set rst=dbExternal.OpenRecordset("tablename", dbOpenTable)
etc...

then set your index and execute your Seek commands.
 
Last edited:
fantastic! thanks for your advice, all is working well now.

rob
 
No problem. The credit goes to Access Cookbook. I read about it there first.
 
same problem

I encountered the same problem but am having trouble implementing the code. On the line : Set dbExternal=wrk.Database("name of database including path", _
False, False, "")
I keep getting the same error with my code:
Set dbExternal = wrk.Database("C:\Documents and Settings\MCA\My Documents\My Program Data\Microsoft Access\Meyers\Meyers Dispatch 1.13G_be.mdb", False, False, "")

"Meyers Dispatch 1.13_be.mdb" being the split database where the tables are located.

Any ideas? Also is there anyway to implement the code so that you do not have to tie a location to the vb code? Any help is greatly appreciated. If no then how would you implement the find method previously spoke about.
 

Users who are viewing this thread

Back
Top Bottom