Table log en access
Résolu
lys65
-
Sergio63 Messages postés 53 Statut Membre -
Sergio63 Messages postés 53 Statut Membre -
Bonjour,
Est-il possible d'activer facilement un log de l'activité faite sur une table en access
ou est-il possible de récupérer le user de windows?
quand je fais current user() je reçois le user de la database mais je voudrais récupérer
celui de windows
d'avance merci si vous pouvez m'aider
Est-il possible d'activer facilement un log de l'activité faite sur une table en access
ou est-il possible de récupérer le user de windows?
quand je fais current user() je reçois le user de la database mais je voudrais récupérer
celui de windows
d'avance merci si vous pouvez m'aider
Configuration: Windows 2003 Internet Explorer 6.0
1 réponse
-
Bonjour,
Pour récupérer le user de Windows il faut utiliser l'API.
Personnellement j'utilise ce code sur Excel avec Win XP pro, mais ça devrait aussi marcher sur Access :
Private Declare Function apiGetUserName Lib "advapi32.dll" Alias _
"GetUserNameA" (ByVal lpBuffer As String, nSize As Long) As Long
Dim V_LongUtil As Long
Function NomUtil() As String
'Récupération du nom de l'utilisateur
' pour rechercher le dossier correspondant à son bureau
Dim V_Util As Long
Dim V_NomUtil As String
V_LongUtil = 16
V_NomUtil = String(16, " ")
V_Util = apiGetUserName(V_NomUtil, V_LongUtil)
If V_Util <> 0 Then
NomUtil = Left(V_NomUtil, V_LongUtil - 1)
Else
NomUtil = ""
End If
End Function
Cordialement
Sergio
