v 1.0.1: Fix error when value for database property is Null

Author: josef-poetzl

.gitignore

@@ -5,6 +5,7 @@
 # Ignore Microsoft Access database binary files (Build these from source)
 *.accda
 *.accdb
+*.accde
 *.mdb
 
 # Ignore database lock files
@@ -21,3 +22,6 @@ vcs-index.json
 # Ignore log files generated by the VCS Add-in
 # Comment out the following line if you wish to include log files in git.
 *.log
+
+# Zip files
+*.zip

source/modules/AddInConfiguration.cls

@@ -253,7 +253,9 @@ ExitHere:
 
 HandleErr:
    If Err.Number = 3270 Then
-      PropDb.Containers("Databases").Documents("SummaryInfo").Properties.Append PropDb.CreateProperty(PropertyName, dbText, NewValue)
+      If Len(NewValue) > 0 Then
+         PropDb.Containers("Databases").Documents("SummaryInfo").Properties.Append PropDb.CreateProperty(PropertyName, dbText, NewValue)
+      End If
       Resume ExitHere
    End If
 

source/modules/_config_Application.bas

@@ -17,7 +17,7 @@ Option Compare Text
 Option Explicit
 
 'Version number
-Private Const APPLICATION_VERSION As String = "1.0.0.250128"
+Private Const APPLICATION_VERSION As String = "1.0.1.250301"
 
 Private Const APPLICATION_NAME As String = "ACLib Access Add-in Builder"
 Private Const APPLICATION_FULLNAME As String = "Access-CodeLib - Access Add-in Builder"

source/vcs-options.json

@@ -1,6 +1,6 @@
 {
   "Info": {
-    "AddinVersion": "4.0.37",
+    "AddinVersion": "4.1.0",
     "AccessVersion": "16.0 64-bit"
   },
   "Options": {