| 戻る |
|
DAO を使用してパスワードプロテクトされている
Access データベースに接続します。
OpenDatabase メソッドの connect 引数に "
;pwd=パスワード " を指定します。
「参照設定」で [Microsoft DAO 3.5 Object Library] に参照します。
Private Sub cmdDAO_Click() ' DAOを使用してパスワードを指定する Dim db As DAO.Database Set db = DBEngine.OpenDatabase("C:\My Documents\db1.mdb", _ False, False, ";pwd=mypassword") db.Close End Sub |
||||
©2000 VBMANIA All rights reserved.