June 1999
Intermediate to advanced
1368 pages
29h 45m
English
Section 6 of the ap_AppInit() function deals solely with handling the repair of the back end if it requires it:
Case apErrDBCorrupted1
'-- Section 6: Backend Corrupted. Repair?
Beep
If MsgBox("The Backend Database is Corrupted." & vbCrLf & _
vbCrLf & "Would you like to log users out and " & _
" attempt to compact/repair it?", vbYesNo + vbCritical, _
"Corrupted Backend!") = vbYes Then
DoCmd.OpenForm "ap_CompactDatabase", acForm
Else
flgLeaveApplication = True
End If
End Select
This code hasn't changed from the DAO version.
Note
One big change that has occurred with Jet is that you no longer use Compact and Repair to perform the separate functions. They're combined in the CompactDatabase ...
Read now
Unlock full access