none
Не отрабатывает logon script из за цифер в переменной RRS feed

  • Вопрос

  • Доброго времени суток, помогите разобраться начинающему ))
    Есть простенький скриптик для подключения сетевых принтеров в зависимости от членства в группе AD.
    Если объявить Const IT = "cn=PrinterUsers_B122IT" (цифры в низвании группы) - не отрабатывает, в таком виде (без циферь) Const IT = "cn=PrinterUsers" все работает. Хочется сделать в удобном виде с полным названием, т.к. принтеров в организации оч много... ошибок никаких в лог не пишет и не выдает ничего.
    думаю есть какие - то ограничения, возможно объявить как то по - другому константу.. я в этом ни бум бум.. поэтом спрашиваю, в гугле не нашел ответа
    Заранее благодарю
    Вот сам скрипт:


    Const IT = "cn=PrinterUsers_B122IT"
    Const BUH = "cn="PrinterUsers_A207BUH""

    On Error Resume Next
    Set WshNetwork = WScript.CreateObject("WScript.Network")

    'MsgBox Err.Number
    Set ADSysInfo = CreateObject("ADSystemInfo")
    Set CurrentUser = GetObject("LDAP://" & ADSysInfo.UserName)
    strGroups=""
    strGroups = LCase(Join(CurrentUser.MemberOf))
    'MsgBox strGroups
    If InStr(strGroups, IT) Then
    PrinterPath = "\\root02\B122IT"
    WshNetwork.AddWindowsPrinterConnection (PrinterPath)
    WshNetwork.SetDefaultPrinter (PrinterPath)
    End If
    If InStr(strGroups, BUH) Then
    PrinterPath = "\\root02\A207BUH"
    WshNetwork.AddWindowsPrinterConnection (PrinterPath)
    WshNetwork.SetDefaultPrinter (PrinterPath)
    End If

     

     

    9 декабря 2010 г. 13:07

Ответы

Все ответы