- PR -

ユーザーグループの管理者を設定するようなスクリプト

1
投稿者投稿内容
ZoSo
会議室デビュー日: 2004/08/01
投稿数: 11
投稿日時: 2006-03-16 20:42
恐れ入ります。

例えば、Domain.localというドメイン以下のUsser OU内にある、GroupAというドメインローカルユーザーグループの管理者を設定したり、読み取ったりするスクリプトを考えてます。
先ず、読み取るスクリプトとして、ADSIを使用して、大体以下のような感じのものを考えたのですが、"..."に何を入れて良いのか分かりません。IADsGroupオブジェクトのプロパティーに、管理者を読み取ったり、設定したり出来るものがなさそうですし、それの出来そうなメソッドもありません。

Dim oGroups as IADsGroup
Dim sAdmin as String
Set oGroup = GetObject("LDAP://CN=GroupA, OU=Users, DC=Domain, DC=local")
sAdmin= oGroup.Get("....") '←この...に管理者属性を示すものを入れられれば良いのですが…

あと、「Active Directoryユーザーとコンピュータ」から、ユーザーグループのプロパティーで「管理者がメンバーシップを変更できる」とありますが、これにチェックを入れたり、はずしたりする為のスクリプトも考えてます。やはり、IADsGroupおぷじぇくとには、それを可能にするような、プロパティーもメソッドもなさそうです。

何か良い案がありましたら、お知恵頂きたくよろしくお願いいたします。



kaz
ぬし
会議室デビュー日: 2003/11/06
投稿数: 5403
投稿日時: 2006-03-16 21:39
こんばんわ．
引用:

ZoSoさんの書き込み (2006-03-16 20:42) より:

例えば、Domain.localというドメイン以下のUsser OU内にある、GroupAというドメインローカルユーザーグループの管理者を設定したり、読み取ったりするスクリプトを考えてます。

user group ではダメなのでは？
OU なら管理者を設定できると思いますけど．．．
minminnana
大ベテラン
会議室デビュー日: 2004/02/05
投稿数: 246
お住まい・勤務地: 盛岡
投稿日時: 2006-03-16 23:16
引用:
sAdmin= oGroup.Get("....") '←この...に管理者属性を示すものを入れられれば良いのですが…


"managedBy"ですかねぇ。
（今試せる環境じゃないので、間違っていたらすいません。）
ZoSo
会議室デビュー日: 2004/08/01
投稿数: 11
投稿日時: 2006-03-17 11:35
引用:

"managedBy"ですかねぇ。
（今試せる環境じゃないので、間違っていたらすいません。）


"managedBy"で出来ました！ありがとうございます。
ZoSo
会議室デビュー日: 2004/08/01
投稿数: 11
投稿日時: 2006-03-26 01:20
もう皆さんの回答でだいぶ解決してしまったのですが、ManagedBy属性を設定するだけでなく、その管理者がグループのメンバーを設定できるようなスクリプトを作りたかったので、更にいろいろネットを検索していたら、以下のような、ちょうど良いサイトがありました。
http://windowssdk.msdn.microsoft.com/library/default.asp?url=/library/en-us/ad/ad/group_object_user_interface_mapping.asp
ここを参考にすれば、[Active Directory ユーザーとコンピュータ]スナップインで操作していることを全てスクリプト化出来ます。
報告まで…
1

スキルアップ／キャリアアップ（JOB@IT）