试试这个:
ADOConnection1.connectionString:=' Provider=Microsoft.Jet.OLEDB.4.0;Password="";'+
'User ID=admin;Data Source='+
ExtractFileDir(Application.ExeName) + 'xxx.mdb;'+
'Mode=Share Deny None;Extended Properties="";'+
'Locale Identifier=1028;Jet OLEDB:System database="";'+
'Jet OLEDB:Registry Path="";Jet OLEDB:'+
'Database Password="yyyy";Jet OLEDB:Engine Type=5;'+
'Jet OLEDB
atabase 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;';
不懂再问好了。