none
Имя пользователя из ADsysinfo RRS feed

  • Вопрос

  • Простая задача. Решение на которую опубликовано, но с определенного времени, на машинах, заново подключаемых к домену при выполнеии второй строчки скрипта:
    Set objSysInfo = CreateObject("ADSystemInfo")  
    strUserDN = objSysInfo.userName
    Set UserObj = GetObject("LDAP://" & strUserDN)

    появляется сообщение:  
    Указанный домен не существует или к нему невозможно подключиться.
    Код: 80070548
    При этом имя пользователя определяется:
    Set WshNetwork = CreateObject("WScript.Network")
    Path = WshNetwork.UserName
    ПРАВИЛЬНО
    Далее надо получить информацию о пльзователе, но
    Set UserObj = GetObject("LDAP://" & strUserDN)
    Сервер недоступен.

    AD развернут на сервере 2008.
    2 декабря 2009 г. 11:26

Ответы