出現問題的代碼如下：
=======================================================
procedure TForm5.SpeedButton13Click(Sender: TObject);
var
MBWJ,HYWJ:string;
Data : String;
begin
IF not FileExists(Edit10.Text) then //檢查還原資料庫的目標檔案是否存在
begin
showmessage('請選擇要還原的備份檔案');
exit;
end;
if application.MessageBox('確認要還原嗎,建議先備份當前資料？','提示',mb_okcancel)=idok then
begin
MBWJ:=Edit10.Text; //用來還原資料庫的備份檔案路徑
HYWJ:=Edit11.Text; //系統當前資料庫的路徑
TRY
//======================
FORM6.Timer1.Enabled:=true;
FORM6.Label1.Caption:='正在恢復資料，請稍候. . . . . . ';
FORM6.DATABACKUP:=2;
FORM6.Update;
//==========================
CopyFile(PChar(MBWJ), PChar(HYWJ), FALSE); //把之前備份的檔案覆寫當前的資料庫
//===============
FORM6.Show;
FORM6.Update;
FORM6.BACKUPPBAR(MBWJ,HYWJ);
//==================
showmessage('成功恢復！系統5秒后重新進入！');
WinExec('restart.exe',1);
Application.Terminate;
except
showmessage('恢復資料失敗，請重試!');
end;
end;
end;
//========================================================
以上代碼運行之前路徑是形式: 【C:\Users\AAAAAA\BBBBBB\DATA\XXXXXX.DAT】 (XXXXXX.DAT是資料庫檔案)。
但當運行備份資料庫之后，路徑竟變成了【C:\Users\AAAAAA\BBBBBB\備份目錄\DATA\XXXXXX.DAT】。
現在問：如何回傳備份之前的路徑呢？
uj5u.com熱心網友回復：
單步除錯。留意是不是相對路徑導致的。uj5u.com熱心網友回復：
請貼出FORM6.Update;
FORM6.BACKUPPBAR(MBWJ,HYWJ);
代碼。
轉載請註明出處，本文鏈接：https://www.uj5u.com/houduan/58227.html
標籤：數據庫相關