آوردن تاریخ در Backup

[farideh_en]

باسلام
من از بانک اطلاعاتیم که access هست Backup میگیرم میخواستم بدونم چطور می شه پشتیبان گیری از یه بانک اطلاعاتی رو طوری تنظیم بکنیم که مثلا اسم فایل Backup رو بصورت تلفیقی از زمان و تاریخ ایجاد Backup قرار بده، می خوام طوری Backup بگیره که هر بار یه فایل جدیدی با یک نام گذاری مشخص ( ترکیبی از زمان و تاریخ ایجاد Backup ) بوجود بیاره .
با تشکر

[Valadi]

شما توسط کامپونت فارسی کاری را انجام بده که شاخه به اسم تاریخ هم روز بساز

[davoodmz]

با سلام
کدهاش در سایت موجود است لطفاً جستجو کنید و اگر سوال داشتید بپرسید

باتشکر
داود

[shima_r]

باسلام
من از بانک اطلاعاتیم که access هست Backup میگیرم میخواستم بدونم چطور می شه پشتیبان گیری از یه بانک اطلاعاتی رو طوری تنظیم بکنیم که مثلا اسم فایل Backup رو بصورت تلفیقی از زمان و تاریخ ایجاد Backup قرار بده، می خوام طوری Backup بگیره که هر بار یه فایل جدیدی با یک نام گذاری مشخص ( ترکیبی از زمان و تاریخ ایجاد Backup ) بوجود بیاره .
با تشکر
اگه هنوز مشکلت حل نشده بگو تا یه نمونه کد برات بفرستم.

[farideh_23301]

سلام دوست عزیز ممنون میشم راهنماییم کنین.

[shima_r]

یه کد شبیه چیزی که برات می نویسم باید بنویسی امیدوارم به دردت بخوره دوست عزیز


var
st11,pathback,d1,d2,d3,d,saat,s1,s2,s3:string;
begin
d:=date;
d1 := copy(d,0,4);
d2 := copy(d,6,2);
d3 := copy(d,9,2);
saat:=TimeToStr(time);
s1 := copy(saat,0,2);
s2 := copy(saat,4,2);
s3 := copy(saat,7,2);
st11 := d1+d2+d3+'-'+s1+s2+s3;
//ShowMessage(st11);
if Length(Edit1.Text)= 3 then
pathback:=DirectoryListBox1.Directory + st11 + '.bak'
else
pathback:=DirectoryListBox1.Directory +'\'+ st11 + '.bak';
try
Dm.ADOConnection1.Execute('backup database to disk = '''+pathback+''' ');
MessageDlg('ÚãáíÇÊ ÔÊíÈÇä íÑí ÈÇ ãæÝÞíÊ ÇäÌÇã ÔÏ',mtInformation,[mbOK],0);
except
MessageDlg('ÚãáíÇÊ ÔÊíÈÇä íÑí ÈÇ Ô˜ÓÊ ãæÇÌå ÔÏ',mtError,[mbOK],0);
end;