关于ADO连接Access的密码验证问题？？？

Question

在adocontion 第四页
database password

Answer 1

adoconnect.connectstring:=
'...;user=?
password=?
...';

Answer 2

Ado控件的LoginPrompt:=false;
在建立连接字符串的最后一页中有一个DataBase PassWord，输入数据库密码就行了，Provider=Microsoft.Jet.OLEDB.4.0

Answer 3

这样做，肯定行，我已经试通了  ADOConnection1.ConnectionString := 'Provider=Microsoft.Jet.OLEDB.4.0;' +
    'User ID=Admin;' +
    'Data Source=C:\My Documents\db1.mdb;' +
    'Mode=ReadWrite;Extended Properties="";' +
    'Jet OLEDB:System database="";' +
    'Jet OLEDB:Registry Path="";' +
    'Jet OLEDB:Database Password=口令;' +  //HERE
    'Jet OLEDB:Engine Type=5;' +
    'Jet OLEDB:Database Locking Mode=1;' +
    'Jet OLEDB:Global Partial Bulk Ops=2;' +
    'Jet OLEDB:Global Bulk Transactions=1;' +
    'Jet OLEDB:New Database Password="";' +
    'Jet OLEDB:Create System Database=False;' +
    'Jet OLEDB:Encrypt Database=False;' +
    'Jet OLEDB:Don''t Copy Locale on Compact=False;' +
    'Jet OLEDB:Compact Without Replica Repair=False;' +
    'Jet OLEDB:SFP=False';

Answer 4

简单点的方法是
ADOConnection1.ConnectionString := 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\My Documents\db1.mdb;Jet OLEDB:Database Password=123'
也就可以了