Printer Scripts

Collapse
X
 
  • Time
  • Show
Clear All
new posts
  • morpk
    Technician

    50+ Posts
    • Oct 2010
    • 97

    #1

    Printer Scripts

    Hi All just wanted to start a thread about people fav way to script out printers hear is a simple VB script that i sometimes use feel free to add suggestions below (please be kind i am not a programmer)

    ' Printer Logon Script
    ' Author: Mark
    ' Date: 04/04/2012
    ' ----------------------------------------------------------'
    Option Explicit
    Dim objNetwork, strLocal, strUNCPrinter1, strUNCPrinter2, strUNCPrinter3, strUNCPrinter4, strUNCPrinter5
    strUNCPrinter1 = "\\YOUR_SERVER\PRINTER_NAME"
    strUNCPrinter2 = "\\YOUR_SERVER\PRINTER_NAME"
    strUNCPrinter3 = "\\YOUR_SERVER\PRINTER_NAME"
    strUNCPrinter4 = "\\YOUR_SERVER\PRINTER_NAME"
    strUNCPrinter5 = "\\YOUR_SERVER\PRINTER_NAME"
    Set objNetwork = CreateObject("WScript.Network")
    objNetwork.AddWindowsPrinterConnection strUNCPrinter1
    objNetwork.AddWindowsPrinterConnection strUNCPrinter2
    objNetwork.AddWindowsPrinterConnection strUNCPrinter3
    objNetwork.AddWindowsPrinterConnection strUNCPrinter4
    objNetwork.AddWindowsPrinterConnection strUNCPrinter5
    ' ----------------------------------------------------------'
    'Set default printer
    objNetwork.SetDefaultPrinter strUNCPrinter5

    'End Script.
    WScript.Quit
Working...