[SqlServer 连接]
//连接Sqlserver上的数据库
ADOCon.ConnectionString := 'Provider=SQLOLEDB.1;'+
'Password=密码;'+
'Persist Security Info=True;'+
'User ID=用户名;'+
'Initial Catalog=数据库名;'+
'Data Source=服务器地址或域名';

[Access 连接]
//读取运行程序当前目录下\data\wlgs.mdb Access数据库文件.
ADOCon.ConnectionString := 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+
ExtractFilePath(Application.ExeName)+
'Data\wlgs.mdb'+
';Persist Security Info=False';

本文固定链接: http://blog.duoday.com/2007/201.html | 奇风's Blog