Want to protect your cyber security and still get fast solutions? Ask a secure question today.Go Premium

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 332
  • Last Modified:

File sharing lock... Error 3952

As shown below, this error comes up and stops the process. After I click on the Debug button, it takes me to the code window. Then, I select Debug/Step Out from the menu to continue the work. This happens about 10 times during this routin and each time I have to repeat "Debug/Step Out from the menu".

I think if I can force the routine slow down a bit, this error will go away. If I have to change some setting in Access  (not requiring this to be done on the users computer one at the time) this will be also acceptable.

I am using Access 2003.

Question: What is the best way to eliminate this error?

Thank you.
Lock.bmp
0
Mike Eghtebas
Asked:
Mike Eghtebas
  • 6
  • 3
1 Solution
 
Mike EghtebasDatabase and Application DeveloperAuthor Commented:
I guess using:
CurrentDB.Execute "Update..."

SHoud do the job as well, if the other alternatives weren't as easy.
 
Mike
0
 
DatabaseMX (Joe Anderson - Microsoft MVP, Access and Data Platform)Commented:
Why do you suppose the # of locks is being exceeded ?

mx
0
 
Mike EghtebasDatabase and Application DeveloperAuthor Commented:
I think the the original allocation of some sort is no longer to handle this many operation and very quick succession. I am shooting at the dark; it is just a guess.

Mike
0
Technology Partners: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

 
rockiroadsCommented:
Mike, try the suggestions here, go for coded solution first before changng registry.

http://support.microsoft.com/kb/815281
0
 
Mike EghtebasDatabase and Application DeveloperAuthor Commented:
From your link, I copied:

DAO.DBEngine.SetOption dbmaxlocksperfile,15000

to Immediate Window and hit return to run it. I have tried three times (running this piect of code and starting my process). But, sorry to say that all three times failed.

Do think I could increase 15000 or this is as high as it goes?

BTW, after each error, I step out until the process is completed. By the time I go to step out manually, I guess, Access gets a chance to catch up with the pending calculation and then it is able to resume the calculation as requested manually via step-out action.

So, it seems if I can force the process to slow down a bit, then all should be fine.

Now, if there is nothing more we could do with "DAO.DBEngine.SetOption dbmaxlocksperfile,15000", could you show me what is the best way to slow this code down?
 
Thank you,
 
Mike
0
 
rockiroadsCommented:
Not sure then if adding DoEvents will help out here
Maybe add that somewhere in the loop, maybe before movenext
there is this refreshcache, that forces data to be written, part of dbengine.idle I think but not sure if that is applicable here. I have never experienced your error before
0
 
rockiroadsCommented:
In your code are you just doubling the value for each record per component?
0
 
Mike EghtebasDatabase and Application DeveloperAuthor Commented:
I added a messaging steps twice and there is no errors.
lblMsg.Caption = "Report Tables: " & vbNewLine & _
                     "Time elapsed: " & fnElapssedTime() & vbNewLine & _
                     "tReport_TRS_Subject..." & vbNewLine & _
                     "SubjectID: " & rs2!SubjectID & "..."
                     Me.Repaint
                     DoEvents
                     
lblMsg.Caption = "Report Tables: " & vbNewLine & _
                     "Time elapsed: " & fnElapssedTime() & vbNewLine & _
                     "tReport_TRS_Subject..." & vbNewLine & _
                     "SubjectID: " & rs2!SubjectID & "..."
                     Me.Repaint
                     DoEvents

Open in new window

0
 
Mike EghtebasDatabase and Application DeveloperAuthor Commented:
Thank you.
0
 
Mike EghtebasDatabase and Application DeveloperAuthor Commented:
FYI, I didn't use:

DAO.DBEngine.SetOption dbmaxlocksperfile,15000
0

Featured Post

Technology Partners: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

  • 6
  • 3
Tackle projects and never again get stuck behind a technical roadblock.
Join Now