是否可以通过编程方式将用户添加到SharePoint组？ [关闭]

Question

关闭。这个问题需要更多focused。它当前不接受答案。

---

是否要改善此问题？更新问题，使其仅按editing this post专注于一个问题。

[2天前关闭。

使用SharePoint 2013

如果可能，我希望使用VB或Access-vba

Answer 1

您可以下载SharePoint 2013 Client Components SDK，然后从VBA或VB.Net引用Client-Side Object Model (CSOM) .dll。注意，Microsoft的大多数示例都使用C＃，但适用于VB。

这里是使用VB的示例：

Dim username as String = "mydomain\myusername"
Dim password as String = "mypassword"
Dim credentials As NetworkCredential = New NetworkCredential(userName, password) 

Using clientContext = New ClientContext(siteUrl)
  clientContext .Credentials = credentials

  Dim groupColl As GroupCollection = clientContext.Web.SiteGroups
  Dim mygroup As Group = groupColl.GetByName("NameOfGroupToAddTo")

  clientContext.Load(newgroup)
  clientContext.ExecuteQuery()

  Dim myuser as User = clientContext.Web.EnsureUser("mydomain\loginnameOfUserToAdd")
  mygroup.Users.AddUser(myuser)
  clientContext.ExecuteQuery()
End Using