Help | Site Map
Connecting Tech Pros Worldwide
 
 
LinkBack Thread Tools
  #1  
Old August 24th, 2007, 10:45 AM
Stapes
Guest
 
Posts: n/a
Default Permissions - getting a meaningful output

Hi

I have a bit of code that is meant to display the permissions
assigned
to different users. This is it:


Dim db As Database
Dim ctrLoop As Container
Set db = CurrentDb
Dim GrpUsrInfo As String
GrpUsrInfo = ""
For Each ctrLoop In db.Containers
With ctrLoop
GrpUsrInfo = GrpUsrInfo & "Container: " & .Name & vbCrLf
GrpUsrInfo = GrpUsrInfo & "User: " & .UserName & vbCrLf
GrpUsrInfo = GrpUsrInfo & " Permissions: " & .Permissions &
vbCrLf
GrpUsrInfo = GrpUsrInfo & " AllPermissions: " & _
.AllPermissions & vbCrLf
End With
Next ctrLoop
Me!GroupUserInfo = GrpUsrInfo


The resultant output displays a load of meaningless numbers. How can
I
get it to display the information in English?


Stapes

 

Bookmarks

Thread Tools

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are Off
[IMG] code is Off
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On

What is Bytes?

We are a network of experts and professionals in IT and software development that help one another with answers to tough questions and share insights. Get the best answers to your questions from over network members.
Post your question now . . .
It's fast and it's free

Popular Articles