VB6.0用掲示板の過去のログ(No.2)−VBレスキュー(花ちゃん)
[記事リスト] [新規投稿] [新着記事] [ワード検索] [管理用]

投稿日： 2006/05/24(Wed) 12:32
投稿者： root
Ｅメール：
ＵＲＬ：
タイトル： VBからのACCESSレポート印刷について

はじめましてrootといいます
今、VB6＋ACCESS2000で帳票を作成しているのですが
少しばかりわからないところがありまして、よろしかったらご教授願います

VB側からレポートを開いた時に、VBのプロパティ？の中に入っている内容を
指定したACCESSのレポートの詳細に表示したいのですが
このようなことは可能なのでしょうか？

例えば、事前にaccess側のレポートにtextboxまたはlabelを貼り付けておいて
VBからレポートを開いた時、その事前に設置しておいたレポートのtextboxなどに
VB側のtextbox.textに書き込まれている内容を表示
みたいなことです

ネットを参考に、色々組み合わせ
以下のようなのコードを考えたのですが、どうにも動かず困っております
たぶん、突込みどころが満載かと思いますが…

　　Set oleAccess = Nothing
    Set oleAccess = New Access.Application
    oleAccess.OpenCurrentDatabase DbName, False
    
    'Accessのレポートをデザインで開く
        oleAccess.DoCmd.OpenReport ReportName, acDesign
        'レポートの設定部分
        oleAccess.Reports!(ReportName)![txtKyaku].ControlSource = "='&Form1.txtN
ame.Text & "'"
        'レポートに設定情報を保存して閉じる
        oleAccess.DoCmd.Close acReport, ReportName, acSaveYes
　　　　'プレビュー表示
        oleAccess.DoCmd.OpenReport ReportName, acPreview
        oleAccess.DoCmd.Maximize
        oleAccess.Visible = True

イメージとしてはACCESSのtxtkyakuというtextboxにVBのtxtnameに表示されてる内容を表示したい
と
そのようなことです

- 関連一覧ツリー （★ をクリックするとツリー全体を一括表示します）
- 返信フォーム （この記事に返信する場合は下記フォームから投稿して下さい）

- VBレスキュー(花ちゃん) - - Web Forum -