Removed some unused code
This commit is contained in:
@@ -161,12 +161,6 @@ Public Class mgrRestore
|
|||||||
Return slRemovedItems
|
Return slRemovedItems
|
||||||
End Function
|
End Function
|
||||||
|
|
||||||
Private Sub CleanFolder(ByVal sExtractPath As String)
|
|
||||||
If Directory.Exists(sExtractPath) Then
|
|
||||||
|
|
||||||
End If
|
|
||||||
End Sub
|
|
||||||
|
|
||||||
Public Function CheckRestorePrereq(ByVal oBackupInfo As clsBackup, ByVal bCleanFolder As Boolean) As Boolean
|
Public Function CheckRestorePrereq(ByVal oBackupInfo As clsBackup, ByVal bCleanFolder As Boolean) As Boolean
|
||||||
Dim sHash As String
|
Dim sHash As String
|
||||||
Dim sExtractPath As String
|
Dim sExtractPath As String
|
||||||
@@ -198,8 +192,8 @@ Public Class mgrRestore
|
|||||||
End If
|
End If
|
||||||
End If
|
End If
|
||||||
|
|
||||||
'Check file integrity
|
'Check file integrity
|
||||||
If oSettings.CheckSum Then
|
If oSettings.CheckSum Then
|
||||||
If oBackupInfo.CheckSum <> String.Empty Then
|
If oBackupInfo.CheckSum <> String.Empty Then
|
||||||
sHash = mgrHash.Generate_SHA256_Hash(sBackupFile)
|
sHash = mgrHash.Generate_SHA256_Hash(sBackupFile)
|
||||||
If sHash <> oBackupInfo.CheckSum Then
|
If sHash <> oBackupInfo.CheckSum Then
|
||||||
|
|||||||
Reference in New Issue
Block a user