Arkiv

AddPrinters.vbs

Dim objNetwork, strPrintServer1, strPrintserver2 Set objNetwork = WScript.CreateObject(«WScript.Network») strPrintServer1 = «\\nt-server-1\» strPrintServer2 = «\\thsrv06\» objNetwork.AddWindowsPrinterConnection strPrintServer1 & «BrotherTavle» objNetwork.AddWindowsPrinterConnection strPrintServer1 & «hpLJ5000» objNetwork.AddWindowsPrinterConnection strPrintServer1 & «DSC224c» objNetwork.AddWindowsPrinterConnection strPrintServer1 & «DSC224» objNetwork.AddWindowsPrinterConnection strPrintServer1 & «R2032fax» objNetwork.AddWindowsPrinterConnection strPrintServer1 & «Ricoh2032» objNetwork.AddWindowsPrinterConnection strPrintServer1…

Change PrintServer2.vbs

‘ ‘ Replace printer queues from old server with queues on new server ‘ ‘ Created 20090313 by Inge Brattaas (inge@netpower.no) ‘ Option Explicit On Error Resume Next ‘ ::: Global variables ::: Dim PrintServerOld PrintServerOld = «\\nt-server-1\» Dim PrintServerNew…

ChangePrintServer.vbs

‘ Endre Printer kø thsrv06 – Windows logon script ‘ Author ktb@netpower.no ‘ Version 1 – April 22th 2010 ‘ ——————————————————‘ Option Explicit On Error Resume Next Dim objNetwork, strUNCPrinter strUNCPrinter = «\\thsrv06\FTP1_Ricoh_SH» Set objNetwork = CreateObject(«WScript.Network») ‘ Seksjon for…

This site is protected by WP-CopyRightPro