Help for this page

Select Code to Download


  1. or download this
    #!perl -w

...
    print $Database->{Name}, "\n";
    print $Database->{CurrentProject}->Modules(0)->{Name}, "\n";
}
  2. or download this
    OLE exception from "DAO.TableDefs":

...

Win32::OLE(0.1709) error 0x80020009: "Exception occurred"
    in METHOD/PROPERTYGET "CurrentProject" at getAccessOLE.pl line 27