请问数据库用Access，但不用ODBC连，不知怎么弄？（只有这么多分了，全部献上）

Question

请问数据库用Access，但不用ODBC连，不知怎么弄？是不是像做网页一样写上路径，还是请各位大虾指导一下？在程序中怎么写？

Answer 1

var
  sconstr:string;//连接字符
  sdbpath:string;//路径
  smm:string;
begin
  smm:='gggggggggg';//密码
  try
    G_StrExePath:=ExtractFilePath(Application.ExeName);//应用程序路径
    sdbpath:=G_StrExePath+'AA67.bmq';
    sconstr:='Provider=Microsoft.Jet.OLEDB.4.0;'+
           'User ID=Admin;Data Source='+sdbpath+';'+
           'Mode=Share Deny None;Extended Properties="";'+
           'Locale Identifier=2052;Persist Security Info=False;'+
           'Jet OLEDB:System database="";Jet OLEDB:Registry Path="";'+
           'Jet OLEDB:Database Password='+smm+';'+
           'Jet OLEDB:Engine Type=5;Jet OLEDB:Database Locking Mode=0;'+
           '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';
    if DM1.ADOCn1.Connected = True then DM1.ADOCn1.Connected:=False;
    DM1.ADOCn1.ConnectionString:=sconstr;
    DM1.ADOCn1.Connected:=True;
  except
    Application.MessageBox('无法连接数据库！','错误',MB_OK+MB_ICONSTOP);
    Halt;
  end;end;

Answer 2

ado直接连接上去，字符串自动生成不用你写的

Answer 3

那ADO怎么连啊，具体用到哪几个控件？请高手指点？

Answer 4

ADOConnection(双击后build连接字符串)
ADOTable/ADOQuery具体的看看书或帮助了

Answer 5

ADOConnection、ADOTable、ADOQuery都可直接连接ACCESS数据库。你可根据需要选择控件。然后设置ConnectionString，并使Connected:=True;

Answer 6

ADOConnection、ADOTable、ADOQuery随便托其中的一个到窗体。
选中他，在object inspector窗口奠基connectionstring,
按照默认，点击build.
选择Microsoft jet 4.0 ole db provider 或者（3.5,根据access版本定)
点击下一步，选择access文件。
测试以下，确定如果你还不会，我也没招了。

Answer 7

强烈支持  flyforlove(为情飞) ，这是对的，老兄照着做就行了！

Answer 8

测试通过了，可是我在别一个窗体上只放了一个ADOTable，没放ADOConnection，但我却USES它了，可这个ADOTable的Connection属性里找不到这个ADOConnection,这是为什么啊？？？

Answer 9

放adotable的这个窗体要uses放adoconnection得那个窗体。
然后connection属性里就可以选择了。