//备份 if CopyFile(pachar('c:\数据库.mdb'),pachar('c:\数据库备份.mdb'), false) then showmessage('备份成功!') else showmessage('备份失败!'); //还原 此处写先断开数据库连接的代码... if CopyFile(pachar('c:\数据库备份.mdb'),pachar('c:\数据库.mdb'), false) then showmessage('还原成功!') else showmessage('还原失败!');
if CopyFile(pachar('c:\数据库.mdb'),pachar('c:\数据库备份.mdb'), false) then
showmessage('备份成功!')
else
showmessage('备份失败!'); //还原
此处写先断开数据库连接的代码...
if CopyFile(pachar('c:\数据库备份.mdb'),pachar('c:\数据库.mdb'), false) then
showmessage('还原成功!')
else
showmessage('还原失败!');