关于AdoConnection的动态连接数据库？

Question

你可以把访问服务器的名称， 用户，及密码写到.ini文件里， 或者是注册表里， 在连接的时候读取出来。 送给adoconnection的  constring.属性

Answer 1

动态设置它的ConnectionString就行了:
  ACntMain.ConnectionString := 'Provider=Microsoft.Jet.OLEDB.4.0;' +
    'User ID=Admin;' +
    'Data Source=' + ExtractFilePath(Application.ExeName) + 'data\dqx.mdb;' +
    'Mode=ReadWrite;Extended Properties="";' +
    'Jet OLEDB:System database="";' +
    'Jet OLEDB:Registry Path="";' +
    'Jet OLEDB:Database Password=administrator;' +
    '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';