Is user an administrator

[Jack Russell]

Is there an easy way to tell if the current user is an administrator?

Thanks

 

[Cor Ligthert]

"Jack Russell"

Is there an easy way to tell if the current user is an administrator?

http://msdn.microsoft.com/library/d...incipalwindowsprincipalclassisinroletopic.asp

I hope this helps,

Cor

 

[Jack Russell]

"Jack Russell"


http://msdn.microsoft.com/library/d...incipalwindowsprincipalclassisinroletopic.asp

I hope this helps,

Cor

thanks, I think it does but life would be much easier if someone at MS
spoke English!

 

[m.posseth]

well maybe this is an easier to understand example


Dim ident As System.Security.Principal.WindowsIdentity =
System.Security.Principal.WindowsIdentity.GetCurrent()

Dim user As New System.Security.Principal.WindowsPrincipal(ident)

If Not (user.IsInRole(Security.Principal.WindowsBuiltInRole.Administrator))
Then

Me.Visible = False

MsgBox("Settings form only availlable for Administrators ! ",
MsgBoxStyle.DefaultButton3)

Me.Close()

End If




Michel Posseth [MCP]

 

[Herfried K. Wagner [MVP]]

Is there an easy way to tell if the current user is an administrator?

\\\
Imports System.Security.Principal
..
..
..
Dim wp As New WindowsPrincipal(WindowsIdentity.GetCurrent())
Dim IsAdmin As Boolean = wp.IsInRole(WindowsBuiltInRole.Administrator)
///

 

[Jack Russell]

well maybe this is an easier to understand example


Dim ident As System.Security.Principal.WindowsIdentity =
System.Security.Principal.WindowsIdentity.GetCurrent()

Dim user As New System.Security.Principal.WindowsPrincipal(ident)

If Not (user.IsInRole(Security.Principal.WindowsBuiltInRole.Administrator))
Then

Me.Visible = False

MsgBox("Settings form only availlable for Administrators ! ",
MsgBoxStyle.DefaultButton3)

Me.Close()

End If




Michel Posseth [MCP]

thanks, I think it does but life would be much easier if someone at MS
spoke English!

Thanks, i wish I had that before I tried to interpret Ms jumble!