[Toutes versions] connaitre le groupe d'appartenance de l'utilisateur mdw

[sylv20]

Bonjour,

J'ai trouvé comment connaitre le nom d'utilisateur de la base à cet endroit.

http://access.developpez.com/faq/?page=user#currentUser

Mais je voudrais connaitre le groupe d'appartenance de cet utilisateur dans le mdw afin d'afficher tel ou tel bouton suivant le groupe et non suivant l'utilisateur.

Y a t il une fonction vba pour ca ? si oui laquelle ?

[lelensois16]

Bonjour,

Ce bout de code tiré du tuto de loufab devrait t'aider. Il permet de liste les groupes d'utilisateur. Il faudra le modifier et l'adapter à tes besoins

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
Sub lstGrpUsr()
    Dim Wrk As Workspace
    Dim Grp As DAO.Group
    Dim Usr As DAO.User
 
    Set Wrk = DBEngine.Workspaces(0)
 
    With Wrk
 
        Debug.Print "Groupes :"
 
        For Each Grp In .Groups
            Debug.Print "  " & Grp.Name
            Debug.Print "   Contient les membres suivants:"
 
            If Grp.Users.Count <> 0 Then
                For Each Usr In Grp.Users
                    Debug.Print "    " & Usr.Name
                Next Usr
            Else
                Debug.Print "    Aucun Membre"
            End If
 
        Next Grp
 
    End With
End Sub

Bien cdt

[sylv20]

C'est dingue qu'il n'existe pas une simple ligne de code pour obtenir cette info qui me semble importante.

ENfin bref je regarde à ce code. Merci

[sylv20]

Bon ok.

Je viens de comprendre pourqui il n'existe pas une fonction toute faite. Tout simplement par le fait qu'un utilisateur appartient a plusieurs groupe (ex tous les utilisateurs appartiennet au groupe utilisateurs qui n'a aucun droit).

Du coup je galere un peu avec les for each et tout le tralala. Il faudrait que je prenne le groupe qui as le plus de droit. Bien chaud !!!

Peut etre que mon idée de récupérer les groupes n'est pas la bonne méthode.

Je comptais récupérer les groupes pour afficher / masquer certains bouton que les autres utilisateurs ne voient pas (ex : deconnexion utilisateur, ajouter proto...).

Comment feriez vous ca ?

PS: A l'heure actuele, j'utilise le nom d'utilisateur mais si un jour toto rejoint le groupe développeur (groupe qui as tous les droits dans mon applis) et bien je voudrais que les boutons qu'il doit pouvoir voir fonctionne sans avoir a rajouter un :

Code :

1
2
3
4
5
 
 
...or str_utilisateur="toto" then
 
txt_test.visible=True

[LedZeppII]

Bonjour,

regarde si la fonction que j'ai posté ici peut t'aider.
Elle teste si CurrentUser() appartient au groupe fournit en argument.

A+

[sylv20]

Merci !!! Excélente fonction!!!!! Ca marche.

Je m'en sert mais finalement elle perd un peu de son interet car j'ai revu la sécurité de ma base et j'ai juste créer 4 utilisateurs portant le même nom que leur groupe.

Je ne savais pas que plusieurs personnes pouvaient se connecter à la base en même temps avec le même nom d'utilisateur.

[loufab]

Bonjour,

On le déduit facilement par l'utilisation d'une base non sécurisée. Tout le monde y accède avec le compte par défaut.

Cordialement,