时间戳

首页 > 解决方案 > 如何使用 VB.NET 将组添加到本地管理员组？

vb.net - 如何使用 VB.NET 将组添加到本地管理员组？

问题描述

我正在尝试编写一个程序，该程序grp1使用 VB.NET 添加一个名为本地管理员组的组。我已经尝试过这篇文章中提到的方法：向本地管理员添加组，但它对我不起作用。以下是我到目前为止的内容：

Function AddToLocalAdmin(grp1 As String)
    Dim localComp As string = system.environment.MachineName
    Try
        Dim localMachine As New DirectoryEntry("WinNT://" & localComp & ",computer")
        Dim AdminGrp As DirectoryEntry = localMachine.Children.Find("Administrators", "group")

        AdminGrp.Invoke("Add", grp1)
        AdminGrp.CommitChanges()

        Return True
    Catch ex As Exception
        Return False
    End Try
End Function

我在 Google 上发现了很多关于如何将用户添加到本地管理员组的文章，但是我应该怎么做才能添加一个组呢？

提前致谢。

标签： vb.netactive-directoryexelocaldirectoryentry

解决方案

Nvm 我自己找到了解决方案。下面的代码工作得很好。

    AdminGrp.Invoke("Add", New Object() {"WinNT://DOMAINNAME/" & grp1})

推荐阅读