tagCANDY CGI VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板 [ツリー表示へ]   [Home]
一括表示(VB6.0)
タイトルNewpageとEndDocについて(VB6)
記事No12943
投稿日: 2008/08/22(Fri) 10:19
投稿者向井
以下のようなプログラムを作成しました。
------------------------
Printer.print "1ページ目"
Printer.NewPage
Msgbox "次の用紙をセットして下さい。"

Printer.print "2ページ目"
Printer.NewPage
Msgbox "次の用紙をセットして下さい。

Printer.print "3ページ目"
Printer.NewPage
Msgbox "次の用紙をセットして下さい。
Printer.EndDoc
------------------------
次のページを印刷する前に用紙をセットしてもらうような仕組みです。
開発環境、テスト環境ともに印刷が行われた後、
メッセージボックスが表示され、動作に問題はなかったのですが、
実際に納品後、「Printer.EndDoc」が走らないと、
印刷が開始されないという現象にあたりました。
おそらく、「Printer.EndDoc」が走らないと印刷が開始されないのが、
正しい動作だとは思うのですが、
自分の環境では「Printer.NewPage」で印刷が開始されてしまいました。
過去ログ等調べたのですが、明確な原因が分かりません。

どなたか分かる方がおりましたら、レスお願いします。

[ツリー表示へ]
タイトルRe: NewpageとEndDocについて(VB6)
記事No12944
投稿日: 2008/08/22(Fri) 10:26
投稿者魔界の仮面弁士
# 試せる環境に無いので、気になった点だけ列挙。


> 自分の環境では「Printer.NewPage」で印刷が開始されてしまいました。

実行環境と開発環境で、同じプリンタドライバを使用していますか?

また、スプール設定は以下のいずれにしてありましたか?

・全ページ分のデータをスプールしてから、印刷データをプリンタに送る
・すぐに印刷データをプリンタに送る
・プリンタに直接印刷データを送る

[ツリー表示へ]
タイトルRe^2: NewpageとEndDocについて(VB6)
記事No12945
投稿日: 2008/08/22(Fri) 10:34
投稿者向井
> # 試せる環境に無いので、気になった点だけ列挙。
>
>
> > 自分の環境では「Printer.NewPage」で印刷が開始されてしまいました。
>
> 実行環境と開発環境で、同じプリンタドライバを使用していますか?
>
> また、スプール設定は以下のいずれにしてありましたか?
>
> ・全ページ分のデータをスプールしてから、印刷データをプリンタに送る
> ・すぐに印刷データをプリンタに送る
> ・プリンタに直接印刷データを送る

素早いレスありがとうございます。助かります。
大事なことを書き忘れました。
使用しているプリンタ(ドットプリンタ、EPSON VP4300)
プリンタドライバは同じです。
ただ、プリンタドライバのバージョンは未確認です。
また、プリンタドライバの設定も同じです。
「すぐに印刷データをプリンタに送る」になっております。
考えられるのは、詳しくわからないので、おかしなことを書いてるかもしれませんが、
VB6の使用するDLLだったり等、と思っております。

[ツリー表示へ]
タイトルRe^3: NewpageとEndDocについて(VB6)
記事No12946
投稿日: 2008/08/22(Fri) 16:06
投稿者花ちゃん
> VB6の使用するDLLだったり等、と思っております。

今回の件とは関係ないかもしれませんが、印刷関係は、サービスパックで影響
される分も多々あります。
実行環境のVBのランタイム等のサービスパック状況はどのようになっていますか?

 http://www.hanatyan.sakura.ne.jp/patio/read.cgi?mode=view2&f=103&no=2

[ツリー表示へ]
タイトルRe^4: NewpageとEndDocについて(VB6)
記事No12963
投稿日: 2008/08/25(Mon) 15:10
投稿者花ちゃん
今、他の件で検索していたら下記のような記事が見つかりました。

FIX:印刷ジョブの間、ページ設定は変更できません。
http://support.microsoft.com/kb/180645/ja

Msgbox の表示をコメントにして試して見たらどうなりますか?

[ツリー表示へ]
タイトルRe^5: NewpageとEndDocについて(VB6)
記事No12971
投稿日: 2008/08/28(Thu) 11:23
投稿者向井
> 今、他の件で検索していたら下記のような記事が見つかりました。
>
> FIX:印刷ジョブの間、ページ設定は変更できません。
> http://support.microsoft.com/kb/180645/ja
>
> Msgbox の表示をコメントにして試して見たらどうなりますか?

返信ありがとうございます。
返事が遅くなって大変申し訳ありません。

VBのサービスパックは何も当たっていない状態です。
開発環境とクライアントのランタイムは一致していない可能性もあります。

>Msgbox の表示をコメントにして試して見たらどうなりますか?

特に変わりませんでした。やはり開発環境ではNewPageで印刷が開始されてしまいます。
印刷関係はサービスパックで影響される部分も大きいということで、
ランタイムのバージョンが開発環境とクライアントで異なっているためだと思います。

今回はどのランタイムがどのバージョンでどのように変わったかについては調べませんが、
勉強になりました。

魔界の仮面弁士 さん、花ちゃんさん、重ねてお礼申し上げます。

[ツリー表示へ]
タイトルRe^6: NewpageとEndDocについて(VB6)
記事No12972
投稿日: 2008/08/28(Thu) 12:10
投稿者花ちゃん
> 今回はどのランタイムがどのバージョンでどのように変わったかについては調べませんが、
> 勉強になりました。
>
> 魔界の仮面弁士 さん、花ちゃんさん、重ねてお礼申し上げます。

それで肝心の問題は解決されたのでしょうか?

[ツリー表示へ]
タイトルRe^7: NewpageとEndDocについて(VB6)
記事No12983
投稿日: 2008/08/29(Fri) 17:39
投稿者向井
> > 今回はどのランタイムがどのバージョンでどのように変わったかについては調べませんが、
> > 勉強になりました。
> >
> > 魔界の仮面弁士 さん、花ちゃんさん、重ねてお礼申し上げます。
>
> それで肝心の問題は解決されたのでしょうか?

多少強引かもしれませんが、NewPageをEndDocにすることによって対応しました。
ネットで調べたところ、EndDocにするとページが順番に印字されないなど、
問題もあるようですが、今回に関してはいえば、運用レベルで問題なかったので、
そのようにしました。

[ツリー表示へ]