per2edb Seniormester
10. august 2018 - 20:49 Der er 11 kommentarer og
1 løsning

Access begrænsning af antal åbne db'er - Fejl 3048

I forlængelse af mit spørgsmål "nulstilling af access tabel" der er en udløber af programmet har ramt loftet, har jeg nu stødt på endnu et problem.

Når jeg delet programmet op i FE og BE så får jeg fejl 3048 når jeg kommer til:

rs As Object
Set rs = CurrentDb.OpenRecordset(SQL)

Jeg har altid afsluttet med   
rs.Close
Set rs = Nothing
     
Jeg har løst dette:

https://answers.microsoft.com/en-us/msoffice/forum/msoffice_access-mso_other-mso_2010/access-2010-and-vba-error-3048/49e343a8-6b62-4b4f-8e99-5f324105095d

Men det giver ingen løsning!!
Kan i hjælpe?
terry Ekspert
11. august 2018 - 14:31 #1
As I mentioned in #12 of your question https://www.computerworld.dk/eksperten/spm/1024604

If you cant have a dB larger than ca. 100mb then there must be a problem you need to focus on and splitting the dB isnt going to help.

What did you decide as regards to the previous question ""nulstilling af access tabel"?

I still dont understand why it was necessary...!
per2edb Seniormester
11. august 2018 - 15:34 #2
Jeg troede oprindeligt problemet lå her men det viser sig nu det er TableIDs der er brugt op så jeg får fejl 3048. Herved opstår der flere for mig uforklarlige fejl
f.eks

rs As Object
Set rs = CurrentDb.OpenRecordset(SQL)

Virker før opsplitning men giver fejl 3048 efter opsplitning i FE og BE
terry Ekspert
11. august 2018 - 17:15 #3
any chance of seeing the dB?
per2edb Seniormester
11. august 2018 - 19:35 #4
Yes but it is big and complex
per2edb Seniormester
11. august 2018 - 21:35 #5
Kan i hjælpe med hvad der er bedst til at frigøre TabelDs så jeg ikke får fejl 3048

Dim rs As Recordset
Set rs = CurrentDb.OpenRecordset(SQL)
.
.
.
  rs.Close
  Set rs = Nothing

eller:

Dim db As Database
Dim rs As Recordset
Set db = CurrentDb
Set rs = db.OpenRecordset("SQL")
.
.
.
rs.Close
Set rs = Nothing
Set db = Nothing
terry Ekspert
12. august 2018 - 09:47 #6
I cant assume that the piece of code you are showing is the issue.
per2edb Seniormester
12. august 2018 - 10:14 #7
Det er kun et eksempel.
Lignende er der måske 200 stk af i hele programmet så det er ikke uvæsentligt
terry Ekspert
12. august 2018 - 10:38 #8
Normally, if the code is in a procedure, variables get free'd when the code exits the procedure. So you actually dont need to free variables unless your looping a piece of code which is opening and closing dB's and recordsets for example.

So you nee to try and localise the code which is causing the problem, IE not freeing your ID's, and I'm assuming its in a loop....
per2edb Seniormester
12. august 2018 - 10:52 #9
terry Ekspert
12. august 2018 - 18:36 #10
"How can I possibly use up 2000 TableIDs?" but it's not uncommon for a complicated application with lots of complex forms & subforms open at once to bump into this limit."

Do you think that your application can have so many forms&subforms open etc. at the same time that you can have over 2000 table ID#s open?

I've worked with Access for many years and I doubt any dB i have worked with has had this issue. If it has then its badly designed.
per2edb Seniormester
13. august 2018 - 08:51 #11
420 Forme, 150 tabeller ca 4000 sub fra 2-3 linier til 5-6 scroll sider !
I gns 4 forme åbne ad gangen ofte med en form på en tab.

Vedr fejl 3048
Ved ca 100Mb opstår fejl 3048
Ved opsplitning til flere selvstændige programmer "kører" alt perfekt
terry Ekspert
13. august 2018 - 10:36 #12
"I gns 4 forme åbne ad gangen ofte med en form på en tab."

So the problem cant be that your exceeding the limit (2048) ID's at the same time.

"Ved opsplitning til flere selvstændige programmer "kører" alt perfekt"

It sounds as though the original database (before splitting into "selvstændige programmer") was just a collection of various application not related to each other.

You should have split into "selvstændige programmer" a long time ago ;-)
Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links

Opret Preview

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester





Premium
KMD tippede Tech Mahindra om opsigelse af tryghedsaftaler
KMD gjorde Tech Mahindra opmærksom på, at selskabet ville opsige sine tryghedsaftaler i foråret. Få uger senere fulgte Tech Mahindra trop og lavede samme manøvre. "Tech Mahindra er en stor samarbejdspartner for KMD, og vi gav dem en orientering om, at KMD påtænkte at opsige tryghedsaftalerne. På det tidspunkt var vores egne medarbejdere også orienteret," lyder det fra KMD.
CIO
Forleden reparerede en mekaniker min bil: Det kostede 4.200 kroner, som min hjerne snød mig til at betale med et smil
De rationelle it-beslutninger du træffer er måske en illusion. Det lærte jeg da min bil gik i stykker og min hjerne snød mig til at tro, at alt var fint. Til gengæld fandt jeg tre fælder dine it-beslutninger kan falde i.
Job & Karriere
Amazon kan komme til at lide samme skæbne som Uber i Danmark - fagbevægelse ruster sig til kamp
Den danske fagbevægelse står klar til at give Amazon en varm velkomst på det danske marked. Spørgsmålet er derfor om et stærkt samarbejde mellem på den side detailbranchen og internethandlen og på den anden side fagbevægelsen vil kunne skabe et bolværk mod Amazons indtog, eller om Amazon har lært af Uber og Ryanairs fejl?
White paper
Gør som millioner af andre brugere i hele verden - bind hele dit forretningssystem sammen med Microsoft Dynamics 365 Business Central
Alle kender efterhånden til ”digital transformation”, og uanset hvor langt din virksomhed er i processen, så kan I med det rette forretningssystem, tage de nødvendige skridt og løfte det hele op i skyen. Herigennem opnår I højere effektivitet gennem automatisering og enklere arbejdsgange for jeres medarbejdere. Det er nemt og hurtigt at komme i gang, og løsningen kan tilpasses i takt med at jeres forretningsbehov ændrer sig. Bliv klogere på Microsoft Dynamics 365 Business Central her.