如何使用 Visual Basic 脚本添加默认打印机

本文介绍如何使用 Visual Basic 脚本添加打印机并使其成为默认打印机。

如果打印机不是本地连接到 LPT、COM 或 USB 端口，终端服务上的“Windows 打印机映射”将无法自动映射打印机。

要映射网络打印机以便在 Windows 2000 终端服务和 Windows NT 4.0 终端服务器中使用，请按照下列步骤操作：

1. 在下面的脚本中，使用要添加的驱动程序的名称替换 PrinterDriver，并使用共享打印机和服务器的名称替换“\\Server\Printer”：

   Set WshNetwork = CreateObject("WScript.Network")
   PrinterPath = "\\Server\Printer"
   PrinterDriver = "PrinterDriver"
   WshNetwork.AddWindowsPrinterConnection PrinterPath, PrinterDriver
   WshNetwork.SetDefaultPrinter "\\Server\Printer" 
   					

2. 保存并执行 Visual Basic (VBS) 文件中的脚本。

注意：参数“PrinterDriver”必须与 Ntprint.inf 文件左侧的列中显示的驱动程序名称完全相同。

例如，如果要安装 Cannon Bubble-Jet BJ-230，则脚本中的这一行应为 PrinterDriver = "Canon Bubble-Jet BJ-230"。

ntprint.inf 文件中的片段：

++++++++++++++++++
"Canon Bubble-Jet BJ-230"  = CNBJ230.GPD, CanonCanon_Bubble-JeFF70,Canon_Bubble-Jet_BJ-230
				

注意：Windows NT 4.0 终端服务器默认情况下不包含 Windows Scripting Host。必须先安装 Windows Scripting Host 才能执行脚本。

要为登录到终端服务的各个用户添加不同的打印机，请按照下列步骤操作：

1. 在下面的脚本中，使用要添加的驱动程序的名称替换 PrinterDriver，使用用户的名称替换 UsernameX，然后根据需要添加更多节：

   Set WshNetwork = CreateObject("WScript.Network")
   
   Select Case WshNetWork.UserName 
   
       Case "Username1"
       
           PrinterPath = "\\Server\Printer1"
           PrinterDriver = "PrinterDriver"
           WshNetwork.AddWindowsPrinterConnection PrinterPath, PrinterDriver
   
           WshNetwork.SetDefaultPrinter "\\Server\Printer1"
       
       Case "Username2"
       
           PrinterPath = "\\Server\Printer2"
           PrinterDriver = "PrinterDriver"
           WshNetwork.AddWindowsPrinterConnection PrinterPath, PrinterDriver
   
           WshNetwork.SetDefaultPrinter "\\Server\Printer1"
   End Select 
   					

2. 将脚本设置为在用户每次登录到终端服务时运行（使用登录脚本或组策略），然后以 end select 结束。

注：本文转载自微软官方网部，详情请见：

http://support.microsoft.com/kb/263226/