Really need a few opinions...Please?

[Bonnie]

Hi there, thanks for looking. Using A02 on XP. Would
really appreciate a few folks commenting on which way I
should go with this challenge.

Have about 6 frontend DB's in our share drive (S:\RPS)
with my single backend DB in a protected area in the share
drive (S:\RPS\Security). 2-3 are so frequently used that
lots of folks tend to leave them open through the day to
flip back and forth as work demands.

My problem is that every few weeks or so one of the DB's
will give someone the message "Cannot save at this time,
record currently locked" (wordage not exact, just as I
recall). I've discovered this happens when someone edits
or creates a record and leaves it open in edit mode
(pencil on left bar), gets on the phone or something else,
la de da, time goes by, someone else 'flips' back to the
DB that they may also have had sitting open and tries to
add a record, BAM, message "cannot save..."

My solution can go two ways as I see it:

I could put multiple copies of the files out in the S:\RPS
folder and name them DB1, DB2, etc. Then each user would
have their own DB.

OR; I could go the more labor intensive route and copy the
file to each user's C or G drive which is specific to each
PC.

Potential problem with my solutions: if a user has a 'new'
record open still in edit mode, will the error still occur
even if I do one of the two things listed above? If so, is
there a better way? Should I return to investigating
using a Timer Event Procedure to at least close any open
form that has a record showing whether in edit mode or not?

REALLY, REALLY need some expert advice on this.

P.S. I'm not a programmer but can use events and some code.

Thanks in advance for taking your time to read this and
hopefully, giving me some advice or comments. LUV U GUYS!

 

[Mark]

There are many schemes to close idle Access sessions, you might want to do a
search for phrases like "Closing Idle Access Sessions". You might also want
to check out a really simple, great utility to make sure every user always
has their own most up-to-date front-end database, at Tony Toews' website:
http://www.granite.ab.ca/access/autofe.htm

 

[Arvin Meyer]

It is important for maintenance and safety that no one shares a front-end.
To do so is inviting corruption.

Put a copy of the front-end on each desktop. Microsoft has a knowledgebase
article on limiting idle use:

http://support.microsoft.com/default.aspx?scid=kb;en-us;128814

I use the following code to close the application after 30 minutes of
inactivity. The Doomsday label then becomes visible and counts down 15
seconds, beeping with each count. If the user fails to act the app shuts
down:

Private Sub Detail_MouseMove(Button As Integer, Shift As Integer, X As
Single, Y As Single)
' Use this same code on the form's KeyPress event
' reset the timer
lngActivityCounter = 0
Me.Doomsday.Caption = 15
Me.Doomsday.Visible = False
End Sub

Private Sub Form_Timer()
'
'NOTE: The Timer Interval = 1000 (1 second)
'If no activity by user for 20 minutes (1200 sec), then quit application
'Thus: each second, add 1; so at end of 60 seconds (1 minute), have
'a count of 60; after 30 minutes, have count of 1800
'
lngActivityCounter = lngActivityCounter + 1
'30 minutes = 1800 sec (20 min x 60 sec/min)
'After 30 minutes (1800 sec via: 20 min x 60 sec/min) of no activity,
'close application completely
If lngActivityCounter >= 1800 Then
Beep
Me.Doomsday.Visible = True
If Me!Doomsday.Caption = 0 Then
DoCmd.Quit acQuitSaveAll
Else
Me!Doomsday.Caption = Me!Doomsday.Caption - 1
End If
End If
End Sub
--
Arvin Meyer, MCP, MVP
Microsoft Access
Free Access Downloads
http://www.datastrat.com
http://www.mvps.org/access

 

[Bonnie]

Mark, thanks bunches for the input, I'll check them both
out. I appreciate your time.

 

[Bonnie]

I'll check it out. Thanks very much. Would it take much
to change below to just close/save any open form(s)? Don't
mean to push my luck here but would like to know. Thx!

 

[Arvin Meyer]

Change the line:

DoCmd.Quit acQuitSaveAll
to
DoCmd.Close
--
Arvin Meyer, MCP, MVP
Microsoft Access
Free Access downloads:
http://www.datastrat.com
http://www.mvps.org/access