| MT_さんの例で標準プリンターを切り替えるスクリプトを作成してショートカット を作成して切り替える方法では??
VBSの場合 On Error Resume Next Dim objNetwork
Set objNetwork = WScript.CreateObject("WScript.Network") objNetwork.SetDefaultPrinter "EPSON LP-A500F"
EPSON LP-A500名を個人の環境のプリンター名に変更する。 保存するとき default_LP-A500F.vbs とC:\Jwwフォルダなどに保存する。 このdefault_LP-A500F.vbsのショートカットをディスクトップに作成する。
jsの場合
var ownet = WScript.CreateObject("WScript.Network"); ownet.SetDefaultPrinter("DocuWorks Printer");
保存するとき default_DocuWorks.js とC:\Jwwフォルダなどに保存する。
ネットワーク接続のプリンタの場合は
var ownet = WScript.CreateObject("WScript.Network"); ownet.SetDefaultPrinter("\\\\xx-dgl708\\lp");
補足) \\xx-dgl708\lp(ネットワークプリンタ名) ---> \\\\xx-dgl708\\lp と なります。
|