eslamy
شنبه 04 تیر 1384, 14:33 عصر
سلام
دوستان من یک پروژه دارم که با برنامه نویسی فایل کار میکنه و هنگام اجرا 3 تا فایل میسازه و استادم گقته که برنامه باید قابلیت پشتیبان گیری داشته باشه و بازیابی
من تونستم یک گزینه براش تعریف کنم که این کارو بکنه ولی فقط میتونه فایل اولی را باهاش این کار رو بکنه یعنی مثلا اگر من 3 تا فایل رو درایو سی داشته باشم فقط میتونه اولی را پشتیبان گیری کنه و دومی و سومی نمی تونم اگر میدونید به من کمک کنید خیلی خوشحال میشم
ممنون از همتون
************************************************** ***
کد نویسی برای پشتیبان گیری این هست:
var
Database_File : string;
begin
Database_File := 'c:\personel.dat';
if SaveDialog1.Execute then
CopyFile(PAnsiChar(Database_File),PAnsiChar(SaveDi alog1.FileName),True);
end;
************************************************** ***
بازیابی هم اینه
var
Personel_File : string;
begin
Personel_File := 'C:\personel.dat';
if OpenDialog1.Execute then
CopyFile(PAnsiChar(OpenDialog1.FileName),PAnsiChar (Personel_File),False);
end;
************************************************** ***
اما فقط 1 فایل رو پشتیبان میگیره و برمیگردونه اگر کسی کد نویسی صحیح رو بلده بزاره
ممنونش میشم
:)
دوستان من یک پروژه دارم که با برنامه نویسی فایل کار میکنه و هنگام اجرا 3 تا فایل میسازه و استادم گقته که برنامه باید قابلیت پشتیبان گیری داشته باشه و بازیابی
من تونستم یک گزینه براش تعریف کنم که این کارو بکنه ولی فقط میتونه فایل اولی را باهاش این کار رو بکنه یعنی مثلا اگر من 3 تا فایل رو درایو سی داشته باشم فقط میتونه اولی را پشتیبان گیری کنه و دومی و سومی نمی تونم اگر میدونید به من کمک کنید خیلی خوشحال میشم
ممنون از همتون
************************************************** ***
کد نویسی برای پشتیبان گیری این هست:
var
Database_File : string;
begin
Database_File := 'c:\personel.dat';
if SaveDialog1.Execute then
CopyFile(PAnsiChar(Database_File),PAnsiChar(SaveDi alog1.FileName),True);
end;
************************************************** ***
بازیابی هم اینه
var
Personel_File : string;
begin
Personel_File := 'C:\personel.dat';
if OpenDialog1.Execute then
CopyFile(PAnsiChar(OpenDialog1.FileName),PAnsiChar (Personel_File),False);
end;
************************************************** ***
اما فقط 1 فایل رو پشتیبان میگیره و برمیگردونه اگر کسی کد نویسی صحیح رو بلده بزاره
ممنونش میشم
:)