Check User Permissions

• david.c.holley

  SSCrazy

  Points: 2423

  More actions

  June 17, 2010 at 2:11 pm

  #236613

  I'm building an Access front end and would like to provide a means by which problems with a user's permissions can be identified such as if they're userId has been setup under a particular DB either explicity or via a NT Group, the roles that they've been assigned, etc.

  How would I go about getting that information in one fell swoop?

• paulm 19238

  Grasshopper

  Points: 16

  More actions

  June 24, 2010 at 12:38 am

  #1184336

  Private Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" (ByVal lpBuffer As String, nSize As Long) As Long

  Public Function getOperatorLogin() As String

  Dim lpBuff As String * 100

  Dim lngreturnValue As Long

  lngreturnValue = GetUserName(lpBuff, 100)

  getOperatorLogin = left(lpBuff, InStr(lpBuff, vbNullChar) - 1)

  End Function

  😛