通常使うプリンタを自動設定するには？

複数のプリンタが登録されている場合、通常使用するプリンタを
任意に変更できますが、毎回起動時に決まったプリンタを通常
使用するプリンタに自動的に設定することは可能でしょうか？

ＯＳ標準のコマンド等をスタートアップのバッチで実行する
ようなものが一番望ましいのですが。

No.3 回答者： NINJA104 回答日時： 2001/04/03 12:15

面倒なスクリプトを書きたくないのであれば、以下のレジストリを復元する手法を使うと荒っぽい方法ですが簡単に行えます。

（但し危険でもあります）

・起動時に通常使いたいプリンタを選択しておきます。
・レジストリエディタ（\winnt\regedit.exe）を起動し、
【HKEY_CURRENT_USER】直下の Printers を選択してメニュー"レジストリ(R)"→"レジストリファイルの書き出し(E)"を選択して任意ファイル名を付けてローカルドライヴの任意フォルダに保存します。
・このレジストリ情報ファイルをメモ帳などのテキストエディタで開き、文頭から５行迄（[HKEY_CURRENT_USER￥Printers]セクション記述まで）を残し、以下文末までを削除して上書き保存します。
・スタートアップに上記で用意したレジストリファイルをショートカットします。

以上で、毎回ログオン時にその時のプリンタ選択状態に復元します。（但し、ログオン時に『レジスト復元云々…』のダイアログが開きます）

要注意！）該当プリンタを削除した場合は、必ず上記作製のショートカットも削除してください。

No.2 回答者： orimoto 回答日時： 2001/04/03 08:27

Windowsでの話しですが、

スタート＞設定＞プリンター＞該当プリンターのクリック＞プリンター＞通常使うプリンターに設定

ではだめですか？

No.1 回答者： nn51 回答日時： 2001/04/02 23:55

Wshでデフォルトプリンタを設定する SetDefaultPrinter という

メソッドがあります。
VBScriptかJavaScriptで下記のようなものを記述して、
スタートアップかログオンのスクリプトに指定しておけば
起動時のプリンタ自動設定が可能です。

参考までにVBScriptの例を書いておきます。
プリンタ名の所にプリンタ名かプリンタの共有名を指定します。

Dim objWshNetWork
Set objWshNetWork = WScript.CreateObject("WScript.NetWork")
objWshNetWork.SetDefaultPrinter "プリンタ名"