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

投稿日： 2004/06/16(Wed) 13:51
投稿者： kamurin
Ｅメール： kamurin@hotmail.com
ＵＲＬ：
タイトル： Accessの入って無い環境で

Accessの入っていない環境にインストールした場合に下記の処理でエラーになります。
Accessのインストール以外で解決できないでしょうか？
'Accessファイルを開く
    Set oleAccess = Nothing
    Set oleAccess = New Access.Application
    oleAccess.OpenCurrentDatabase DbName, False
    
    'Accessのレポートを開く
    Select Case PrintMode
    Case 0    'Preview
        oleAccess.DoCmd.OpenReport ReportName, acPreview
        oleAccess.DoCmd.Maximize
        oleAccess.Visible = True
    Case 1    'Print
        oleAccess.DoCmd.OpenReport ReportName, acNormal
        oleAccess.CloseCurrentDatabase
        Set oleAccess = Nothing
    Case Else
        MsgBox "モードが誤っています。", vbOKOnly, "AcPrint Ver.1.1"
        oleAccess.CloseCurrentDatabase
        Set oleAccess = Nothing
        AcPrint = False
    End Select

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

- Web Forum -