ＷＳＨで プリンタのスクリプト うまくいかない。

質問

はじめまして、のりといいます。ＷＳＨ初心者です。

以下のようなログオンスクリプトを組んで、プリンタ設定をしようとしますが、エ
ラーが出ます。
＜スクリプト　prt.vbs＞
' Shell Define
Dim WshShell
Set WshShell = WScript.CreateObject("WScript.Shell")
' Network Define
Dim WshNetwork
Set WshNetwork = WScript.CreateObject("WScript.Network")

' Setup Printer
'
Dim c1Prt1
Dim c1PNam1

' Setting Printer Class-1
'
c1Prt1= "\\C1DC01\C1MPR2"
c1PNam1 = "LP-7700 No.2"

WshNetwork.SetDefaultPrinter c1Prt1

<エラーメッセージ>
"\\C1DC01\C1MPR2"という名前のプリンタはありません。

ただし、このプリントは存在していて、例えば「ファイル名で実行」で
\\C1DC01\C1MPR2をいれるとちゃんとプリンタが出てきます。

以上のことで何かお分かりの方がいましたら、もしくは、このようなプリンタの設定
に関するＵＲＬなどご存知でしたら教えてください。
よろしくお願いします。

回答No.1

rara_sun · ベストアンサー

WSHなどプログラミングは全く分からないのですが・・

WshNetwork.AddWindowsPrinterConnection c1Prt1

を

WshNetwork.SetDefaultPrinter c1Prt1

の前にいれればよいのではないでしょうか？

的外れだったらご容赦下さい。

http://www.microsoft.com/japan/msdn/library/default.asp?url=/japan/msdn/library/ja/script56/html/wsmthsetdefaultprinter.asp

お礼

ありがとうございます！！！！！！！
うまくいきました！！！！