Added new export field for issue #109

GBM/Classes/XML Serialize Classes/ExportInformation.vb

@@ -1,5 +1,6 @@
 Public Class ExportInformation
     Private dExported As Int64
+    Private iTotalConfigs As Integer
     Private iAppVer As Integer
 
     Property Exported As Int64
@@ -11,6 +12,15 @@
         End Get
     End Property
 
+    Property TotalConfigurations As Integer
+        Set(value As Integer)
+            iTotalConfigs = value
+        End Set
+        Get
+            Return iTotalConfigs
+        End Get
+    End Property
+
     Property AppVer As Integer
         Set(value As Integer)
             iAppVer = value
@@ -22,11 +32,13 @@
 
     Public Sub New()
         dExported = 0
+        iTotalConfigs = 0
         iAppVer = 0
     End Sub
 
-    Public Sub New(ByVal dInitExported As Int64, ByVal iInitAppVer As Integer)
+    Public Sub New(ByVal dInitExported As Int64, ByVal iInitTotalConfigs As Integer, ByVal iInitAppVer As Integer)
         dExported = dInitExported
+        iTotalConfigs = iInitTotalConfigs
         iAppVer = iInitAppVer
     End Sub
 End Class