PB 電子会議室

コメント

発言No. 更新日 題名(クリックすると発言内容と関連するコメントが表示されます)
15386 01/05/30 14:23:47 RE(7):PB6.5: WinNT上でプリンタを帳票ごとに切り替える方法 By Miyaku
15373 01/05/29 13:54:56 RE(6):PB6.5: WinNT上でプリンタを帳票ごとに切り替える方法 By きん
15370 01/05/29 12:43:35 RE(5):PB6.5: WinNT上でプリンタを帳票ごとに切り替える方法 By M.M
15367 01/05/29 11:54:39 RE(4):PB6.5: WinNT上でプリンタを帳票ごとに切り替える方法 By Miyaku
15364 01/05/29 11:25:13 RE(3):PB6.5: WinNT上でプリンタを帳票ごとに切り替える方法 By きん
15362 01/05/29 11:00:03 RE(2):PB6.5: WinNT上でプリンタを帳票ごとに切り替える方法 By Miyaku
15357 01/05/29 09:25:37 RE(1):PB6.5: WinNT上でプリンタを帳票ごとに切り替える方法 By きん
15352 01/05/28 20:15:16 PB6.5: WinNT上でプリンタを帳票ごとに切り替える方法 By Miyaku

カテゴリ:スクリプトの記述
日付:2001年05月28日 20:15 発信者:Miyaku
題名:PB6.5: WinNT上でプリンタを帳票ごとに切り替える方法


はじめまして。

WinNT環境で、帳票ごとに出力するプリンタを切り替えたいのですが、
上手くいきません。

どなたか教えてください。お願いします。

現状では、帳票ごとに出力するプリンタ情報をDB上にもっておき、
A帳票を印刷する。とユーザが画面上から選択したら、A帳票がAプリンタより
出力させようとしています。
具体的には、以下の感じで記載しています。

lst_regist_key = \"HKEY_CURRENT_USER\\Software\\Microsoft\\Windows NT\\CurrentVersion\\Devices\"
/*lst_prntr_nnにはDBより取得したプリンタ名をセット*/
lin_err1 = RegistryGet(lst_regist_key, lst_prntr_nn, lst_printer)
If lin_err1 = -1 Then  
 MessageBox(\"エラー\",\"レジストリの取得に失敗\")
ELSE
 lin_err2 = RegistrySet(lst_regist_key, lst_prntr_nn, lst_printer)
 If lin_err2 = -1 THEN
  MessageBox(\"エラー\",レジストリのセットに失敗)
 End If
End If

そして最後にデフォルトのプリンタに戻す
RegistryGet(lst_regist_key, lst_defprin_nn, lst_printer)
RegistrySet(lst_regist_key, lst_defprin_nn, lst_printer)



付加情報:

PowerBuilder Version (記載なし)

Client SoftWare

OS Windows NT 4.0
DBMS Oracle SQL*Net 8
Browser (記載なし)

Server SoftWare

OS (記載なし)
DBMS Oracle 8.0
WebServer (記載なし)

PowerSpaceの運営は、パワーフューチャー株式会社が行っております。
Copyright © 2013 Power Future Co., Ltd.