我的数据库是动态打开的用opendialog打开  但是有的数据库有密码怎么办  应为要打开的数据库不止一个数据库为access数据库

解决方案 »

  1.   

    你是不是用的OpenDialog打开数据库,然后程序动态连接数据库的
    如果是,那你就在连接数据库的时候判断数据库是否能连上,如果连接失败,弹出一个密码输入窗口让用户输入连接密码再尝试连接
      

  2.   

    嗯!楼上的是一个方法,其实如果客户间都有不同的数据库密码,建示搞个加密文件记录用户间各自的密码,安需读取.
    例如:以下要开启一个ACCESS数据库,密码为:6137042,变量存储了密码,你可以从变量开始着手研究:procedure TForm1.Button3Click(Sender: TObject);
    var
    s:string;
    begin
     s:='6137042';
     if OpenDialog1.Execute then begin
      with ADOConnection1 do begin
        Connected:=false;
        ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source='
                          +OpenDialog1.FileName+
                          ';Persist Security Info=False;Jet OLEDB:Database Password='+s;
        Connected:=true;
      end;
     end;end;