Discussion :

[marabout]

Bonjour,

Dans une appli Access, je souhaite paramèrer le démarrage d'après l'utilisateur connecté. La manière la plus simple que j'ai trouvé (toute autre proposition est la bienvenue) est d'utiliser sendkeys pour activer ou désactiver les éléments. Cela donne quelque chose comme ceci (sur une version francophone du programme):

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
If currentuser <> "machin" then
Sendkeys "%O"
Sendkeys "%D"
Sendkeys "%C"
...
End if

Deux problèmes:
- Il reconnait bien le currentuser mais un fois il désactive tout (donc il fait les sendkeys), la fois suivante, il ne fait rien (mais reconnait toujours le user)
- il semble désactiver et activer le num lock

J'ai envisager une autre solution:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
Dim i As Integer 
For i = 1 To Application.CommandBars.Count 
    DoCmd.ShowToolbar Application.CommandBars.item(i).name, acToolbarNo 
Next

mais là, ca plante complètement la base de données...

Merci de vos lumières

[cafeine]

Hello,

la methode SendKeys doit toujours être le dernier recours ... car c'est tout sauf une méthode propre de programmation.

Que souhaites-tu faire ?

[marabout]

Salut Caféine et merci pour tout ce que tu fais sur ce forum et FAQ et autres, vachement utile !

Pour faire simple:
Quand le user "machin" rentre dans l'appli, il doit avoir accès à tout (menus, fenêtre de la BDD, shortcuts comme ALT-F11, etc...)
Quand un autre user rentre dans l'appli, il doit juste pouvoir travailler sur les formulaires créés pour lui (plus de barres d'outils, plus de menus, pas de vue ni d'accès de la fenêtre BDD, etc.).
La base de donnée est déjà complètement sécurisée (gestion des user et des droits) et tout fonctionne impec.

Merci

[marabout]

Pas d'idées ? SVP