El siguiente código nos permite listar todos los grupos y cada uno de los usuarios que se encuentran asignados dentro de dicho grupo.
C#.NET
private static void ObtenerGruposUsuarios()
{
using (SPSite site = new SPSite("http://sitename"))
{
SPWeb web = site.OpenWeb();
SPGroupCollection groupCollection = web.SiteGroups;
foreach (SPGroup group in groupCollection)
{
SPUserCollection userCollection = group.Users;
Console.WriteLine("Group Name :" + group.Name+"\n");
foreach (SPUser user in userCollection)
{
Console.WriteLine("User Name: " + user.Name + " Email: " + user.Email + " Login: " + user.LoginName);
}
}
//Iterate the owners group
SPGroup ownerGroup = web.AssociatedOwnerGroup;
foreach (SPUser ownerUser in ownerGroup.Users)
{
Console.WriteLine("User Name: " + ownerUser.Name + " Email: " + ownerUser.Email + " Login: " + ownerUser.LoginName);
}
}
Console.ReadLine();
}
VB.NET
Private Sub ObtenerGruposUsuarios()
Using site As New SPSite("http://sitename")
Dim web As SPWeb = site.OpenWeb()
Dim groupCollection As SPGroupCollection = web.SiteGroups
For Each group As SPGroup In groupCollection
Dim userCollection As SPUserCollection = group.Users
Console.WriteLine("Group Name :" + group.Name + vbLf)
For Each user As SPUser In userCollection
Console.WriteLine("User Name: " + user.Name + " Email: " + user.Email + " Login: " + user.LoginName)
Next
Next
'Iterate the owners group
Dim ownerGroup As SPGroup = web.AssociatedOwnerGroup
For Each ownerUser As SPUser In ownerGroup.Users
Console.WriteLine("User Name: " + ownerUser.Name + " Email: " + ownerUser.Email + " Login: " + ownerUser.LoginName)
Next
End Using
Console.ReadLine()
End Sub
No hay comentarios:
Publicar un comentario