delphi+access

Question

用ado连接access，如果access数据库设有密码，怎样用Adoconnection连接呢？

Answer 1

Adoconnection.connectionstring:= '...;Data Source= ....;User=;PassWord=密码;...';
Adoconnection.open;

Answer 2

with ADOConnection1 do
  begin
    ConnectionString := 'Provider = MicroSoft.jet.OLEDB.4.0;'+
                        'Persist Security Info = False'+
                        'Data Source=D:\*.mdb;'+//数据库本地目录
                        'Mode = ReadWrite;'+
                        'Jet OLEDB:Database Password=*****;'// 加入密码
    Connected := True;//Open DataBase
  end;