怎样在程序中更改paradox数据库的密码？

Question

问了好长时间也没人知道啊

Answer 1

seeion.removepassword('password');
你再查下帮助。

Answer 2

session的密码和paradox的密码不是一回事把

Answer 3

Adds a password to the current session for accessing encrypted Paradox or dBase tables.Delphi syntax:procedure AddPassword(const Password: String);这下行了吧

Answer 4

转：kevin218曾经回复的贴子：这是我以前写的一个更改口令的程序块，你把新口令设为：空，赋值给变量就可以了
自己参照的看一下，不难procedure TfrmPassword.btnOkClick(Sender: TObject);
begin
   if dmOperator.dataOperator.adoqryOperator.Active then
      dmOperator.dataOperator.adoqryOperator.Close;
   if gPassword=edtOldPassword.Text then
      begin
      usPassword:=edtNewP.Text;
      if usPassword='' then
         showmessage('新口令不允许为空，请输入有效口令')
      else if usPassword=edtNewPok.Text then
           begin
           dmOperator.dataOperator.adoqryOperator.Open;
           dmOperator.dataOperator.adoqryOperator.SQL.Clear;
           dmOperator.dataOperator.adoqryOperator.SQL.Add('update Operator set password='''+usPassword+'''');
           dmOperator.dataOperator.adoqryOperator.SQL.add(' where OperatorId='''+gId+'''');
           dmOperator.dataOperator.adoqryOperator.ExecSQL;
           showmessage('口令更改成功！');
           frmPassword.Close;
           end
           else
           showmessage('请输入确认口令！');
      end
   else
      showmessage('口令出错，请重新输入');end;