I created menu:
Private Sub CreateMenu()
Dim MenuCb As CommandBar: Dim MenuCbc As CommandBarControl: Dim MenuCmcp As CommandBarControl
'Main Menu Bar
Set MenuCb = Application.CommandBars.Add("MyMenu", msoBarTop, True, False)
'Menu of Main Menu Bar
Set MenuCbc =...
How can I get number of users (by VB code) which have curently open my database (database.mdb).
(But not by reading *.ldb file.)
I want not allow to user open (or changing data) database, if five users have the database open.
Thanks :cool:
YES
I found it.
Private Sub MyTree_AfterLabelEdit(Cancel As Integer, NewString As String)
MsgBox "AfterLabelEdit"
End Sub
Private Sub MyTree_BeforeLabelEdit(Cancel As Integer)
MsgBox "BeforeLabelEdit"
End Sub