ネットワークプリンタをプログラムで指定して印刷する。

[大浦]

いつもお世話になっております。
WR3.0にてネットワークプリンタをプログラムで指定して帳票を出力したいのですが、OCXヘルプのPrinterNameのサンプルコードを利用してCreatePrinterにセットしたところ「パラメータ無効（40005）」のエラーが発生しました。
また、直接CreatePrinterに”\\saver\printer名”をセットすると「指定したプリンタが見つかりません。（10101）」のエラーが発生します。
ネットワークプリンタをプログラムで指定出来ないののでしょうか？
申し訳ございませんが御回答お願いいたします。
OSはWin2000
VB6.0SP5です。
（コード記述）
MaxPrinters = frmFormNM.WING.PrinterDevices
For Count = 0 To MaxPrinters – 1
PrinterName = frmFormNM.WING.PrinterName(Count)
If InStr(1, PrinterName, “FMPR”) > 0 Then
Exit For
End If
PrinterName = “”
Next Count

Set waxPrinter = frmFormNM.WING.CreatePrinter(PrinterName)

[松嶋＠ソフトウィング]

お世話になります。

大変お手数ですが、作成に失敗するプリンター名をお知らせ頂
けないでしょうか？

以上です。宜しくお願い致します。

[大浦]

プリンター名は富士通FMPR5100（水平漢字プリンター１５）です。
宜しくお願いいたします。

[松嶋＠ソフトウィング]

ご連絡ありがとうございます。

大変申し訳ありませんでした。私の説明が不足しておりまし
た。
度々申し訳ありませんが、処理が失敗するプリンター名で、
CreatePrinterへ指定した名称（情報）をお知らせ下さい。

以上です。宜しくお願い致します。

[大浦]

プリンター名は”\\tslsv20\FMPR5100″です。
PrinterNameで取得したネットワーク上の全てのプリンタを設定しましたが処理が失敗しました。
ローカルプリンタなら成功します。
宜しくお願いいたします。

[松嶋＠ソフトウィング]

お世話になります。

ご連絡ありがとうございます。
ご連絡頂きましたネットワークプリンターについて調査致しま
したが、現象を確認することが出来ておりません。
大変お手数ですが、以下の項目についてお知らせ頂けないでし
ょうか？

　１．ＯＳへ登録されているプリンター数
　２．デザイナーからのテスト印刷結果
　※ネットワークプリンターのみで結構です

以上です。宜しくお願い致します。

[大浦]

お世話になります。
OSのプリンタ数は４台（内ネットワークプリンタ1台）
デザイナーではネットワークプリンタに出力しても正常に動作します。

[松嶋＠ソフトウィング]

お世話になります。

ご連絡頂きました現象を確認出来ておりません。
大変申し訳ありませんが該当処理部のソースを、お送り頂けな
いでしょうか？

※support@swg.co.jp宛までお願い致します。

以上です。宜しくお願い致します。

[投稿者]

投稿