none
ActiveDirectory から一部のユーザーのユーザーグループが取得できません。 RRS feed

  • 質問

  • Windows XPからWindows 7へPCの移行を行っているのですが、

    今までのログオンスクリプトが使用できず、新たにVBSを作成しました。

     

    作成したVBSはログインユーザーのUser.Nameから所属していUserGroupを割り出し、

    所属グループに応じたネットワークドライブをマウントさせています。

     

    ほとんどのユーザーについては問題なく使用できているのですが、一部のユーザーのみ

    ActiveDirectory からUser.Nameが取得できず、ドライブのマウントができない状態です。

     

    以下の記述を応用的に利用しているのですが、なぜ一部のユーザー情報が取得できないのか

    非常に悩んでおります。

     

    是非、御教授いただければと思い投稿させていただきました。

    なにとぞよろしくお願いいたします。

     

     

    On Error Resume Next

    Set objDictionary = CreateObject("Scripting.Dictionary")
    Set objNetwork = CreateObject("Wscript.Network")

    Set objADSysInfo = CreateObject("ADSystemInfo")
    strUser = objADSysInfo.UserName

    Set objUser = GetObject("LDAP://" & strUser)
    strUserCN = objUser.CN


    For Each strGroup in objUser.memberOf
        Set objGroup = GetObject("LDAP://" & strGroup)
        strGroupName = objGroup.CN
        strGroupNameMsg = strGroupNameMsg & strGroupName & vbCrlf
        objDictionary.Add strGroupName, strGroupName
    Next

    Wscript.echo strusercn

    Wscript.echo strgroupname

    Wscript.echo strgroupnamemsg

    Wscript.quit

    2013年2月19日 0:20

すべての返信

  • フォーラム オペレーターの星 睦美です。
    mukapoon さん、投稿ありがとうございます。

    質問の内容から、こちらのスレッドは MSDN / TechNet フォーラムへのご意見ご要望 からActive Directory フォーラムに移動させていただきました。

    ※フォーラムで参考になる返信がありましたら、投稿者からの[回答としてマーク] をお願いします。


    日本マイクロソフト株式会社 フォーラム オペレーター 星 睦美


    2013年2月19日 0:43