сетевые принтеры

Windows Script Host (WSH), WMI, vbs скрипты и т.д. Создание и применение скриптов.

Модератор: Модераторы

Пользователь
Сообщения: 68
Зарегистрирован: 27 июл 2004, 13:56

Сообщение yura » 03 сен 2004, 16:30

можно ли сделать так чтобы принетры (сетевые) были привязаны к компутеру а не к пользователям. пробывал писать batничек с командой net use но таким образом он подключает только порт!

заранее большое спасибо!

Администратор
Сообщения: 3444
Зарегистрирован: 19 дек 2003, 13:36
Откуда: Москва

Сообщение domovoy » 05 сен 2004, 02:02

yura
Смотри в разделе по WHS там был пример скрипта для подключения принтеров пользователям.
Правильно заданный вопрос - это уже половина ответа.

Пользователь
Сообщения: 68
Зарегистрирован: 27 июл 2004, 13:56

Сообщение yura » 06 сен 2004, 12:19

Цитата (domovoy @ 5.09.2004 - 01:02)
yura
Смотри в разделе по WHS там был пример скрипта для подключения принтеров пользователям.
[/quote]

Нашел такой скрипт! Тада следующий вопрос ибо не силен я в скриптовых я зыках!
Сначала написал как в статье:
Option Explicit
Dim oNetwork, sPrintPath
Set oNetwork = CreateObject("WScript.Network")
sPrintPath = "\\Elena\CanonLBP3200"
oNetwork.AddWindowsPrinterConnection sPrintPath
oNetwork.SetDefaultPrinter sPrintPath

Интерпретатор или компилятор или кто там еще в js
выдал ошибку, что предполагется наличие ;

тогда написал так:
Option Explicit;
Dim oNetwork, sPrintPath;
Set oNetwork = CreateObject("WScript.Network");
sPrintPath = "\\Elena\CanonLBP3200";
oNetwork.AddWindowsPrinterConnection sPrintPath;
oNetwork.SetDefaultPrinter sPrintPath;

ошибка выдается все равно!

в чем беда?
спасибо!
Активный пользователь
Сообщения: 774
Зарегистрирован: 20 май 2004, 09:23
Откуда: Москва

Сообщение Xenon[BMSTU] » 08 сен 2004, 17:46

Windows 2000 Resource Kit
в его состав входит exe-к который подключает серевые расшаренные принера
может кто подскажет как так же подключить имеено сетевые принтера, это которые с jetdirect-ом ?

Активный пользователь
Сообщения: 716
Зарегистрирован: 13 апр 2004, 17:38

Сообщение PavelKHTW » 10 сен 2004, 22:30

Цитата (Xenon[BMSTU] @ 8.09.2004 - 16:46)
Windows 2000 Resource Kit
в его состав входит exe-к который подключает серевые расшаренные принера
может кто подскажет как так же подключить имеено сетевые принтера, это которые с jetdirect-ом ?
[/quote]

А кто мешает подключить принтера HP на сервере(через тот же JetDirect), а уже потом их раздавать клиентам непосредственно с сервера?
Активный пользователь
Сообщения: 115
Зарегистрирован: 13 янв 2004, 14:53

Сообщение BIUS » 01 окт 2004, 17:07

Возвращаясь у вопросу!!! Выше yura пытался разобраться
Не понятно почему выдает ошибку "Неверно задано имя принтера"
Следующий скрипт!!

Option Explicit
Dim oNetwork, sPrintPath
Set oNetwork = CreateObject("WScript.Network")
' Begin Callout A;
Select Case oNetwork.ComputerName
Case "smk"
sPrintPath = "\\kc037.domen.ru\HPLaser"
End Select
' End Callout A;
oNetwork.AddWindowsPrinterConnection sPrintPath
oNetwork.SetDefaultPrinter sPrintPath

Вернуться в Скрипты

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 3