O'Reilly logo

F. Scott Barker's Microsoft® Access 2000 Power Programming by F. Scott Barker

Stay ahead with the world's most comprehensive technology and business learning platform.

With Safari, you learn the way you learn best. Get unlimited access to videos, live online training, learning paths, books, tutorials, and more.

Start Free Trial

No credit card required

TESTING AND REPAIRING CORRUPTED JET BACK-END DATABASES

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 ...

With Safari, you learn the way you learn best. Get unlimited access to videos, live online training, learning paths, books, interactive tutorials, and more.

Start Free Trial

No credit card required