cannot open any more databases - error 3048 and back end

C

cbelius

Using a simple project (mdb) with one table and one form I tested the
performance with this code:

"Option Compare Database
Option Explicit

Private Sub Luk_Click()
Dim i As Long, rst(1000) As DAO.Recordset
For i = 1 To 1000
Set rst(i) = CurrentDb.OpenRecordset( _
"Select * from Patient", dbOpenDynaset)
rst(i).MoveFirst
Debug.Print "No of open objects: " & i
Next i
End Sub"

Result in the immediate window: 252

Then I split the dba into front end and back end, and run the code again
Result in the immediate window: 80

Can someone explain me why the splitting procedure eates 172 id's
Thanks in advance
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Splitting up dbs eats ressources 4
Cannot open any more databases (3048) 4
Runtime error 3014 - Can't open more tables 1
Running command line command without the DOS window 7
Second Report not printing - whats wrong with the VBA I have?????? 1
An Error while running Error Handling Code 4
Cannot open any more databases and splitting databases 3
DAO Recordset Issue 1

Top