数据库路径问题

Question

 坐了个数据库备份虽然可以成功备份... 但数据库路径是绝对的....  哪位大侠帮改成动态相对的路径path:='F:\bysj\data\xqwy.mdb';
 CopyFile(PChar(path),PChar(SaveDialog1.FileName+'.mdb'),True);

Answer 1

自己组织路径呀，比如ExtractFilePath(Application.ExeName)+'data\my.mdb'

Answer 2

如果你的数据库不在工程路径下,可以在当前目录下写个配制文件(用ini就可以),数据库路径从ini中读取

Answer 3

path:=基准目录+相对路径;
CopyFile(PChar(path),PChar(SaveDialog1.FileName+'.mdb'),True);