连adoconnection

Question

mdbpath:=extractfilepath(application.Exename)+'wygl.mdb';
  constr:='Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin Data Source='+ mdbpath;+
  +'Mode=Share Deny None;'
  'Extended Properties="";'
  'Jet OLEDB:System database="";'+
  'Jet OLEDB:Registry Path="";'+
  'Jet OLEDB:Database Password="";'+
  '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+#39+t Copy Locale on Compact=False;'+
  'Jet OLEDB:Compact Without Replica Repair=False;'+
  'Jet OLEDB:SFP=False;'
请帮忙

Answer 1

你都沒提問題, 就要人回答???mdbpath;+
  +'Mode=Share Deny None;'
修改如下:
mdbpath;+
  + ';Mode=Share Deny None;'

Answer 2

不会吧，你连个MDB要这么麻烦！
 connect.ADOConnection1.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+ExtractFilePath(Application.ExeName)+'Papi.mdb;Mode=ReadWrite;Persist Security Info=False'   ;
      connect.ADOConnection1.Connected:=true;这样就行了！

Answer 3

(转载)解决ADO连接带密码的ACCESS数据库问题  
                     解决ADO连接带密码的ACCESS数据库问题
　　　　　　　　　　　　　　　　　高红岩(ghyghost)　　笔者近日在写ADO连接带密码的ACCESS数据库时，当connected:=true;时，总是出现密码不对的对话框，最终
在研究了TADOConnection.ConnectionString的内容创建过程时得到灵感，现与大家分享。
　　1，新建Project。
　　2，在FORM中放入ADOConnection,ADOQuery,DataSource,Datagrid控件。
　　3，双击ADOConnection控件，然后点击Build...按钮，在“提供者”页中选择“Microsoft Jet 4.0 OLE DB 
　　Provider”，然后点击“下一步”按钮，在“连接”页中选择要连接的Access数据库的路径和数据库的文件
名，这时如果点“测试连接”按钮时，出现“初始化提供者时发生错误，测试连接失败，密码无效”的错误提示。
　　4，这时点“所有”页，然后双击“Jet OLEDB:Database Password”，出现对话框，添入密码后，选择“连
接”页中的“测试连接”按钮，出现“测试连接成功”的对话框。把ADOConnection控件的LoginPromtp设为false.
　　5，设置连接完成。