На данном сайте нашел код для резервного копирования БД, но его нужно немного подкорректировать.
Как можно в данном коде прописать свой путь, куда нужно резервировать БД? Как сделать, чтобы копия заменялась по верх старой?

Option Compare Database

Public Declare Function CopyFileAPI Lib "kernel32.dll" Alias "CopyFileA" (ByVal ИмяФайлаЧтоКопируем As String, ByVal ИмяФайлаКудаКопируем As String, ByVal НадоЛиПоВерх As Long) As Long

Function CreateBackup()
Dim strSourse As String
Dim strTarget As String
strSourse = CurrentProject.FullName
strTarget = CurrentProject.Path & "\" & Format(Now(), "mmddyyhhmmss") & "_" & CurrentProject.Name

If CopyFileAPI(CurrentProject.FullName, strTarget, 1) = 1 Then
    MsgBox ("Создана резервная копия текущей БД в " & strTarget), vbInformation
Else
    MsgBox ("Копия нифига не получилась!"), vbCritical
End If

End Function

http://www.sql.ru/forum/1178819/kod-dlya-rezervnogo-kopirovaniya-bd