Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

Название темы: перенос принтеров
Показать сообщение отдельно

Новый участник


Сообщения: 1
Благодарности: 0

Профиль | Отправить PM | Цитировать


у меня работал такой скриптик, VBScript, был прописан в групповой политике на логине пользователя
On Error Resume Next
Dim objWsNet, objRoot
Set objWsNet = WScript.CreateObject("WScript.Network")
Set colPrinters = objWsNet.EnumPrinterConnections()
If (colPrinters.length <> 0) Then
For i = 0 To colPrinters.length -1
PrinterPath = colPrinters(i)
If (Left(PrinterPath,9) = "\\oldsrv\") Then
objWsNet.RemovePrinterConnection PrinterPath
objWsNet.AddWindowsPrinterConnection(Replace(PrinterPath,"oldsrv","newsrv"))
End If
Next
End If

Это я переносил с одного сервера на другой , оба сервака под 2003, имена принтеров были те же .. Прошло все гладко , скрипт висел около недели, потом я его убрал ..
В данный момент , то же есть мысль перенести на 2008 R2 , но не факт что теперь пройдет все гладко..

Отправлено: 17:57, 12-01-2011 | #5

Название темы: перенос принтеров