用ADO连接Access,Access密码怎样设置,ADO连接又怎样设置?

Question

我用ADO连接Access,我的Access设置数据库密码时,我的ADO如何设置连接?
如果我的Access在用户与组的权限设置密码后,ADO又如何设置?
我按我的思路设置后连接不上Access,谁有这方面经验请帮我个忙,先谢谢了

Answer 1

应该一样的
procedure TForm1.FormCreate(Sender: TObject);
begin
try
adoconnection1.ConnectionString:='Provider=SQLOLEDB.1;Password=tietong;Persist Security Info=True;password=000;User ID=tietong;Initial Catalog=master;Data Source=HITEE00';
  adoconnection1.Connected:=true;
except
  msg.showmessage('SQL SERVER数据库连接失败！');
end;
end;

Answer 2

转贴：
解决ADO连接带密码的ACCESS数据库问题
　　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，设置连接完成。

Answer 3

上面的有误
应该一样的
procedure TForm1.FormCreate(Sender: TObject);
begin
try
adoconnection1.ConnectionString:='Provider=SQLOLEDB.1;Password=tietong;Persist Security Info=True;User ID=tietong;Initial Catalog=master;Data Source=HITEE00';
  adoconnection1.Connected:=true;
except
  msg.showmessage('SQL SERVER数据库连接失败！');
end;
end;

Answer 4

ADOQuery1.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;
                             Data Source='+MyPath+'mdb\人事管理.mdb;
                             Jet OLEDB:Database Password='+MyPassW+';
                             Persist Security Info=False';
其中MyPath和MyPass是全局变量，分别代表数据库的路径和密码
当然密码可以直接输入:'123'

Answer 5

with ADOConnection1 do
  begin
    ConnectionString := 'Provider = MicroSoft.jet.OLEDB.4.0;'+
                        'Persist Security Info = False;'+
                        'Data Source=D:\*.mdb;'+//数据库本地目录
                        'Mode = ReadWrite;'+
                        'Jet OLEDB:Database Password=*****;'// 加入密码
    Connected := True;//Open DataBase
  end;

Answer 6

TO: soaringsouth(栈桥捉鳖)
谢谢你的答案,我如何给你分!
我第一次发表,不知那里给分的.