ＶＢでユーザーを作成し、権限を与えるには？ (ID:107339)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 多分、ＡＤＳＩを使って行われたと思いますが・・・ パラメータとして与えるドメイン情報の部分の記述ですが、 ワークグループの場合、その情報（ユーザーが存在する） が存在するマシン名を与えて下さい。 そうすれば、うまくいきます。 権限の付与の部分は、グーループにユーザーを追加すると 言うことですので、権限を付与すると言うことでヘルプを 検索しても出てきません。ご注意下さい。 例 Dim Group As IADsGroup Dim GroupName As String Dim GroupDomain As String Dim User As IADsUser Dim UserName As String Dim UserDomain As String GroupName = "Administrators" GroupDomain = "xxxxxxxx" ' <= マシン名 UserName = "yyyy" ' <= ユーザーアカウント名 UserDomain = "xxxxxxxx" ' <= マシン名 Set User = GetObject("WinNT://" & UserDomain & "/" & UserName & ",user") Set Group = GetObject("WinNT://" & GroupDomain & "/" & GroupName & ",group") Group.Add (User.ADsPath) Group.SetInfo 以上。