DBｇｒｉｄにパスワード付ｍｄｂのデータを表示するには？ (ID:125476)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 Private cn As ADODB.Connection Private rs As ADODB.Recordset Set cn = New ADODB.Connection cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" _ & "Data Source= ".mdbファイルの場所" cn.Properties("Jet OLEDB:Database Password") = "パスワードを書く" cn.Open Set rs = New ADODB.Recordset rs.ActiveConnection = cn rs.Source = "SQLを書く" rs.CursorType = adOpenStatic rs.LockType = adLockReadOnly rs.Properties("IRowsetIdentity") = True rs.Open Set DataGrid1.DataSource = rs