忍者ブログ

2024-11-21(Thu)

[PR]

×

[PR]上記の広告は3ヶ月以上新規記事投稿のないブログに表示されています。新しい記事を書く事で広告が消えます。

2013-04-03(Wed)

通常使うプリンターを固定化する方法

なぜだかわからないけれど、複数のプリンターが設定されている場合、通常使うプリンターをいくら設定しても戻ってしまうことってありませんか?

特にFaxやOneNoteなど、プリンター以外のものが入っているとそちらに通常使うプリンターが設定されてしまい、いくら待ってもプリンターから印刷されないということもしばしば・・・。

なぜなんだろう?
と原因を調べても、なにがなんだか・・・。

ならば通常使うプリンターが別に設定されても、起動するたびに指定したプリンターに設定するスクリプトを設定してしまえ!となりました。

そのスクリプトは以下のとおり。
vbスクリプトです。
------
Option Explicit

On Error Resume Next

Dim wsh
Set wsh = WScript.CreateObject("WScript.Shell")

Dim objWshNetWork
Set objWshNetWork = WScript.CreateObject("WScript.NetWork")

Dim strPrinterName
strPrinterName = "プリンター名"

objWshNetWork.SetDefaultPrinter strPrinterName
If Err.Number = 0 then
Else
   Wscript.Echo "エラー:" & Err.Description
End If

Set objWshNetWork = Nothing

------
これを printer.vbsとして保存し、起動時に実行してやれば、起動するたびに"プリンター名"で設定したプリンターに通常使うプリンターを設定します。

なお、ネットワーク上の共有プリンタは、“¥¥サーバー名¥プリンター名“ としなくてはいけません。
これ、ADのOU毎のGPOにてログオンで実行するよう設定すると、異動のたびに設定していたプリンターの設定もこれで楽になるかもしれませんね。

拍手[0回]

PR

この記事にコメントする

Name
Title
Mail
URL
Comment
Pass
Pictgram
Vodafone絵文字 i-mode絵文字 Ezweb絵文字

Amazon

PR

情報サービス

楽天

ソフト関連

メーカー直販PC

周辺機器

ランキング

プロフィール

HN:
NORI
性別:
男性
趣味:
車でどこへでも
自己紹介:
文学部卒業ながら、ひょんなことからシステム会社に就職。
しかしながらあまりの激務に退職。もうシステム系はいやだと思っていたが、ひょんなことから企業の電算室に勤務することとなる。

カレンダー

10 2024/11 12
S M T W T F S
1 2
3 4 5 6 7 8 9
10 11 12 13 14 15 16
17 18 19 20 21 22 23
24 25 26 27 28 29 30

ブログ内検索

Google
Web ブログ内

最新TB

アクセス解析