今回は、MS(マイクロソフト)のAccessで設定しているパスワードの設定及び解除をAccessVBAから行う方法を紹介します。 このモジュールの使用用途としては、遠隔地にあるMDBファイルのパスワードを定期的に再設定したいなどに役に立ちます。このモジュールによりパスワードを一旦解除して、再度設定すると言った具合です。 ◆サンプルコード(解除) 下記のモジュールはパスワードを「解除する」方法で紹介していますが、「PASSWORD」と「OLD_PASSWORD」の値を入れ替えれば、パスワード設定になります。 Private Function SetPassword() As Boolean Dim DB As Database Dim DBDst As Database Dim RS As Recordset Dim cDataBase As String Dim cConnect As S