diff --git a/GBM/Managers/mgrCommon.vb b/GBM/Managers/mgrCommon.vb index 111b753..b7b65e2 100644 --- a/GBM/Managers/mgrCommon.vb +++ b/GBM/Managers/mgrCommon.vb @@ -250,7 +250,9 @@ Public Class mgrCommon 'Sub Folders For Each di As DirectoryInfo In oFolder.GetDirectories - lSize += GetFolderSize(di.FullName) + If Not ((di.Attributes And FileAttributes.ReparsePoint) = FileAttributes.ReparsePoint) Then + lSize += GetFolderSize(di.FullName) + End If Next Catch 'Do Nothing @@ -273,6 +275,8 @@ Public Class mgrCommon Return FormatString(mgrCommon_MB, Math.Round(lSize / 1048576, 2)) Case >= 1024 Return FormatString(mgrCommon_KB, Math.Round(lSize / 1024, 2)) + Case >= 0 + Return FormatString(mgrCommon_B, lSize) End Select Return lSize diff --git a/GBM/My Project/Resources.Designer.vb b/GBM/My Project/Resources.Designer.vb index db68857..2b37815 100644 --- a/GBM/My Project/Resources.Designer.vb +++ b/GBM/My Project/Resources.Designer.vb @@ -4636,6 +4636,15 @@ Namespace My.Resources End Get End Property + ''' + ''' Looks up a localized string similar to [PARAM] B. + ''' + Friend ReadOnly Property mgrCommon_B() As String + Get + Return ResourceManager.GetString("mgrCommon_B", resourceCulture) + End Get + End Property + ''' ''' Looks up a localized string similar to An error has occured writing the text file.[BR][BR][PARAM]. ''' diff --git a/GBM/My Project/Resources.resx b/GBM/My Project/Resources.resx index a1fac24..180eebc 100644 --- a/GBM/My Project/Resources.resx +++ b/GBM/My Project/Resources.resx @@ -1789,4 +1789,7 @@ A game with this exact process and parameter already exists. + + [PARAM] B + \ No newline at end of file