Results 1 to 2 of 2
  1. #1
    Join Date
    Jul 2002

    Unanswered: conversion from Access 97 to 2000

    I have a Access 97 database that contains the following VBA code:

    Sub initDatabase()

    Dim tbl As TableDef
    Dim db As Database
    Dim myName As String

    Dim Msg, Style, Title, Response
    Set db = CurrentDb()
    For Each tbl In db.TableDefs
    myName = tbl.Name
    Select Case myName
    Case "MSysACEs"
    Case "MSysIMEXColumns"
    Case "MSysIMEXSpecs"
    Case "MSysModules"
    Case "MSysModules2"
    Case "MSysObjects"
    Case "MSysQueries"
    Case "MSysRelationships"
    Case Else
    db.TableDefs.Delete tbl.Name
    End Select
    End Sub

    This db has now been updated to Access 2000 and whenever I try to start run the macro that runs the VBA code above I get the Error Msg 3211 which tells me that the MSysAccessObjects is in use by anothet process or user (It can't be another user since I am the only user).

    Anybody know why my code does not work in 2000 - it works perfectly in 97.

  2. #2
    Join Date
    Nov 2001

    Your code attempted to delete MSysAccessObjects system table, which is used by MS Access itself.


Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts