OKWAVEのAI「あい」が美容・健康の悩みに最適な回答をご提案!
-PR-
締切り
済み

VB6.0でパスワードのかかったAccsessを開く

  • すぐに回答を!
  • 質問No.138530
  • 閲覧数255
  • ありがとう数1
  • 気になる数0
  • 回答数1
  • コメント数0

お礼率 25% (4/16)

VB6.0を使って簡単なプログラムを作成しているのですが、
アクセスのレポートをプログラムから使用したいため下の関数を作りました。ところが、今扱いたいDBがパスワードがかかっているため、毎回パスワードを聞かれてしまいます。どうにかパスワードをプログラムから引き渡せないでしょうか?
Public Function usrAccessRpt(strRptName As String, intMode As Integer) As Integer
On Local Error GoTo usrAccessRpt_Err

Dim AccessAp As New Access.Application

'データベースファイルのOPEN
AccessAp.OpenCurrentDatabase App.Path & "\db1.mdb", False

'レポート出力
If intMode = acViewNormal Then
AccessAp.DoCmd.OpenReport strRptName, acViewNormal
AccessAp.CloseCurrentDatabase
Else
AccessAp.DoCmd.Maximize
AccessAp.DoCmd.OpenReport strRptName, acViewPreview
AccessAp.Visible = True
End If

Exit Function

usrAccessRpt_Err:
usrAccessRpt = 1
End Function
通報する
  • 回答数1
  • 気になる
    質問をブックマークします。
    マイページでまとめて確認できます。

回答 (全1件)

  • 回答No.1
レベル13

ベストアンサー率 59% (729/1235)

以下の所に情報があるようです 保護された Access データベースを開く場合に GetObject 関数を使用する例は、Office 2000 Developer CD-ROM の ODETools\V9\Samples\OPG\Samples\CH04 サブフォルダに含まれる Automating&IDE.doc の modSetObjVariable モジュールにあります。 ...続きを読む
以下の所に情報があるようです

保護された Access データベースを開く場合に
GetObject 関数を使用する例は、Office 2000 Developer CD-ROM の
ODETools\V9\Samples\OPG\Samples\CH04 サブフォルダに含まれる
Automating&IDE.doc の modSetObjVariable モジュールにあります。

http://www.microsoft.com/JAPAN/developer/library/odeopg/deconcreatingobjectvariabletoautomateanotherofficeapplication.htm
補足コメント
hide_ud

お礼率 25% (4/16)

回答ありがとうございます。
Office2000がプロフェッショナル版のため、サンプルモジュールを見ることは出来ませんでしたが、ここでの表記内容に関してはりかいできましたm(__)m
ところが、今回のセキュリティーで扱っているパスワードはデータベースパスワードなのですが、起動時オプションで指定できるパスワードがどうやらアカウントパスワードのみのようでした(><;)
ご回答いただいたのにまことに申し訳ありませんが、データベースパスワードという条件で何かよい解決さくはございませんでしょうか・・・(T▽T)
投稿日時 - 2001-09-20 23:03:23
このQ&Aのテーマ
このQ&Aで解決しましたか?
関連するQ&A
-PR-
-PR-
こんな書き方もあるよ!この情報は知ってる?あなたの知識を教えて!
このQ&Aにはまだコメントがありません。
あなたの思ったこと、知っていることをここにコメントしてみましょう。

その他の関連するQ&A、テーマをキーワードで探す

キーワードでQ&A、テーマを検索する
-PR-
-PR-
-PR-

特集


いま みんなが気になるQ&A

関連するQ&A

-PR-

ピックアップ

-PR-
ページ先頭へ