Add/Remove Printer by VB Script

On Error Resume Next ' ใส่เพื่อบางครั้งผู้ใช้งานไม่สามารถเพิ่มเครื่องพิมพ์ได้ตามสิทธิ์

Set WshNetwork = CreateObject("WScript.Network") ' ประกาศตัวแปรที่ใช้งาน

' คำสั่งใช้ในการเพิ่มเครื่องพิมพ์ตามที่แชร์เอาไว้ที่ Server
WshNetwork.AddWindowsPrinterConnection "\\print-server\printer-name" 

' คำสั่งใช้ในการลบเครื่องพิมพ์ออก
WshNetwork.RemovePrinterConnection "\\print-server\printer-name" 

' คำสั่งใช้ในการตั้งเครื่องพิมพ์ตั้งต้น
WshNetwork.SetDefaultPrinter "\\print-server\printer-name" 

WScript.Quit

** หลังจากนั้นทำการเซฟไฟล์ให้เป็น .vbs แล้วเอาไปใช้งานใน Script Logon ของ Active Directory ได้เลย คร่าวนี้ผูุ้ใช้งานคนไหน Logon แล้วก็จะได้ Printer ตามที่เราตั้งเอาไว้ทันทีเลยจ้า

** มีเงื่อนไขนิดนึง ถ้า Active Directory เป็น Windows Server 2003 ที่เครื่อง Client จำเป็นต้องติดตั้ง Driver ก่อนครั้งนึง เพื่อให้ Windows รู้จักเครื่องพิมพ์นั้นๆ แต่ถ้าเป็น Windows Server 2008 R2 สามารถตั้งค่าให้ AD ส่ง Driver ไปตาม Policy ได้ด้วยจ้า

Comments

Popular posts from this blog

การตั้งเวลาระหว่าง Server และ Client

วิธีตั้งค่า NTP บน Primary Domain Controller

Installation and Run Node.JS on IIS