Компьютерный форум NoWa.cc - Как раздать принтер пользователям через GPO?

- Windows 200x Server (https://nowa.cc/forumdisplay.php?f=429)

Как раздать принтер пользователям через GPO?

Здравствуйте, у меня такая ситуация: есть сетевой принтер HP 3390, я его подключила к сети, настроила, поставила от него дрова на на локальный DC сервер, включила у него общий доступ, поставила галочку "внести в AD". Как его теперь подключить всем пользователям в сети? Подходить к каждому компьютеру, лезть через сетевое окружение на сервер и руками подключать пользователю принтер можно, но кажется не правильным. Можно ли это сделать через GPO?

Re: Как раздать принтер пользователям через GPO?

Код:

Set WshNetwork = WScript.CreateObject("WScript.Network")

PrinterPath = "\\printserv\DefaultPrinter"

PrinterDriver = "Lexmark Optra S 1650"

WshNetwork.AddWindowsPrinterConnection PrinterPath, PrinterDriver

Это можно сделать приведенным выше VBS скриптом. (взял его из Helpa по vbs,а под определенные нужды, можно поправить по желанию).

Re: Как раздать принтер пользователям через GPO?

а для чего нужен параметр "PrinterDriver = "? Мне казалось, что тут нужно указывать драйвер от принтера, а в вашем примере там написано название этого принтера.

и куда лучше добавить скрипт - в сценарии входа пользователя или же в сценарий запуска компьютера?

Re: Как раздать принтер пользователям через GPO?

Этот параметр актуален, для w9x +, на современных системах NT/2000 + его можно опустить .

Подключать принтера, пожалуй стоит при запуске компьютера, но должно отрабатывать при входе в систему.

из документации

Re: Как раздать принтер пользователям через GPO?

у меня все получилось, но есть одно НО! Из-за того, что скрипты размещаются в общедоступной папке, любой пользователь может самостоятельно зайти в папку со скриптами и поставить себе любой принтер. А вот доступ к цветному принтеру хотелось бы ограничить, и тут либо приходится колдовать с правами на файл скрипта, либо на доступ к папке. Оба способа не удобны. Может все-таки можно это сделать через GPO?

Re: Как раздать принтер пользователям через GPO?

Код:

'

' COMMENT: Подключение сетевых дисков по группам пользователей.

'

'==========================================================================



Set objSysInfo = CreateObject("ADSystemInfo")

Set objNetwork = CreateObject("Wscript.Network")

Set objFSO = CreateObject("Scripting.FileSystemObject")



strUserPath = "LDAP://" & objSysInfo.UserName

Set objUser = GetObject(strUserPath)



For Each strGroup in objUser.MemberOf

    strGroupPath = "LDAP://" & strGroup

    Set objGroup = GetObject(strGroupPath)

    strGroupName = objGroup.CN



    Select Case strGroupName

     

        Case "Domain Users"

                If objFSO.DriveExists("P:") Then

                        objNetwork.RemoveNetworkDrive "P:" 

                End If

                If objFSO.DriveExists("X:") Then

                        objNetwork.RemoveNetworkDrive "X:" 

                End If

        objNetwork.MapNetworkDrive "P:", "\\xxx\Music"

        objNetwork.MapNetworkDrive "X:", "\\xxx\free"

                

                Case "Directors_full"

                       If objFSO.DriveExists("I:") Then

                        objNetwork.RemoveNetworkDrive "I:" 

                End If

                If objFSO.DriveExists("V:") Then

                        objNetwork.RemoveNetworkDrive "V:" 

                ;End If

        objNetwork.MapNetworkDrive "I:", "\\xxx\new"

        objNetwork.MapNetworkDrive "V:", "\\xxx\Shared\planirovanie"

        Case "cards_f"

                If objFSO.DriveExists("W:") then

                        objNetwork.RemoveNetworkDrive "W:"

                End if

                objNetwork.MapNetworkDrive "W:", "\\xxx\cards"

        Case "Domain Admins"

                If objFSO.DriveExists("W:") then

                        objNetwork.RemoveNetworkDrive "W:"

                End If

                If objFSO.DriveExists("Y:") then

                        objNetwork.RemoveNetworkDrive "Y:"

                End If

            objNetwork.MapNetworkDrive "W:", "\\xxx\Admin"

            objNetwork.MapNetworkDrive "Y:", "\\xxx\Distrib$"

             

    End Select

Next

3 года назад этот скрипт писал, для монтирования дисков, но он вполне подойдет и в данном случае. Подредактируй его на предмет прописывания принтеров определенным группам пользователей.

Re: Как раздать принтер пользователям через GPO?

Если мне не изменяет память, то начиная с версии Windows 2003 R2, появилась возможность создавать развернутые в сети принтеры. Устанавливаете роль Сервер печати, заходите в оснастку управление печатью, устаналиваете нужные принтеры и драйвера на них. Далее выбираете принтер, и в меню действие выбираете развернуть с помощью групповой политики

http://technet.microsoft.com/ru-ru/l...79(WS.10).aspx
http://technet.microsoft.com/ru-ru/l...24(WS.10).aspx
http://technet.microsoft.com/ru-ru/l...60(WS.10).aspx

Re: Как раздать принтер пользователям через GPO?

Цитата:

Сообщение от SadAngel (Сообщение 4205777)

В 2008 R2 точно есть. Причём там же есть развернутая GPO (конфигурация комп>Настройка>Параметры панели управления>Принтеры>), где можно указать принтер для развёртывания. - Проверено!
При установленной роли сервера печати:
Конфигурация комп>Конфигурация Windows>Развёрнутые принтеры. - Проверено также на 2008 R2!