Enhancement for issue #91

This commit is contained in:
MikeMaximus
2017-06-26 10:46:11 -06:00
parent d4210053ad
commit 9386da4a2a
3 changed files with 49 additions and 18 deletions
+11 -4
View File
@@ -238,13 +238,20 @@ Public Class mgrBackup
End While
prs7z.WaitForExit()
If Not CancelOperation Then
If prs7z.ExitCode = 0 Then
Select Case prs7z.ExitCode
Case 0
RaiseEvent UpdateLog(mgrCommon.FormatString(mgrBackup_BackupComplete, New String() {oGame.Name, mgrCommon.FormatDiskSpace(mgrCommon.GetFileSize(sBackupFile))}), False, ToolTipIcon.Info, True)
bBackupCompleted = True
Else
RaiseEvent UpdateLog(mgrCommon.FormatString(mgrBackup_BackupWarnings, oGame.Name), True, ToolTipIcon.Warning, True)
Case 1
RaiseEvent UpdateLog(mgrCommon.FormatString(mgrBackup_7zWarnings, oGame.Name), True, ToolTipIcon.Warning, True)
bBackupCompleted = True
Case 2
RaiseEvent UpdateLog(mgrCommon.FormatString(mgrBackup_7zFatalError, oGame.Name), True, ToolTipIcon.Error, True)
bBackupCompleted = False
End If
Case 7
RaiseEvent UpdateLog(mgrCommon.FormatString(mgrBackup_7zCommandFailure, oGame.Name), True, ToolTipIcon.Error, True)
bBackupCompleted = False
End Select
End If
prs7z.Dispose()
Else
+27 -9
View File
@@ -4456,6 +4456,33 @@ Namespace My.Resources
End Get
End Property
'''<summary>
''' Looks up a localized string similar to [PARAM] backup failed due to a malformed command..
'''</summary>
Friend ReadOnly Property mgrBackup_7zCommandFailure() As String
Get
Return ResourceManager.GetString("mgrBackup_7zCommandFailure", resourceCulture)
End Get
End Property
'''<summary>
''' Looks up a localized string similar to [PARAM] backup failed due to an error..
'''</summary>
Friend ReadOnly Property mgrBackup_7zFatalError() As String
Get
Return ResourceManager.GetString("mgrBackup_7zFatalError", resourceCulture)
End Get
End Property
'''<summary>
''' Looks up a localized string similar to [PARAM] backup completed with warnings..
'''</summary>
Friend ReadOnly Property mgrBackup_7zWarnings() As String
Get
Return ResourceManager.GetString("mgrBackup_7zWarnings", resourceCulture)
End Get
End Property
'''<summary>
''' Looks up a localized string similar to [PARAM] backup completed..
'''</summary>
@@ -4501,15 +4528,6 @@ Namespace My.Resources
End Get
End Property
'''<summary>
''' Looks up a localized string similar to [PARAM] backup finished with warnings or errors..
'''</summary>
Friend ReadOnly Property mgrBackup_BackupWarnings() As String
Get
Return ResourceManager.GetString("mgrBackup_BackupWarnings", resourceCulture)
End Get
End Property
'''<summary>
''' Looks up a localized string similar to You may not have enough disk space available to perform a backup.[BR][BR]Do you want to continue anyway?.
'''</summary>
+8 -2
View File
@@ -1297,8 +1297,8 @@
<data name="mgrBackup_BackupInProgress" xml:space="preserve">
<value>Backup of [PARAM] in progress...</value>
</data>
<data name="mgrBackup_BackupWarnings" xml:space="preserve">
<value>[PARAM] backup finished with warnings or errors.</value>
<data name="mgrBackup_7zWarnings" xml:space="preserve">
<value>[PARAM] backup completed with warnings.</value>
</data>
<data name="mgrBackup_ConfirmManifestConflict" xml:space="preserve">
<value>The manifest shows the backup folder contains a backup for [PARAM] that has not been restored on this computer.[BR][BR]Do you want to overwrite this file anyway?</value>
@@ -1792,4 +1792,10 @@
<data name="mgrCommon_B" xml:space="preserve">
<value>[PARAM] B</value>
</data>
<data name="mgrBackup_7zCommandFailure" xml:space="preserve">
<value>[PARAM] backup failed due to a malformed command.</value>
</data>
<data name="mgrBackup_7zFatalError" xml:space="preserve">
<value>[PARAM] backup failed due to an error.</value>
</data>
</root>