Utilisateur connecté

Soyez le premier à donner votre avis sur cette source.

Snippet vu 13 105 fois - Téléchargée 70 fois

Contenu du snippet

Connaitre l'utilisateur connecté

Source / Exemple :


' API
' pour la récupération du user de connexion NT,
Private Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" (ByVal lpBuffer As String, nSize As Long) As Long

' --------------------------------------
' Récupération du user de connexion
'
' Creation: webcyril - Janvier 2000
' --------------------------------------
Public Function PRGetLoggedInUser() As String
    Dim sBuff   As String * 255
    Dim lRet    As Long
    Dim UserName As String
    
    PRGetLoggedInUser = ""
    
    'on retire les NULLs et espaces inutiles
    lRet = GetUserName(sBuff, 255)
    UserName = Trim$(Left(sBuff, InStr(sBuff, Chr(0)) - 1))
    'Retourne false si aucun nom n'est retourne
    If UserName = vbNullString Then
       PRGetLoggedInUser = False
       UserName = ""
    End If
    PRGetLoggedInUser = UserName
End Function

A voir également

Ajouter un commentaire

Commentaires

mierkool
Messages postés
61
Date d'inscription
mardi 16 mars 2004
Statut
Membre
Dernière intervention
9 septembre 2009
-
mais ca récupère seulement le log sur le poste ou on lance le prog, sur un réseau pour récupérer les logs des autres postes on fait comment ???
Renfield
Messages postés
17283
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
21 juillet 2019
54 -
pourquoi ne pas simplement utiliser

MsgBox environ$("username")
SaturneVenus
Messages postés
4
Date d'inscription
mercredi 5 février 2003
Statut
Membre
Dernière intervention
12 octobre 2006
-
Hello

Et pour récupérer le nom détaillé associé au login dans la base SAM du CPD, existe-t-il quelque chose ?

Cordialement,
AzraelMonu
Messages postés
6
Date d'inscription
vendredi 31 janvier 2003
Statut
Membre
Dernière intervention
4 juillet 2004
-
Super ton truc.
Salut !
Mais on mais koi dans notre form ?

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.