Quantcast
Channel: The Official Scripting Guys Forum! forum
Viewing all articles
Browse latest Browse all 15028

add printer on remote computer

$
0
0

In my environment I need to add printers on remote computers. I can’t use active directory. My account has admin privileges, but the remote computer is setup to auto login to an account and that account is just a member of the domain users group. So far I pieced this script together, but it needs to be run on the remote computer

Dim printer, UNCpath1, slash1, slash2

slash2 = "\\"

slash1 = "\"

printername = InputBox("What printer do you want to be the default? ", "Create Default Printer")

UNCpath1 = InputBox("What server is this printer on? ", "Server")

Set printer = CreateObject("WScript.Network")

printer.AddWindowsPrinterConnection slash2 & UNCpath1 & slash1 & printername

printer.SetDefaultPrinter slash2 & UNCpath1 & slash1 & printername

WScript.Quit

I would like a script that has input boxes to ask what printer you want to setup, and which print server the printer is on.

Please phrase your answer with the knowledge that I know next to NOTHING about scripting. The script above was pieced together after a lot of searching.


Viewing all articles
Browse latest Browse all 15028

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>