1

ドメインのネットワーク グループをマシンのローカル管理者グループに追加しようとしています。

行ごとにデバッグすると、ローカル管理者グループが見つかり、ネットワークグループが見つかりますが、次の行に到達すると:

AdministratorsGrp.Members.Add(NetworkGrp)

「ネットワーク パスが見つかりませんでした」というエラーが返されます。

このエラーを修正するにはどうすればよいですか。インターウェブを 30 分かけて検索しましたが、解決策が見つかりませんでした :(

これまでの私の機能は次のとおりです。

Private Function AddAdminGroup() As Boolean
    Dim AdministratorsGrp As GroupPrincipal
    Dim NetworkGrp As GroupPrincipal

    Try
        Dim DomainCtx As New PrincipalContext(ContextType.Domain, "<domainname>", "<username>", "<pw>")

        'Find Local Administrators group by SID
        AdministratorsGrp = GroupPrincipal.FindByIdentity(DomainCtx, IdentityType.Sid, "S-1-5-32-544")

        'Find Desktop Managers group by Name on Domain
        NetworkGrp = GroupPrincipal.FindByIdentity(DomainCtx, IdentityType.Name, "<network group")

        'Add Desktop Managers group to Administrators Group
        AdministratorsGrp.Members.Add(DesktopMGRGrp)

        'Save Group
        AdministratorsGrp.Save()

        Return True
    Catch PrinEx As PrincipalExistsException
        Return True
    Catch ex As Exception

    End Try
    Return False
End Function

提供されたヘルプに事前に感謝します!!

4

1 に答える 1