请问如何设定数据库的相对路径？

Question

谢谢！

Answer 1

如用ADO的话，可在ADOCONNECTION中设置。

Answer 2

一般是这样定的
procedure TForm1.Button1Click(Sender: TObject);
var
  spath : String;
begin
  sPath := ExtractFilePath(Application.ExeName) + 'db1.mdb';
  adotable1.ConnectionString := 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=' + sPath + ';Persist Security Info=False';
end;

Answer 3

当然: 上一层目录可把spath改为'..\db1.mdb';
      下一层目录可把spath改为'子目录\db1.mdb';