Change Password command

[Rob]

I'm using Access security, and have a button which opens the User and
Group Accounts dialog, via the following code:

DoCmd.RunCommand acCmdUserAndGroupAccounts

I also have a function which returns True if the current user is a
member of the admins group. What I would like to do is, if the user is
not in the admins group, to open the User and Group Accounts dialog
with the Change Password tab selected (since the Users tab doesn't have
many usable options, and what I really want is to allow users to change
their password as easily as possible.

(How) can I force the Change Password tab to be selected when the User
and Group Accounts dialog is opened?

TIA,

Rob

 

[Rob Oldfield]

It's not something I've ever played with, so this is my first look, but you
can change passwords directly from VBA by doing something like...

Dim ws As Workspace
Dim usr As User
Set ws = DBEngine.Workspaces(0)
Set usr = ws.Users(CurrentUser)
usr.Password = "...."

So I'd suggest building your own form with that type of stuff behind the OK
button.

 

[Rob]

Thanks Rob,

While your suggestion is both reasonable and feasible, I'd prefer not
to re-invent the wheel. The built-in dialog provides exactly the
functionality I need; I'd just prefer to force it to open at the tab
which the user will be wanting. If that can't be done, then my
preference will certainly be to "educate" the users, rather than waste
time building/coding a custom form.

Rob