JScript 和 VBscript访问网络上的打印设备

  Network 对象使您能够访问有关网络的信息。下面的脚本将演示如何映射网络驱动器。首先，脚本将创建一个 Network 对象。接着，MapNetworkDrive 方法（Network 对象的一个方法）执行映射操作。MapNetworkDrive 方法采用五个参数： 

本地驱动器分配（例如，I:） 
被映射的远程驱动器的通用命名规则 (UNC) 路径 
指明驱动器是否为永久连接的可选布尔值 
可选用户名（如果希望使用不同的凭据） 
可选密码，用于可选用户名 
// JScript。
var net;
net = new ActiveXObject("WScript.Network");
net.MapNetworkDrive("I:"，"\\\\computer2\\public","True","jdoe","jdoepassword");

' VBScript。
Dim net
Set net = CreateObject("WScript.Network")    
net.MapNetworkDrive "I:"，"\\computer2\public","True","jdoe","jdoepassword"
Network 对象使您能够访问网络上的打印设备。下面的脚本将演示如何使用 Network 对象来控制网络打印机设备。

与远程打印机连接
下面的脚本将演示如何与网络上的共享打印设备连接。首先，脚本将创建一个 Network 对象。接着，AddWindowsPrinterConnection 方法（Network 对象的一个方法）执行连接操作。AddWindowsPrinterConnection 方法采用两个参数：希望用来调用打印机的名称以及打印设备的通用命名规则 (UNC) 路径。

// JScript。
var net;
net = new ActiveXObject("WScript.Network");
net.AddWindowsPrinterConnection("\\\\ServerName\\PrinterName");

' VBScript。
Dim net
Set net = CreateObject("WScript.Network")    
net.AddWindowsPrinterConnection "\\ServerName\PrinterName"
设置默认打印机
下面的脚本将演示如何设置所需的默认打印设备。首先，脚本将创建一个 Network 对象。接着，SetDefaultPrinter 方法（Network 对象的一个方法）执行设置操作。SetDefaultPrinter 方法只采用一个参数，即打印机的名称（要么是本地打印机名称，要么是远程打印机名称），它采用打印设备的通用命名规则 (UNC) 路径。

// JScript。var net;
var net;
net = new ActiveXObject("WScript.Network");
net.SetDefaultPrinter("\\\\ServerName\\PrinterName");

' VBScript。
Dim net
Set net = CreateObject("WScript.Network")    
net.SetDefaultPrinter "\\ServerName\PrinterName"

 

来自 http://www.57itsq.com/read.php?tid-1642.html