D
Deltic
I Currently have a button which i press to log users out of my system
when i wish to do any maintenance. This solution was fine when i set
up the database as there were only ever 1 or 2 user in it at a time
and i could advise them individually when the system required closing
down. Now the management has deceided to use my system over a larger
workgroup and telling them individually that i am closing down will
not be possible. I currently use the code below
Private Sub cmd_shutdown_Click()
txt_status.Value = 2
DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
End Sub
What i would like to do is have a warning box appear which tells all
users logged in that maintenace will take place in two minutes and to
save their current work, after which i would gain unique control. I
also have another button which allows me to open the system back up,
(Code Below), which i would still like to use if possible.
Private Sub cmd_open_Click()
txt_status.Value = 1
DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
End Sub
Is this possible?
Thanks in advance
when i wish to do any maintenance. This solution was fine when i set
up the database as there were only ever 1 or 2 user in it at a time
and i could advise them individually when the system required closing
down. Now the management has deceided to use my system over a larger
workgroup and telling them individually that i am closing down will
not be possible. I currently use the code below
Private Sub cmd_shutdown_Click()
txt_status.Value = 2
DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
End Sub
What i would like to do is have a warning box appear which tells all
users logged in that maintenace will take place in two minutes and to
save their current work, after which i would gain unique control. I
also have another button which allows me to open the system back up,
(Code Below), which i would still like to use if possible.
Private Sub cmd_open_Click()
txt_status.Value = 1
DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
End Sub
Is this possible?
Thanks in advance