请教 ADO 的大问题

Question

CONNECTIONSTRING:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source=e:\xsgl1.mdb;jet OLEDB:Database Password=111111'

Answer 1

改用ODBC连接
open('odbc名',user,数据库密码)

Answer 2

我是想用ado 直接连,要是用ODBC那我就用BDE了，谢谢

Answer 3

在向导的所有签里设jet OLEDB:Database Password为你的密码

Answer 4

用ODBC吧，
不然我没有办法

Answer 5

可能是大小写的问题：
".....;Jet  OLEDB:Database Passord=12345";
       ^大写J

Answer 6

你用啊ADO连接ACCESS数据库，不使用ODBC吗？

Answer 7

var s:string;with ADOConnection1 do
  Begin
    Connected:=false;
    S:='Provider=Microsoft.Jet.OLEDB.4.0;Password="";User ID=Admin;Data Source="'+ExtractFilePath(application.exename);
    S:=S+'data\database.mdb";Mode=Share Deny None;Extended Properties="";';
    S:=S+'Jet OLEDB:System database="";Jet OLEDB:Registry Path="";Jet OLEDB:Database Password="";Jet OLEDB:Engine Type=5;';
    S:=S+'Jet OLEDB:Database Locking Mode=1;Jet OLEDB:Global Partial Bulk Ops=2;Jet OLEDB:Global Bulk Transactions=1;';
    S:=S+'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';
    ConnectionString:=S;
    Connected:=true;
end;//其中有密码的地方加入密码。