Backup در Microsoft Access

[Heydari865]

سلام
خدمت دوستان عزیز و دست اندرکاران این مجموعه
لطفا در مورد پشتیبان گیری و بازیابی اطلاعات در Access راهنمایی فرمایید
میخوام از داخل خود برنامه این کار انجام شود چگونه می توان این کار را انجام داد؟
با تشکر از دوستان وعزیزانی که با اطلاعات ذیقیمت خود ما را راهنمایی می کنند.

[payam59]

در اکسس 2003 گزینه backup database گنجانده شده است.

[Heydari865]

ممنون آقا پیام از راهنماییتون
چون اغلب برنامه هام با 2000 هست برا همین اگه کسی لطف کنه و برا 2000 توضیح بده ممنون میشم
در ضمن یه نمونه کد دارم اما کاربردی و کاملترشو میخواستم
نمونه کد برای Backup

Function forbakup()
DoCmd.Hourglass True
If Dir("d:\A\001.bak") <> "" Then
Kill ("A\001.bak")
End If
DBEngine.CompactDatabase "E:\B\001.mdb", "d:\A\001.bak.bak"
DoCmd.Hourglass False
MsgBox "backup"
End Function
ببخشید مث اینکه چپ به راست شد

[شاپرک]

من یه چیزی پیدا کردم ببینید به دردتون میخوره