我使用ADODB对象打开带有密码的Access数据库总是不成功,请高手指教,下面是我得代码
Dim con As New ADODB.Connection
con.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source='" & CommonDialog1.FileName & "';Encrant Password=true;User ID='';Password='werty'"
con.Open
con.close
打开没有密码的Access库成功。