Module: Module2

Type: Standard
Lines of Code: 341
Source: ms_access_files\emerald\Modules\Module2.bas

Dependencies

Module Dependencies: - shellApp

Tables Accessed: - the - Immediate

External References: - Shell.Application

Procedures

ExportAllCode

Type: Public Sub
Lines: 43

Calls: ExportTableSchemas, ExportAllCode, BrowseForFolder, ExportMacros, ExportReports, ExportQueries, Tables, ExportModules, ExportForms

ExportAllCodeToFolder

Type: Public Sub
Lines: 25
Parameters: outputFolder As String, Optional includeQueries As Boolean = True

Calls: ExportAllCodeToFolder, ExportTableSchemas, ExportMacros, ExportReports, ExportQueries, ExportModules, ExportForms

ExportModules

Type: Private Function
Lines: 20
Parameters: folderPath As String
Returns: Integer

Calls: ExportModules, SanitizeFileName

Complexity Notes: - ⚠️ Uses On Error Resume Next - ⚠️ Contains GoTo statements

ExportForms

Type: Private Function
Lines: 20
Parameters: folderPath As String
Returns: Integer

Calls: ExportForms, SanitizeFileName

Complexity Notes: - ⚠️ Uses On Error Resume Next - ⚠️ Contains GoTo statements

ExportReports

Type: Private Function
Lines: 20
Parameters: folderPath As String
Returns: Integer

Calls: ExportReports, SanitizeFileName

Complexity Notes: - ⚠️ Uses On Error Resume Next - ⚠️ Contains GoTo statements

ExportMacros

Type: Private Function
Lines: 20
Parameters: folderPath As String
Returns: Integer

Calls: ExportMacros, SanitizeFileName

Complexity Notes: - ⚠️ Uses On Error Resume Next - ⚠️ Contains GoTo statements

ExportQueries

Type: Private Function
Lines: 20
Parameters: folderPath As String
Returns: Integer

Calls: ExportQueries, SanitizeFileName

Complexity Notes: - ⚠️ Uses On Error Resume Next - ⚠️ Contains GoTo statements

ExportTableSchemas

Type: Private Function
Lines: 58
Parameters: folderPath As String
Returns: Integer

Calls: GetFieldTypeName, ExportTableSchemas, SanitizeFileName

Complexity Notes: - ⚠️ Uses On Error Resume Next - ⚠️ Contains GoTo statements

GetFieldTypeName

Type: Private Function
Lines: 26
Parameters: fieldType As Integer
Returns: String

Calls: Unknown, GetFieldTypeName

SanitizeFileName

Type: Private Function
Lines: 17
Parameters: fileName As String
Returns: String

Calls: Replace, invalidChars, UBound, LBound, SanitizeFileName

CreateFolderIfNotExists

Type: Private Sub
Lines: 5
Parameters: folderPath As String

Calls: CreateFolderIfNotExists

Complexity Notes: - ⚠️ Uses On Error Resume Next - ⚠️ Contains GoTo statements

BrowseForFolder

Type: Private Function
Lines: 16
Parameters: prompt As String
Returns: String

Calls: BrowseForFolder, CreateObject