投稿日 | : 2006/04/28(Fri) 10:54 |
投稿者 | : たかやん |
Eメール | : 000@myad.jp |
URL | : |
タイトル | : アクセスを開く時のダイアログを消したい!? |
いつもお世話になっております。
下記の内容にて悩んでおります。ご存知の方は是非ともご教授をお願いいたします。
まずは開発環境なのですが
XP pro SP2
オフィス 2003
VB6.0 SP6
アクセスにてprint.mdbと言うファイルを作成して
その中のレポートにtagと言う名前のレポートを用意してあります。
VB側から下記の内容でレポートを印刷させようとするのですが、
どうしてもアクセスファイルを開く時のダイアログ
「キャンセル」「開く」「詳細」
の画面が一度出て、開くをクリックすると印刷が開始され
アクセスは開かずにVB側に戻ります。
このアクセスのダイアログを開かずに印刷だけ行う方法を知りたいのです・・・
料金がかかってもいいので、お忙しい中大変恐縮ですが、ご教授をお願いいたします。
Private Sub Command1_Click()
Dim obj As Access.Application
Dim sz_ReportID As String
Set obj = GetObject(App.Path & "\print.mdb")
obj.DoCmd.OpenReport "tag"
obj.Quit
Set obj = Nothing
End sub
他にもデザイナを使ってなど挑戦中で、そちらは今現在余白設定が出来ないくらい
で他に問題はないのですが、どちらかスムーズに設定出来た方を採用しようかと検討
しております。
是非よろしくお願いいたします。