[WR3.1]CreatePrinterのエラー

[amano]

WinXP＆VB2005（VC#2005)を使用してます。
ShowDlgでプリンタを選択して印刷処理をするさいに、標準のプリンタが接続されてなかったり、双方向通信不可機種の場合にエラー（プリンタ情報の取得に失敗しました）が出ます。回避方法を教えてください。
以下にコードを書きます。
‘プリンターオブジェクトを作成します
If nPrintMode = PRTMODE_DEFAULT Then’通常使用するプリンター
wdnPrinter = WREngine1.CreatePrinter()
ElseIf nPrintMode = PRTMODE_SELECT Then
‘指定したプリンター
wdnPrinter = WREngine1.CreatePrinter()’←ここでエラー
If wdnPrinter.ShowDlg(&H1) = False Then
Exit Function
End If
End If

[伊藤＠ソフトウィング]

日頃より弊社製品をご利用いただきまして、誠にありがとうございます。

CreatePrinterについては基本的にプリンタドライバがインストールされていれば、プリンタが接続されていない状態でもWRPrinterオブジェクトを作成する事は可能です。

お手数をお掛け致しますが、ご使用されているプリンタをお知らせ頂けますでしょうか？

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

[amano]

プリンタ名は
HP Designjet 30です。LANで接続されています。
未接続でも可能なら、非常にうれしいです。
表示されるエラーは以下です。
「PrinterInformation:プリンター情報取得に失敗しました。」
よろしくお願いします。

[伊藤＠ソフトウィング]

日頃より弊社製品をご利用いただきまして、誠にありがとうございます。

ご連絡頂いたプリンタドライバを使用し動作確認を行いました所、現象の確認を行う事が出来ました。

弊社にプリンタの実機がない為に明確な動作は分かりませんが、他のプリンタで同様の処理を行った際にエラーが発生しなかった為、こちらのプリンタの独自仕様によるものと考えられます。

CreatePrinterを行った際、WingReportではプリンタ情報をプリンタドライバから取得を行っておりますので、通常プリンタが接続されていない状態ではエラーは発生しません。
ご連絡頂いたプリンタではドライバ側で独自にプリンタへアクセスしようとし、エラーが発生しているのではないかと考えられます。

申し訳御座いませんがエラーの回避方法としては、使用するプリンタを変更して頂くか、プリンタを接続して頂くようにお願い出来ますでしょうか。

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

[amano]

回答ありがとうございます。LAN接続はされていたのですが、仕方ないので直接接続して試してみます。
ありがとうございました。

[投稿者]

投稿