最新消息:阿啰哈,本人90后,目前单身,欢迎妹子们来撩!.(。→‿←。)

打印机VBS脚本

' Deafult Printer Script.
'  This Script is For Windows Server 2003/2008 Domains only.
'
'  By Egbert Veldman  October 25, 2005
'
'  Printers.vbs Version COPR 1.00
'  Added Fidelio v6 and LPT support
'
logOutput.WriteLine("-------------------------------")
logOutput.WriteLine("Executing Script: 3Printers.vbs")


'--------------------------------------------------------------------
'********************************************************************
'***
'*** Connect the workstations to the default printers
'*** First check the workstation name, then connect printer.
'*** Syntax = MapPrinter \Server NamePrinterShare , LPT Port
'*** Example  MapPrinter "\FPSERVERNAMEFOHP43K12PS", "LPT1"
'*** Example  MapPrinter "\FPSERVERNAMEFOHP43K12PS", ""
'*** You can Map up to 10 printers per computer, DefaultPrinter is
'*** the Default Printer where the computer prints to
'*** is no LPT port is needed for DOS, use ""
'***
'********************************************************************

'===================
'  EXAMPLE
'===================

' use to connect to user
'If GetUserName = "TEST" then
'	MapPrinter "\XXXXXPFP1CS2HP41001PCL", ""
'End If

' use to connect to computer
'If GetComputerName = "OOLSPLKNYG7Y" then
'	MapPrinter "\OOLSPFP1HR1HP4100DPCL", "LPT2"
'	MapDefaultPrinter "\OOLSPFP1HR2XE4500DPS", ""
'End If

'===================
'AYS
'===================



'===================
'F&B OFFICE
'===================



'===================
'Accountings
'===================



'===================
'BC
'===================



'===================
'FO
'===================
If GetComputerName = "CNG82102D8" then
	MapDefaultPrinter "\FP1FrontOfficeM410n", ""
End if

If GetComputerName = "6CR3371CWQ" then
	MapDefaultPrinter "\FP1FO3HP52KDPS", "" 
        MapPrinter "\FP1FO3HP52KDPS2", ""
	MapPrinter "\FP1FrontOffice1HP5200PSB2", ""
	MapPrinter "\FP1FrontOffice1HP5200PSB3", ""
	MapPrinter "\FP1FrontOfficeM410n", "" 
	MapPrinter "\FP1FO6HP52KDPS2", "" 
	MapPrinter "\FP1FO6HP52KDPS", ""
        MapPrinter "\FP1FO10HP60KDPS", ""
	MapPrinter "\FP1FO10HP60KDPS2", ""
End if


'===================
'Concierge
'===================



'===================
'Engineering
'===================



'===================
'Executive Office
'===================



'===================
'Health Club
'===================



'===================
'Computer Room
'===================
'If GetComputerName = "CNG81904NN" then
' MapPrinter "\FP1CT1HP52KDPS", ""
' MapPrinter "\FP1FB1HP52KDPS", ""
' MapPrinter "\FP1FB2HP21KDPS", ""
' MapPrinter "\FP1AC2HP52KDPS", ""
' MapPrinter "\FP1AC3HP52KDPS", ""
' MapPrinter "\FP1HK2HP30KDPS", ""
' MapPrinter "\FP1FO1HP30KDPS", ""
' MapPrinter "\FP1SP1HP30KDPS", ""
' MapPrinter "\FP1FO7HP30KDPS", ""
' MapPrinter "\FP1FO5HP52KDPS", ""
' MapPrinter "\FP1FO5HP52KDPS2", ""
' MapPrinter "\FP1FO8HP52KDPS", ""
' MapPrinter "\FP1FO6HP52KDPS", ""
' MapPrinter "\FP1FO6HP52KDPS2", ""
' MapPrinter "\FP1FO4HP52KDPS", ""
' MapPrinter "\FP1FO4HP52KDPS2", ""
' MapPrinter "\FP1FO3HP52KDPS", ""
' MapPrinter "\FP1FO3HP52KDPS2",""
' MapPrinter "\FP1FO2HP30KDPS", ""
' MapPrinter "\FP1EN1HP30KDPS", ""
' MapPrinter "\FP1SM1HP52KDPS", ""
' MapPrinter "\FP1LP1HP52KDPS", ""
' MapPrinter "\FP1AC4HP52KDPS", ""
' MapPrinter "\FP1AC5HP30KDPS", ""
'End If


'=========================
'Executive Floor Reception
'=========================



'===================
'General Manager
'===================



'===================
'Guest Relations
'===================



'===================
'Human Resources
'===================



'===================
'Housekeeping
'===================



'===================
'In Room Dining
'===================



'===================
'Loss Prevention
'===================



'===================
'Public Relations
'===================



'===================
'Purchasing
'===================



'============================
'Stewarding Office
'============================



'============================
'Reservation and Revenue MGMT
'============================



'===================
'Sales & Catering
'===================



'===================
'Gamnet training
'===================


logOutput.WriteLine("Completed Script: 3Printers.vbs")
logOutput.WriteLine("===============================")

转载请注明:林志斌 » 打印机VBS脚本

发表评论
取消评论
表情

Hi,您需要填写昵称和邮箱!

  • 昵称 (必填)
  • 邮箱 (必填)
  • 网址