Id (user ) access

Résolu
pino1981 Messages postés 44 Statut Membre -  
pino1981 Messages postés 44 Statut Membre -
Bonjour,

j'ai une application access avec un formulaire de saisie que je la partage dans un serveur (domaine ) avec des collegues de travail avec les champs nom ; prenom ;N° de commande ; date ......ext
je veut ajouté un champ qui affiche le nom de user
ma question :comment l'ID de connexion de l'utilisateur actuel (nom de la session)dans ce formulaire qui s'affiche automatiquement .

j'ai essaye avec l'expression :UtilisateurEnCours() mais il m'affiche le nom de la machine par contre moi je veux le nom de la session en cour (ou bien l'utilisateur actuel )

merci d'avance .

12 réponses

  1. Le Pingou Messages postés 12274 Date d'inscription   Statut Contributeur Dernière intervention   1 476
     
    Bonjour,
    Essayez cette solution :
    Private Sub Command1_Click()
     MsgBox Environ$("UserName")
     MsgBox Environ$("LOGONSERVER")
    End Sub
    --
    Salutations.
    Le Pingou
    0
  2. pino1981 Messages postés 44 Statut Membre 1
     
    bonjour ;

    non ça marche pas :(

    merci
    0
  3. pino1981 Messages postés 44 Statut Membre 1
     
    bonjour

    ça s'affiche comme message flash :(
    0
  4. Le Pingou Messages postés 12274 Date d'inscription   Statut Contributeur Dernière intervention   1 476
     
    Bonjour,
    Vous devez avoir deux messages !
    0
  5. Vous n’avez pas trouvé la réponse que vous recherchez ?

    Posez votre question
  6. pino1981 Messages postés 44 Statut Membre 1
     
    bonjour;

    oui effectivement mais moi se que je veux qu'il safiche dans un champ pour avoir un historique de user

    merci d'avance
    0
  7. Le Pingou Messages postés 12274 Date d'inscription   Statut Contributeur Dernière intervention   1 476
     
    Bonjour,
    Alors si j'ai bien compris, vous ajouter la procédure qui suit dans le module de votre formulaire et ainsi à l'ouverture de ce dernier vous aurez le nom de l'utilisateur qui s'affichera dans le champ (ici : nomuser)
    Private Sub Form_Current()
    Me.nomuser = Environ("UserName")
    End Sub
    0
  8. pino1981 Messages postés 44 Statut Membre 1
     
    bonjou ;

    il affiche mtn "#Nom ?"

    merci d'avance
    0
  9. Le Pingou Messages postés 12274 Date d'inscription   Statut Contributeur Dernière intervention   1 476
     
    Bonjour,
    Dans se cas il y a une erreur chez vous car j'ai testé et c'est en ordre.
    Désolé je ne peux pas en faire sans plus de détails.
    0
  10. pino1981 Messages postés 44 Statut Membre 1
     
    bonjour ;

    ya rien qui s'affiche

    merci d'avance pour votre comprehension

    cordialement
    0
  11. Le Pingou Messages postés 12274 Date d'inscription   Statut Contributeur Dernière intervention   1 476
     
    Bonjour,
    Encore une fois, est-il possible de voir se que vous avez réalisé. Il me suffit d'avoir une copie de la base avec le formulaire mais sans les données des tables ( si confidentielle) à mettre compresser ZIP sur https://www.cjoint.com/ et poster le lien?
    0
  12. pino1981 Messages postés 44 Statut Membre 1
     
    bonjour ;

    se n'est pas possible
    mais merci pour votre support .

    sincere saluations
    0
  13. pino1981 Messages postés 44 Statut Membre 1
     
    bonjour
    sa marche merci BCP bcp bcp j'ai oublié le $

    merci encore une fois pour votre support .

    mes respect
    0