求购delphi连接access数据库的ado连接字符串

Question

var
st:string;
begin
st:='Provider=Microsoft.Jet.OLEDB.4.0;';
st:=st+'Password="";'
st:=st+'Data Source=D:\program\p_temp\2\jskh.mdb;';
st:=st+'Persist Security Info=True'
adoconnection1.connectionstring:=st;
adoconnectionq.connected:=true;
end;

Answer 1

放一个TADOCONNECTION，然后连好，COPY，呵呵，搞定。

Answer 2

const
  ADOString = 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=%s;'+
                        'Jet OLEDB:Database Password=''''';
.....
ConnectionString:=Format(AdoString,['c:\temp\mmm.mdb']);

Answer 3

Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\db1.mdb;Persist Security Info=False