Database information for file: C:\Users\john2\Documents\Work\MDBDoc\mdbdoc165\mdbdoc.mda, created 05/06/2021 16:19:55

Key data
SettingValue
Application name:MDB Doc
Is it compiled?False
Does it have a broken reference?False

Contents

Contents

Database Properties
NameTypeValue
NameMemoC:\Users\john2\Documents\Work\MDBDoc\mdbdoc165\mdbdoc.mda
ConnectMemo
TransactionsYes/NoTrue
UpdatableYes/NoTrue
CollatingOrderLong Integer1033
QueryTimeoutLong Integer60
VersionMemo4.0
RecordsAffectedSingle0
ReplicaIDGUID
DesignMasterIDGUID
ConnectionEmpty
AccessVersionString08.50
BuildSingle467
AppTitleStringMDB Doc
StartUpShowDBWindowYes/NoTrue
StartUpShowStatusBarYes/NoTrue
AllowShortcutMenusYes/NoTrue
AllowFullMenusYes/NoTrue
AllowBuiltInToolbarsYes/NoTrue
AllowToolbarChangesYes/NoTrue
AllowBreakIntoCodeYes/NoTrue
AllowSpecialKeysYes/NoTrue
Show Values LimitSingle1000
Show Values in IndexedSingle1
Show Values in Non-IndexedSingle1
Show Values in RemoteSingle0
Track Name AutoCorrect InfoSingle0
Perform Name AutoCorrectSingle0
CpgConversionSingle1252
ProjVerLong Integer140
Auto CompactSingle0
Show Values in SnapshotSingle1
Show Values in ServerSingle0
Use Default Page FolderSingle0
Use Default Connection FileSingle0
Row LimitSingle10000
ANSI Query ModeSingle0
UseAppIconForFrmRptYes/NoFalse
NavPane ClosedSingle0
NavPane WidthSingle215
NavPane CategorySingle0
NavPane View BySingle0
NavPane Sort BySingle1
Show Navigation Pane Search BarSingle0

Click here to return to the contents list

Tables


MDB Doc is configured to not display USys tables

Click here to return to the contents list

Table Details

Queries

There are no queries in this database.

Click here to return to the contents list

Forms

Information about forms within this database
NameCreatedLast UpdatedHas ModuleRecord SourceDescription
frmMdbdocStartup30/06/2001 18:48:3424/10/2003 20:47:50TruefrmMdbdocStartup description
frmPreferences09/12/2003 21:11:3220/10/2007 20:29:16TrueUSysMDBDocPreferencesForm for amending preferences

Click here to return to the contents list

Reports

There are no reports in this database.

Click here to return to the contents list

Modules

Ordinary and Class Modules

Details of the ordinary and class modules within this database
NameCreatedLast UpdatedTypeNo. LinesDescription
mdbdclsFileHandle08/07/2001 20:46:2025/10/2003 14:36:06Class Module122Class module encapsulating file I/O routines
modDocumenter08/07/2001 20:46:1228/07/2001 14:54:30Normal Module1788Functions pertaining to documenting various aspects of the database.
modGlobalConstants15/10/2007 20:00:4820/10/2007 20:39:56Normal Module50Constant values used throughout the code cross modules.
modPreferences10/12/2003 16:11:5020/10/2007 20:39:33Normal Module127Routines related to user preferences.
modRegistry13/10/2007 14:27:5013/10/2007 18:36:30Normal Module23Module including Registry handling code routines

Click here to return to the contents list

Code routines within the module mdbdclsFileHandle
PrototypeNo. LinesDescription
Public Property Get Filename() As String2Filename Get property - retrieves "Filename" property.
Public Property Let Filename(fname As String)2Filename Let property - allows it to be set.
Public Property Get FileMode() As String2FileMode Get property - allows it to be retrived
Private Property Get Filenumber() As Integer2FileNumber property - allows it to be retrieved.
Private Property Let Filenumber(num As Integer)2FileNumber property - allows it to be set.
Public Property Let FileMode(mode As String)4FileMode property - allows it to be set. Includes basic validation.
Public Function OpenFile()12Function to open file.
Public Function WriteData(data As String)6Function to write data to the file. Includes validation to stop it being written to a closed file, or one opened for read only access.
Public Function ReadData() As String8Function to read data from a file and return it.
Public Function CloseFile()3Function to close a file.
Private Sub Class_Initialize()3Initialise feature for the class - will set things up as class is initialised.
Public Function IsOpen() As Boolean2Function to determine if a file is open or not.
Private Sub Class_Terminate()2Function to tidy up on closing down the class.
Public Function AtEOF() As Boolean2Function to determine if the file is at the end of the file.

