[WR2.0]

[櫻井]

お世話になります。

WingReport Version2.0J
VisualBasic5.0でアプリケーションの開発をしています。

VisualBasicでﾌﾟﾛｼﾞｪｸﾄﾌｧｲﾙを実行した時には
印刷又はプレビュー表示が正しく行われるのですが、
Exeﾌｧｲﾙを作成し、それを実行した場合に
印刷及びプレビューされないものが出てきました。

ｺﾝﾊﾟｲﾙ方法等を変えて幾度か試してみましたが、
どれも同じ結果になりました。
他に何か原因として考えられる事ありましたら
ご教授頂きたく宜しくお願い致します。

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

WingReportご利用いただきまして誠にありがとうございます。

「印刷及びプレビューが行われない」との事ですが、エラーは
発生しているのでしょうか？また、発生しているとしたらエラー
番号をお知らせください。

よろしくお願いいたします。

[櫻井]

ご返答頂きありがとうございます。

エラーが発生していないかということで本日調べましたところ、
ご質問差し上げた現象がおきるレポートファイルは５つ程あります。
その内の３つ（同一モジュールより印刷実行してます）については
以下のような内容のエラーメッセージが表示されました。

設定されたプリンタが見つかりません。（ コード = 08050 ）

なお、レポートファイル作成時のプリンタ設定は
「システムの通常使うプリンタで印刷」
を指定しております。

残りの２つにつきましてはメッセージは出ませんでした。
こちらは先程の３つと違い、２ページ目までデザインし
処理に応じて印刷ページを指定してます。
そのあたりになにか原因等あるのでしょうか？

どうぞ宜しくお願いします。

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

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

エラー8050は仕様上レポートロード時に発生する事が有りますが、
今回の現象には直接関係ないと思われます。また、レポート内に
２フォーマットの定義が行われているファイルについても問題な
いと思います。

開発環境でEXEを実行した場合も動作しないのでしょうか？
もし、動作しないようであれば大変お手数ですが、印刷を行って
いる部分だけで結構ですので、support@swg.co.jpまでソースを
お送りください。弊社にて確認させていただきます。

以上です。よろしくお願いいたします。

[櫻井]

ご返答頂きありがとうございます。
先程、ソースコードをメールで送らせて頂きました。

尚、開発環境でExeを実行しても同様の現象が発生します。

どうぞ宜しくお願い致します。

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

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

ソースのを拝見させていただきました。
気になるところが１点ほどありましたので、下記の通り修正してテ
ストをお願いできないでしょうか？

関数：
　　PageFeed

修正箇所：
　　If wrPrint(hReport, lRepPage, “”) = False Then

　　・第２パラメータへ関数の引数であるLong値を指定されていま
　　　すが、下記の様に変更してみてください。

　　Dim lnPage(0) as long

　　lnPage(0) = lRepPage
　　lnPage(1) = 0

　　If wrPrint(hReport, lnPage(0), “”) = False Then

　　※第２パラメータは配列の先頭を指定するようにしてください

以上です。よろしくお願いいたします。

[櫻井]

お世話になります。
メールの方、確認させて頂きました。ありがとうございました。

ご指摘頂いた点について修正しテストしましたところ、
開発環境上では Exeファイル実行時においても
印刷及びプレビューが実行されるようになりました。
他のモジュールにつきましても修正するよう
考えております。

ですが、他のPCへセットアップを行い実行致しましたところ
やはり同様の現象が発生致しました。
エラー内容につきましても先日お話致しましたものと
同様のメッセージが表示されます。

その他、考えられる原因及び対処方法等ございましたら
ご教授いただけますようどうぞ宜しくお願い致します。

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

お世話になります。

先日お伺いしたエラー8050は、レポートに設定されているプリンタ
ー（モードにかかわらず必ず設定されています）が、システムに登
録されていないので、デフォルトのプリンターに置き換えを行った
場合に発生しますが、LoadReport時はエラーとしては報告されず
に処理を続行します。ただし、エラーの表示モードが「印刷エンジ
ンで表示」と設定されている場合は表示されてしまいます。
印刷処理を行う上で、印刷方法を「指定したプリンタで印刷」を利
用する場合にのみ問題が発生するのではないかと思います。

現状、他の端末で不具合が発生しているとのことですが、印刷処理
において全て正常に処理が行われているのでしょうか？

　１．LoadReport
　２．OpenPrinter
　３．Print
　４．ClosePrinter

大変お手数ですが、不具合の発生しているPCで上記処理が正しく処
理されているか確認をお願いいたします。

以上です。

[櫻井]

お世話になります。

エラーメッセージが出た３つの帳票につきまして、
ご指摘頂いたように各処理が正しく実行されているかどうか
調べましたところ、コーディングに欠陥が見つかりました。
そちらを修正致しましたところ印刷されるようになりました。
大変お騒がせ致しました。

尚、残りの２つにつきましては３月２２日に教えて頂いた通り
コーディングを修正致しましたところ、正しく実行されるように
なりました。

いろいろお手数をおかけ致しました。ありがとうございました。
又何かありました時にはどうぞ宜しくお願い致します。

[投稿者]

投稿