Programación de bases de datos con Visual Basic .NET

Listado 10.8

Utilización de la clase PrincipalPermission.

Dim usuario1 As String = "Lola"

Dim funcion1 As String = "Jefe"

Dim PrincipalPerm1 As New PrincipalPermission(usuario1, funcion1)

Dim usuario2 As String = "Pepe"

Dim funcion2 As String = "Supervisor"

Dim PrincipalPerm2 As New PrincipalPermission(usuario2, funcion2)

PrincipalPerm1.Union(PrincipalPerm2).Demand()