Code routines within the module modDocumenter
PrototypeNo. LinesDescription
Public Function mdbdProcessDatabase(strFilename As String) As Boolean885Function that does the bulk of the processing.
Private Function mdbdGetPropertyType(prp As DAO.Property) As String48Returns descriptive property type given supplied property.
Private Function mdbdGetFieldType(fld As DAO.Field, intSize As Integer) As String67Returns descriptive field type from supplied field.
Private Function mdbdGetQueryType(qry As DAO.QueryDef) As String43Returns descriptive query type.
Private Function mdbdGetTableType(tdf As DAO.TableDef) As String38Returns descriptive table type.
Private Function mdbdGetRelType(rel As DAO.Relation) As String29Returns descriptive relationship type.
Private Function mdbdIsPK(tdf As DAO.TableDef, fld As DAO.Field) As Boolean23Returns True/False depending whether a specific field is part of a specific tables primary key.
Private Function mdbdGetDescription(obj As Object) As String13Returns the Description property of an object.
Public Function StartMDBDoc() As Boolean12Function called from Addins menu to start MDB Doc running.
Private Function mdbdListCodeBlocks(mdl As Module, outfile As mdbdclsFileHandle) As String142Provides a list of code blocks within a module and writes them to an output file.
Private Sub mdbdCloseObjects()26This sub closes any open objects prior to running
Public Function mdbdReplace2(Expression As String, Find As String, Replace As String, Optional Start As Long = 1) As String36Replace2 function taken from Tek-Tips database used for search/replace of special characters with their escape sequences.
Public Function mdbdReplaceSpecialChars(strInputString As String) As String19This function replaces special punctuation characters with their HTML escape equivalent
Private Function LoadStylesheets(clsfh As mdbdclsFileHandle, strHaltOnError As String) As Integer61This function loads the stylesheet specified in the preferences and writes the meta tag in the header.
Public Function StartLocalPreferences() As Boolean11Function called from Addins menu to start MDB Doc running.
Private Function GetGuidDescription(strGuid As String, strMajorVersion As String, strMinorVersion As String) As String16This function returns the string description of a specific GUID and version number.
Public Function FormatSQL(strSQL As String, blnNewlinePerField As Boolean) As String144SQL Formatting function for Access VBA, J Barnett, Oct 2007.
Private Function LoadRibbons(clsfh As mdbdclsFileHandle, strHaltOnError As String) As Integer66
Public Function PrepareSavefile()24Function to prepare the common dialog in Save file mode. Used by the button on the startup form.
Private Function getIndexFields(indx As DAO.Index)9Function to retrieve string list of fields in an index


Code routines within the module modPreferences
PrototypeNo. LinesDescription
Public Function mdbdGetPreference(strPreferenceName As String) As String37This function will retrieve the specified local preference from the preferences table. If there isn't one, it will retrieve it from the global prefs table.
Public Function mdbdLoadPreferences() As Integer53This function will retrieve the preferences from the preferences table and load them into an array.

Code routines within the module modRegistry
PrototypeNo. LinesDescription
Public Function RegKeyRead(i_RegKey As String) As String14Retrieve registry key value from WMI on current computer (the . in the GetObject call)

Click here to return to the contents list

Form Modules

Code routines within the module Form_frmMdbdocStartup
PrototypeNo. LinesDescription
Private Sub cmdAbout_Click()6Event Handler for About Button on the Startup form.
Private Sub cmdCancel_Click()2Event handler for Cancel button on MBD Doc startup form.
Private Sub cmdProcess_Click()26Event handler for Process button on MBD Doc startup form.
Private Sub cmdSelect_Click()7Event handler for "Select File" button on MBD Doc startup form.
Private Sub Form_Open(Cancel As Integer)29Form Open event - sets up form with default output location and checks that database is not in MDE format.
Private Sub txtOutputFile_AfterUpdate()6Checks to disable the "Process" button if the txtOutputfile text box is empty.
Private Function mdbdIsMDE(db As DAO.Database) As Boolean19Function to determine if a particular database is in MDE format or not.
Private Sub cmdPreferences_Click()13Sub to open the preferences form.
Private Function SetOutputFilename() As String47Function to generate the default output filename, based on the database name and the user preferences.

Code routines within the module Form_frmPreferences
PrototypeNo. LinesDescription
Private Sub cmdClose_Click()2Close button event handler
Private Sub Form_BeforeUpdate(Cancel As Integer)11Preferences screen updates to check whether current item contains contains a null (or not) value.
Private Sub Form_Close()5Form close event handler - it forces reloading of the preference data on form closing
Private Sub Form_Current()6Form current record event handler, making preference value read only (or not) depending on CanOverride preference.
Private Sub Form_Load()5Form Load event handler - sets form caption and title lable.

Click here to return to the contents list

Report Modules

There are no report modules in this database.

Click here to return to the contents list

Macros

There are no macros in this database.

Click here to return to the contents list

Relationships

There are no relationships in this database.

Click here to return to the contents list

Command Bars

Please note that MDB Doc only displays information about custom command bars.

There are no custom command bars in this database.

Click here to return to the contents list

Data Access Pages

There are no Data Access Pages in this database.

Click here to return to the contents list

References

Details of VBA references within this database
NameFull PathReference Broken
Visual Basic For ApplicationsC:\PROGRA~2\COMMON~1\MICROS~1\VBA\VBA7.1\VBE7.DLLFalse
Microsoft Access 15.0 Object LibraryC:\Program Files (x86)\Microsoft Office\Office15\MSACC.OLBFalse
Microsoft Office 15.0 Object LibraryC:\Program Files (x86)\Common Files\Microsoft Shared\OFFICE15\MSO.DLLFalse
OLE AutomationC:\Windows\SysWOW64\stdole2.tlbFalse
Microsoft DAO 3.6 Object LibraryC:\Program Files (x86)\Common Files\Microsoft Shared\DAO\dao360.dllFalse
Microsoft Visual Basic for Applications Extensibility 5.3C:\Program Files (x86)\Common Files\Microsoft Shared\VBA\VBA6\VBE6EXT.OLBFalse

Click here to return to the contents list

Ribbons

There are no ribbons in this database

Click here to return to the contents list

Import/Export Specifications

There are no Import/Export Specifications in this database.

Click here to return to the contents list