Compare commits
53 Commits
| Author | SHA1 | Date | |
|---|---|---|---|
|
|
6d0db7c075 | ||
|
|
e3f5c7e3c0 | ||
|
|
ba1fc76ebe | ||
|
|
6de58dc977 | ||
|
|
5e0e1a543f | ||
|
|
7254b6b501 | ||
|
|
f117e7fbaa | ||
|
|
d46bc38bdc | ||
|
|
a092c1b44f | ||
|
|
77b5efbe02 | ||
|
|
7a93fd799b | ||
|
|
4108ec36d7 | ||
|
|
87f93ed4f5 | ||
|
|
18befc19b3 | ||
|
|
bfe2346e8a | ||
|
|
9cbc2b3240 | ||
|
|
1fab0e0cf4 | ||
|
|
588f51d496 | ||
|
|
77eb164a62 | ||
|
|
58ec4564ae | ||
|
|
8c1f3144f8 | ||
|
|
507984bdf8 | ||
|
|
378377a1a9 | ||
|
|
86ffc75666 | ||
|
|
f312e315b9 | ||
|
|
e567638c0e | ||
|
|
1f9fcca024 | ||
|
|
b68646c97e | ||
|
|
896c77fe11 | ||
|
|
e288c77ba8 | ||
|
|
8b779f6d66 | ||
|
|
ef6e608d30 | ||
|
|
7b524e42fc | ||
|
|
2beff1b46d | ||
|
|
0ad4fd890d | ||
|
|
761fed64cc | ||
|
|
f839793071 | ||
|
|
b8b4c63910 | ||
|
|
ef70c08469 | ||
|
|
45e59f8ae6 | ||
|
|
cb9bab9892 | ||
|
|
7f19ae6345 | ||
|
|
ab240b610c | ||
|
|
6c80094848 | ||
|
|
16649238f0 | ||
|
|
39460f57d5 | ||
|
|
d788c751f7 | ||
|
|
3acb790822 | ||
|
|
0e4f357c01 | ||
|
|
58684bf9a5 | ||
|
|
1d19a49b0e | ||
|
|
94bb4e70ef | ||
|
|
1c493f1d4e |
+60
-3
@@ -7,6 +7,7 @@
|
|||||||
Private bFolderSave As Boolean = False
|
Private bFolderSave As Boolean = False
|
||||||
Private sFileType As String = String.Empty
|
Private sFileType As String = String.Empty
|
||||||
Private bAppendTimeStamp As Boolean = False
|
Private bAppendTimeStamp As Boolean = False
|
||||||
|
Private iBackupLimit As Integer = 2
|
||||||
Private sExcludeList As String = String.Empty
|
Private sExcludeList As String = String.Empty
|
||||||
Private sProcessPath As String = String.Empty
|
Private sProcessPath As String = String.Empty
|
||||||
Private sIcon As String = String.Empty
|
Private sIcon As String = String.Empty
|
||||||
@@ -19,6 +20,16 @@
|
|||||||
Private bTempGame As Boolean = False
|
Private bTempGame As Boolean = False
|
||||||
Private oImportTags As New List(Of Tag)
|
Private oImportTags As New List(Of Tag)
|
||||||
|
|
||||||
|
<Flags()> Public Enum eOptionalSyncFields
|
||||||
|
None = 0
|
||||||
|
GamePath = 1
|
||||||
|
Company = 2
|
||||||
|
Version = 4
|
||||||
|
Icon = 16
|
||||||
|
TimeStamp = 32
|
||||||
|
MonitorGame = 64
|
||||||
|
End Enum
|
||||||
|
|
||||||
Property ID As String
|
Property ID As String
|
||||||
Set(value As String)
|
Set(value As String)
|
||||||
sGameID = value
|
sGameID = value
|
||||||
@@ -44,7 +55,6 @@
|
|||||||
End Get
|
End Get
|
||||||
End Property
|
End Property
|
||||||
|
|
||||||
|
|
||||||
Property Name As String
|
Property Name As String
|
||||||
Set(value As String)
|
Set(value As String)
|
||||||
sGameName = value
|
sGameName = value
|
||||||
@@ -108,6 +118,15 @@
|
|||||||
End Set
|
End Set
|
||||||
End Property
|
End Property
|
||||||
|
|
||||||
|
Property BackupLimit As Integer
|
||||||
|
Get
|
||||||
|
Return iBackupLimit
|
||||||
|
End Get
|
||||||
|
Set(value As Integer)
|
||||||
|
iBackupLimit = value
|
||||||
|
End Set
|
||||||
|
End Property
|
||||||
|
|
||||||
Property ExcludeList As String
|
Property ExcludeList As String
|
||||||
Set(value As String)
|
Set(value As String)
|
||||||
sExcludeList = value
|
sExcludeList = value
|
||||||
@@ -219,15 +238,15 @@
|
|||||||
End Set
|
End Set
|
||||||
End Property
|
End Property
|
||||||
|
|
||||||
Public Function SyncEquals(obj As Object) As Boolean
|
Public Function SyncEquals(obj As Object, eSyncFields As eOptionalSyncFields) As Boolean
|
||||||
Dim oGame As clsGame = TryCast(obj, clsGame)
|
Dim oGame As clsGame = TryCast(obj, clsGame)
|
||||||
If oGame Is Nothing Then
|
If oGame Is Nothing Then
|
||||||
Return False
|
Return False
|
||||||
Else
|
Else
|
||||||
|
'Core Sync Fields
|
||||||
If ID <> oGame.ID Then
|
If ID <> oGame.ID Then
|
||||||
Return False
|
Return False
|
||||||
End If
|
End If
|
||||||
|
|
||||||
If Name <> oGame.Name Then
|
If Name <> oGame.Name Then
|
||||||
Return False
|
Return False
|
||||||
End If
|
End If
|
||||||
@@ -255,6 +274,44 @@
|
|||||||
If Hours <> oGame.Hours Then
|
If Hours <> oGame.Hours Then
|
||||||
Return False
|
Return False
|
||||||
End If
|
End If
|
||||||
|
If MonitorOnly <> oGame.MonitorOnly Then
|
||||||
|
Return False
|
||||||
|
End If
|
||||||
|
|
||||||
|
'Optional Sync Fields
|
||||||
|
If (eSyncFields And eOptionalSyncFields.Company) = eOptionalSyncFields.Company Then
|
||||||
|
If Company <> oGame.Company Then
|
||||||
|
Return False
|
||||||
|
End If
|
||||||
|
End If
|
||||||
|
If (eSyncFields And eOptionalSyncFields.GamePath) = eOptionalSyncFields.GamePath Then
|
||||||
|
If ProcessPath <> oGame.ProcessPath Then
|
||||||
|
Return False
|
||||||
|
End If
|
||||||
|
End If
|
||||||
|
If (eSyncFields And eOptionalSyncFields.Icon) = eOptionalSyncFields.Icon Then
|
||||||
|
If Icon <> oGame.Icon Then
|
||||||
|
Return False
|
||||||
|
End If
|
||||||
|
End If
|
||||||
|
If (eSyncFields And eOptionalSyncFields.MonitorGame) = eOptionalSyncFields.MonitorGame Then
|
||||||
|
If Enabled <> oGame.Enabled Then
|
||||||
|
Return False
|
||||||
|
End If
|
||||||
|
End If
|
||||||
|
If (eSyncFields And eOptionalSyncFields.TimeStamp) = eOptionalSyncFields.TimeStamp Then
|
||||||
|
If AppendTimeStamp <> oGame.AppendTimeStamp Then
|
||||||
|
Return False
|
||||||
|
End If
|
||||||
|
If BackupLimit <> oGame.BackupLimit Then
|
||||||
|
Return False
|
||||||
|
End If
|
||||||
|
End If
|
||||||
|
If (eSyncFields And eOptionalSyncFields.Version) = eOptionalSyncFields.Version Then
|
||||||
|
If Version <> oGame.Version Then
|
||||||
|
Return False
|
||||||
|
End If
|
||||||
|
End If
|
||||||
Return True
|
Return True
|
||||||
End If
|
End If
|
||||||
End Function
|
End Function
|
||||||
|
|||||||
Generated
+42
-14
@@ -36,6 +36,8 @@ Partial Class frmAddWizard
|
|||||||
Me.txtProcessPath = New System.Windows.Forms.TextBox()
|
Me.txtProcessPath = New System.Windows.Forms.TextBox()
|
||||||
Me.lblStep2Intro = New System.Windows.Forms.Label()
|
Me.lblStep2Intro = New System.Windows.Forms.Label()
|
||||||
Me.tbPage3 = New System.Windows.Forms.TabPage()
|
Me.tbPage3 = New System.Windows.Forms.TabPage()
|
||||||
|
Me.lblLimit = New System.Windows.Forms.Label()
|
||||||
|
Me.nudLimit = New System.Windows.Forms.NumericUpDown()
|
||||||
Me.lblStep3Title = New System.Windows.Forms.Label()
|
Me.lblStep3Title = New System.Windows.Forms.Label()
|
||||||
Me.lblStep3Instructions = New System.Windows.Forms.Label()
|
Me.lblStep3Instructions = New System.Windows.Forms.Label()
|
||||||
Me.chkTimeStamp = New System.Windows.Forms.CheckBox()
|
Me.chkTimeStamp = New System.Windows.Forms.CheckBox()
|
||||||
@@ -70,6 +72,7 @@ Partial Class frmAddWizard
|
|||||||
Me.tbPage1.SuspendLayout()
|
Me.tbPage1.SuspendLayout()
|
||||||
Me.tbPage2.SuspendLayout()
|
Me.tbPage2.SuspendLayout()
|
||||||
Me.tbPage3.SuspendLayout()
|
Me.tbPage3.SuspendLayout()
|
||||||
|
CType(Me.nudLimit, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||||
Me.tbPage3a.SuspendLayout()
|
Me.tbPage3a.SuspendLayout()
|
||||||
Me.tbPage4.SuspendLayout()
|
Me.tbPage4.SuspendLayout()
|
||||||
Me.tbPage5.SuspendLayout()
|
Me.tbPage5.SuspendLayout()
|
||||||
@@ -121,8 +124,8 @@ Partial Class frmAddWizard
|
|||||||
Me.lblStep1Instructions.Name = "lblStep1Instructions"
|
Me.lblStep1Instructions.Name = "lblStep1Instructions"
|
||||||
Me.lblStep1Instructions.Size = New System.Drawing.Size(303, 85)
|
Me.lblStep1Instructions.Size = New System.Drawing.Size(303, 85)
|
||||||
Me.lblStep1Instructions.TabIndex = 6
|
Me.lblStep1Instructions.TabIndex = 6
|
||||||
Me.lblStep1Instructions.Text = "The name will be automatically filtered for length and invalid characters. You m" & _
|
Me.lblStep1Instructions.Text = "The name will be automatically filtered for length and invalid characters. You m" &
|
||||||
"ay drag and drop a shortcut here to complete this step, only Windows shortcuts a" & _
|
"ay drag and drop a shortcut here to complete this step, only Windows shortcuts a" &
|
||||||
"re currently supported."
|
"re currently supported."
|
||||||
'
|
'
|
||||||
'txtName
|
'txtName
|
||||||
@@ -205,6 +208,8 @@ Partial Class frmAddWizard
|
|||||||
'tbPage3
|
'tbPage3
|
||||||
'
|
'
|
||||||
Me.tbPage3.BackColor = System.Drawing.SystemColors.Control
|
Me.tbPage3.BackColor = System.Drawing.SystemColors.Control
|
||||||
|
Me.tbPage3.Controls.Add(Me.lblLimit)
|
||||||
|
Me.tbPage3.Controls.Add(Me.nudLimit)
|
||||||
Me.tbPage3.Controls.Add(Me.lblStep3Title)
|
Me.tbPage3.Controls.Add(Me.lblStep3Title)
|
||||||
Me.tbPage3.Controls.Add(Me.lblStep3Instructions)
|
Me.tbPage3.Controls.Add(Me.lblStep3Instructions)
|
||||||
Me.tbPage3.Controls.Add(Me.chkTimeStamp)
|
Me.tbPage3.Controls.Add(Me.chkTimeStamp)
|
||||||
@@ -218,6 +223,26 @@ Partial Class frmAddWizard
|
|||||||
Me.tbPage3.TabIndex = 2
|
Me.tbPage3.TabIndex = 2
|
||||||
Me.tbPage3.Text = "TabPage3"
|
Me.tbPage3.Text = "TabPage3"
|
||||||
'
|
'
|
||||||
|
'lblLimit
|
||||||
|
'
|
||||||
|
Me.lblLimit.AutoSize = True
|
||||||
|
Me.lblLimit.Location = New System.Drawing.Point(203, 109)
|
||||||
|
Me.lblLimit.Name = "lblLimit"
|
||||||
|
Me.lblLimit.Size = New System.Drawing.Size(68, 13)
|
||||||
|
Me.lblLimit.TabIndex = 15
|
||||||
|
Me.lblLimit.Text = "Backup Limit"
|
||||||
|
Me.lblLimit.Visible = False
|
||||||
|
'
|
||||||
|
'nudLimit
|
||||||
|
'
|
||||||
|
Me.nudLimit.Location = New System.Drawing.Point(157, 107)
|
||||||
|
Me.nudLimit.Minimum = New Decimal(New Integer() {2, 0, 0, 0})
|
||||||
|
Me.nudLimit.Name = "nudLimit"
|
||||||
|
Me.nudLimit.Size = New System.Drawing.Size(40, 20)
|
||||||
|
Me.nudLimit.TabIndex = 14
|
||||||
|
Me.nudLimit.Value = New Decimal(New Integer() {2, 0, 0, 0})
|
||||||
|
Me.nudLimit.Visible = False
|
||||||
|
'
|
||||||
'lblStep3Title
|
'lblStep3Title
|
||||||
'
|
'
|
||||||
Me.lblStep3Title.AutoSize = True
|
Me.lblStep3Title.AutoSize = True
|
||||||
@@ -230,32 +255,32 @@ Partial Class frmAddWizard
|
|||||||
'
|
'
|
||||||
'lblStep3Instructions
|
'lblStep3Instructions
|
||||||
'
|
'
|
||||||
Me.lblStep3Instructions.Location = New System.Drawing.Point(14, 116)
|
Me.lblStep3Instructions.Location = New System.Drawing.Point(14, 139)
|
||||||
Me.lblStep3Instructions.Name = "lblStep3Instructions"
|
Me.lblStep3Instructions.Name = "lblStep3Instructions"
|
||||||
Me.lblStep3Instructions.Size = New System.Drawing.Size(303, 42)
|
Me.lblStep3Instructions.Size = New System.Drawing.Size(303, 42)
|
||||||
Me.lblStep3Instructions.TabIndex = 9
|
Me.lblStep3Instructions.TabIndex = 9
|
||||||
Me.lblStep3Instructions.Text = "If you're unsure of exactly which files to backup, make sure Save Entire Folder " & _
|
Me.lblStep3Instructions.Text = "If you're unsure of exactly which files to backup, make sure Save entire folder " &
|
||||||
"is checked. You can also time stamp your backup files to make incremental backu" & _
|
"is checked. You can also choose to save multiple backups and set a limit on how" &
|
||||||
"ps."
|
" many to keep."
|
||||||
'
|
'
|
||||||
'chkTimeStamp
|
'chkTimeStamp
|
||||||
'
|
'
|
||||||
Me.chkTimeStamp.AutoSize = True
|
Me.chkTimeStamp.AutoSize = True
|
||||||
Me.chkTimeStamp.Location = New System.Drawing.Point(139, 87)
|
Me.chkTimeStamp.Location = New System.Drawing.Point(18, 108)
|
||||||
Me.chkTimeStamp.Name = "chkTimeStamp"
|
Me.chkTimeStamp.Name = "chkTimeStamp"
|
||||||
Me.chkTimeStamp.Size = New System.Drawing.Size(122, 17)
|
Me.chkTimeStamp.Size = New System.Drawing.Size(133, 17)
|
||||||
Me.chkTimeStamp.TabIndex = 8
|
Me.chkTimeStamp.TabIndex = 8
|
||||||
Me.chkTimeStamp.Text = "Time Stamp Backup"
|
Me.chkTimeStamp.Text = "Save multiple backups"
|
||||||
Me.chkTimeStamp.UseVisualStyleBackColor = True
|
Me.chkTimeStamp.UseVisualStyleBackColor = True
|
||||||
'
|
'
|
||||||
'chkFolderSave
|
'chkFolderSave
|
||||||
'
|
'
|
||||||
Me.chkFolderSave.AutoSize = True
|
Me.chkFolderSave.AutoSize = True
|
||||||
Me.chkFolderSave.Location = New System.Drawing.Point(17, 87)
|
Me.chkFolderSave.Location = New System.Drawing.Point(18, 87)
|
||||||
Me.chkFolderSave.Name = "chkFolderSave"
|
Me.chkFolderSave.Name = "chkFolderSave"
|
||||||
Me.chkFolderSave.Size = New System.Drawing.Size(113, 17)
|
Me.chkFolderSave.Size = New System.Drawing.Size(109, 17)
|
||||||
Me.chkFolderSave.TabIndex = 7
|
Me.chkFolderSave.TabIndex = 7
|
||||||
Me.chkFolderSave.Text = "Save Entire Folder"
|
Me.chkFolderSave.Text = "Save entire folder"
|
||||||
Me.chkFolderSave.UseVisualStyleBackColor = True
|
Me.chkFolderSave.UseVisualStyleBackColor = True
|
||||||
'
|
'
|
||||||
'btnSaveBrowse
|
'btnSaveBrowse
|
||||||
@@ -352,7 +377,7 @@ Partial Class frmAddWizard
|
|||||||
Me.lblStep3aInstructions.Name = "lblStep3aInstructions"
|
Me.lblStep3aInstructions.Name = "lblStep3aInstructions"
|
||||||
Me.lblStep3aInstructions.Size = New System.Drawing.Size(303, 56)
|
Me.lblStep3aInstructions.Size = New System.Drawing.Size(303, 56)
|
||||||
Me.lblStep3aInstructions.TabIndex = 5
|
Me.lblStep3aInstructions.TabIndex = 5
|
||||||
Me.lblStep3aInstructions.Text = "Choose any file types, specific files or folders you wish to include in the back" & _
|
Me.lblStep3aInstructions.Text = "Choose any file types, specific files or folders you wish to include in the back" &
|
||||||
"up. If you're unsure, go back a step and choose to save the entire folder. "
|
"up. If you're unsure, go back a step and choose to save the entire folder. "
|
||||||
'
|
'
|
||||||
'txtFileTypes
|
'txtFileTypes
|
||||||
@@ -434,7 +459,7 @@ Partial Class frmAddWizard
|
|||||||
Me.lblStep4Instructions.Name = "lblStep4Instructions"
|
Me.lblStep4Instructions.Name = "lblStep4Instructions"
|
||||||
Me.lblStep4Instructions.Size = New System.Drawing.Size(303, 59)
|
Me.lblStep4Instructions.Size = New System.Drawing.Size(303, 59)
|
||||||
Me.lblStep4Instructions.TabIndex = 5
|
Me.lblStep4Instructions.TabIndex = 5
|
||||||
Me.lblStep4Instructions.Text = "Choose any file types, specific files or folders you wish to exclude from the ba" & _
|
Me.lblStep4Instructions.Text = "Choose any file types, specific files or folders you wish to exclude from the ba" &
|
||||||
"ckup. You may choose multiple items to exclude. This step can be skipped."
|
"ckup. You may choose multiple items to exclude. This step can be skipped."
|
||||||
'
|
'
|
||||||
'txtExcludeList
|
'txtExcludeList
|
||||||
@@ -539,6 +564,7 @@ Partial Class frmAddWizard
|
|||||||
Me.tbPage2.PerformLayout()
|
Me.tbPage2.PerformLayout()
|
||||||
Me.tbPage3.ResumeLayout(False)
|
Me.tbPage3.ResumeLayout(False)
|
||||||
Me.tbPage3.PerformLayout()
|
Me.tbPage3.PerformLayout()
|
||||||
|
CType(Me.nudLimit, System.ComponentModel.ISupportInitialize).EndInit()
|
||||||
Me.tbPage3a.ResumeLayout(False)
|
Me.tbPage3a.ResumeLayout(False)
|
||||||
Me.tbPage3a.PerformLayout()
|
Me.tbPage3a.PerformLayout()
|
||||||
Me.tbPage4.ResumeLayout(False)
|
Me.tbPage4.ResumeLayout(False)
|
||||||
@@ -591,4 +617,6 @@ Partial Class frmAddWizard
|
|||||||
Friend WithEvents lblExcludePath As Label
|
Friend WithEvents lblExcludePath As Label
|
||||||
Friend WithEvents lblIncludePathTitle As Label
|
Friend WithEvents lblIncludePathTitle As Label
|
||||||
Friend WithEvents lblExcludePathTitle As Label
|
Friend WithEvents lblExcludePathTitle As Label
|
||||||
|
Friend WithEvents lblLimit As Label
|
||||||
|
Friend WithEvents nudLimit As NumericUpDown
|
||||||
End Class
|
End Class
|
||||||
|
|||||||
@@ -46,6 +46,7 @@ Public Class frmAddWizard
|
|||||||
lblStep3Instructions.Text = frmAddWizard_lblStep3Instructions
|
lblStep3Instructions.Text = frmAddWizard_lblStep3Instructions
|
||||||
chkTimeStamp.Text = frmAddWizard_chkTimeStamp
|
chkTimeStamp.Text = frmAddWizard_chkTimeStamp
|
||||||
chkFolderSave.Text = frmAddWizard_chkFolderSave
|
chkFolderSave.Text = frmAddWizard_chkFolderSave
|
||||||
|
lblLimit.Text = frmAddWizard_lblLimit
|
||||||
btnSaveBrowse.Text = frmAddWizard_btnSaveBrowse
|
btnSaveBrowse.Text = frmAddWizard_btnSaveBrowse
|
||||||
lblStep3Intro.Text = frmAddWizard_lblStep3Intro
|
lblStep3Intro.Text = frmAddWizard_lblStep3Intro
|
||||||
lblIncludePathTitle.Text = frmAddWizard_lblIncludePathTitle
|
lblIncludePathTitle.Text = frmAddWizard_lblIncludePathTitle
|
||||||
@@ -68,6 +69,28 @@ Public Class frmAddWizard
|
|||||||
StepHandler()
|
StepHandler()
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
|
Private Sub ShowHideLimit()
|
||||||
|
If chkTimeStamp.Checked Then
|
||||||
|
nudLimit.Visible = True
|
||||||
|
lblLimit.Visible = True
|
||||||
|
nudLimit.Value = 5
|
||||||
|
Else
|
||||||
|
nudLimit.Visible = False
|
||||||
|
nudLimit.Value = nudLimit.Minimum
|
||||||
|
lblLimit.Visible = False
|
||||||
|
End If
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Function ShowSummaryLimit(ByVal bTimeStamp As Boolean, ByVal iLimit As Integer) As String
|
||||||
|
Dim sLimit As String = String.Empty
|
||||||
|
|
||||||
|
If bTimeStamp Then
|
||||||
|
Return mgrCommon.BooleanYesNo(bTimeStamp) & " (" & iLimit & ")"
|
||||||
|
Else
|
||||||
|
Return mgrCommon.BooleanYesNo(bTimeStamp)
|
||||||
|
End If
|
||||||
|
End Function
|
||||||
|
|
||||||
Private Function StringEmptyText(ByVal sString As String) As String
|
Private Function StringEmptyText(ByVal sString As String) As String
|
||||||
If sString = String.Empty Then
|
If sString = String.Empty Then
|
||||||
Return frmAddWizard_None
|
Return frmAddWizard_None
|
||||||
@@ -81,19 +104,31 @@ Public Class frmAddWizard
|
|||||||
Dim sName As String = txtName.Text
|
Dim sName As String = txtName.Text
|
||||||
Dim sProcessFullPath As String = txtProcessPath.Text
|
Dim sProcessFullPath As String = txtProcessPath.Text
|
||||||
Dim sProcessPath As String = Path.GetDirectoryName(sProcessFullPath)
|
Dim sProcessPath As String = Path.GetDirectoryName(sProcessFullPath)
|
||||||
Dim sProcess As String = Path.GetFileNameWithoutExtension(sProcessFullPath)
|
|
||||||
Dim sProcessSummaryText As String = Path.GetFileName(sProcessFullPath) & " (" & sProcessPath & ")"
|
Dim sProcessSummaryText As String = Path.GetFileName(sProcessFullPath) & " (" & sProcessPath & ")"
|
||||||
Dim sSavePath As String = txtSavePath.Text
|
Dim sSavePath As String = txtSavePath.Text
|
||||||
Dim bIsAbsolute As Boolean = mgrPath.IsAbsolute(sSavePath)
|
Dim bIsAbsolute As Boolean = mgrPath.IsAbsolute(sSavePath)
|
||||||
Dim bFolderBackup As Boolean = chkFolderSave.Checked
|
Dim bFolderBackup As Boolean = chkFolderSave.Checked
|
||||||
Dim bTimeStamp As Boolean = chkTimeStamp.Checked
|
Dim bTimeStamp As Boolean = chkTimeStamp.Checked
|
||||||
|
Dim iLimit As Integer = nudLimit.Value
|
||||||
Dim sFileType As String = txtFileTypes.Text
|
Dim sFileType As String = txtFileTypes.Text
|
||||||
Dim sExcludeList As String = txtExcludeList.Text
|
Dim sExcludeList As String = txtExcludeList.Text
|
||||||
|
Dim sProcess As String
|
||||||
Dim sItem As String()
|
Dim sItem As String()
|
||||||
Dim sItems As String()
|
Dim sItems As String()
|
||||||
Dim sValues As String()
|
Dim sValues As String()
|
||||||
Dim lstItem As ListViewItem
|
Dim lstItem As ListViewItem
|
||||||
|
|
||||||
|
'Handle Process
|
||||||
|
If Path.HasExtension(sProcessFullPath) Then
|
||||||
|
If sProcessFullPath.ToLower.EndsWith(".exe") Then
|
||||||
|
sProcess = Path.GetFileNameWithoutExtension(sProcessFullPath)
|
||||||
|
Else
|
||||||
|
sProcess = Path.GetFileName(sProcessFullPath)
|
||||||
|
End If
|
||||||
|
Else
|
||||||
|
sProcess = Path.GetFileName(sProcessFullPath)
|
||||||
|
End If
|
||||||
|
|
||||||
If Not bIsAbsolute Then
|
If Not bIsAbsolute Then
|
||||||
sSavePath = mgrPath.DetermineRelativePath(sProcessPath, sSavePath)
|
sSavePath = mgrPath.DetermineRelativePath(sProcessPath, sSavePath)
|
||||||
End If
|
End If
|
||||||
@@ -106,7 +141,7 @@ Public Class frmAddWizard
|
|||||||
lstSummary.Columns(1).Width = 210
|
lstSummary.Columns(1).Width = 210
|
||||||
|
|
||||||
sItems = {frmAddWizard_Summary_Name, frmAddWizard_Summary_Process, frmAddWizard_Summary_AbsolutePath, frmAddWizard_Summary_SavePath, frmAddWizard_Summary_FolderSave, frmAddWizard_Summary_Timestamp, frmAddWizard_Summary_Include, frmAddWizard_Summary_Exclude}
|
sItems = {frmAddWizard_Summary_Name, frmAddWizard_Summary_Process, frmAddWizard_Summary_AbsolutePath, frmAddWizard_Summary_SavePath, frmAddWizard_Summary_FolderSave, frmAddWizard_Summary_Timestamp, frmAddWizard_Summary_Include, frmAddWizard_Summary_Exclude}
|
||||||
sValues = {sName, sProcessSummaryText, mgrCommon.BooleanYesNo(bIsAbsolute), sSavePath, mgrCommon.BooleanYesNo(bFolderBackup), mgrCommon.BooleanYesNo(bTimeStamp), StringEmptyText(sFileType), StringEmptyText(sExcludeList)}
|
sValues = {sName, sProcessSummaryText, mgrCommon.BooleanYesNo(bIsAbsolute), sSavePath, mgrCommon.BooleanYesNo(bFolderBackup), ShowSummaryLimit(bTimeStamp, iLimit), StringEmptyText(sFileType), StringEmptyText(sExcludeList)}
|
||||||
|
|
||||||
For i = 0 To sItems.Length - 1
|
For i = 0 To sItems.Length - 1
|
||||||
sItem = {sItems(i), sValues(i)}
|
sItem = {sItems(i), sValues(i)}
|
||||||
@@ -122,7 +157,9 @@ Public Class frmAddWizard
|
|||||||
oGame.FolderSave = bFolderBackup
|
oGame.FolderSave = bFolderBackup
|
||||||
oGame.FileType = sFileType
|
oGame.FileType = sFileType
|
||||||
oGame.AppendTimeStamp = bTimeStamp
|
oGame.AppendTimeStamp = bTimeStamp
|
||||||
|
oGame.BackupLimit = iLimit
|
||||||
oGame.ExcludeList = sExcludeList
|
oGame.ExcludeList = sExcludeList
|
||||||
|
oGame.ProcessPath = sProcessPath
|
||||||
|
|
||||||
Return oGame
|
Return oGame
|
||||||
End Function
|
End Function
|
||||||
@@ -490,6 +527,10 @@ Public Class frmAddWizard
|
|||||||
txtFileTypes.Clear()
|
txtFileTypes.Clear()
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
|
Private Sub chkTimeStamp_CheckedChanged(sender As Object, e As EventArgs) Handles chkTimeStamp.CheckedChanged
|
||||||
|
ShowHideLimit()
|
||||||
|
End Sub
|
||||||
|
|
||||||
Private Sub btnInclude_Click(sender As Object, e As EventArgs) Handles btnInclude.Click
|
Private Sub btnInclude_Click(sender As Object, e As EventArgs) Handles btnInclude.Click
|
||||||
OpenBuilder(frmAddWizard_Include, txtFileTypes)
|
OpenBuilder(frmAddWizard_Include, txtFileTypes)
|
||||||
UpdateBuilderLabel(txtFileTypes.Text, lblFileTypes)
|
UpdateBuilderLabel(txtFileTypes.Text, lblFileTypes)
|
||||||
@@ -499,4 +540,6 @@ Public Class frmAddWizard
|
|||||||
OpenBuilder(frmAddWizard_Exclude, txtExcludeList)
|
OpenBuilder(frmAddWizard_Exclude, txtExcludeList)
|
||||||
UpdateBuilderLabel(txtExcludeList.Text, lblExclude)
|
UpdateBuilderLabel(txtExcludeList.Text, lblExclude)
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
|
|
||||||
End Class
|
End Class
|
||||||
Generated
+208
-137
@@ -28,6 +28,8 @@ Partial Class frmGameManager
|
|||||||
Me.btnBackup = New System.Windows.Forms.Button()
|
Me.btnBackup = New System.Windows.Forms.Button()
|
||||||
Me.btnClose = New System.Windows.Forms.Button()
|
Me.btnClose = New System.Windows.Forms.Button()
|
||||||
Me.grpConfig = New System.Windows.Forms.GroupBox()
|
Me.grpConfig = New System.Windows.Forms.GroupBox()
|
||||||
|
Me.lblLimit = New System.Windows.Forms.Label()
|
||||||
|
Me.nudLimit = New System.Windows.Forms.NumericUpDown()
|
||||||
Me.btnExclude = New System.Windows.Forms.Button()
|
Me.btnExclude = New System.Windows.Forms.Button()
|
||||||
Me.btnInclude = New System.Windows.Forms.Button()
|
Me.btnInclude = New System.Windows.Forms.Button()
|
||||||
Me.txtID = New System.Windows.Forms.TextBox()
|
Me.txtID = New System.Windows.Forms.TextBox()
|
||||||
@@ -61,18 +63,17 @@ Partial Class frmGameManager
|
|||||||
Me.lblHours = New System.Windows.Forms.Label()
|
Me.lblHours = New System.Windows.Forms.Label()
|
||||||
Me.btnTags = New System.Windows.Forms.Button()
|
Me.btnTags = New System.Windows.Forms.Button()
|
||||||
Me.grpStats = New System.Windows.Forms.GroupBox()
|
Me.grpStats = New System.Windows.Forms.GroupBox()
|
||||||
|
Me.cboRemoteBackup = New System.Windows.Forms.ComboBox()
|
||||||
|
Me.lblRestorePathData = New System.Windows.Forms.Label()
|
||||||
|
Me.lblBackupFileData = New System.Windows.Forms.Label()
|
||||||
|
Me.lblLocalBackupData = New System.Windows.Forms.Label()
|
||||||
Me.lblRestorePath = New System.Windows.Forms.Label()
|
Me.lblRestorePath = New System.Windows.Forms.Label()
|
||||||
Me.txtRestorePath = New System.Windows.Forms.TextBox()
|
|
||||||
Me.btnOpenRestorePath = New System.Windows.Forms.Button()
|
Me.btnOpenRestorePath = New System.Windows.Forms.Button()
|
||||||
Me.btnOpenBackupFile = New System.Windows.Forms.Button()
|
Me.btnOpenBackupFile = New System.Windows.Forms.Button()
|
||||||
Me.txtFileSize = New System.Windows.Forms.TextBox()
|
|
||||||
Me.btnDeleteBackup = New System.Windows.Forms.Button()
|
Me.btnDeleteBackup = New System.Windows.Forms.Button()
|
||||||
Me.lblFileSize = New System.Windows.Forms.Label()
|
Me.lblBackupFile = New System.Windows.Forms.Label()
|
||||||
Me.lblSync = New System.Windows.Forms.Label()
|
Me.lblRemote = New System.Windows.Forms.Label()
|
||||||
Me.txtCurrentBackup = New System.Windows.Forms.TextBox()
|
Me.lblLocalData = New System.Windows.Forms.Label()
|
||||||
Me.lblCurrentBackup = New System.Windows.Forms.Label()
|
|
||||||
Me.txtLocalBackup = New System.Windows.Forms.TextBox()
|
|
||||||
Me.lblLastBackup = New System.Windows.Forms.Label()
|
|
||||||
Me.btnMarkAsRestored = New System.Windows.Forms.Button()
|
Me.btnMarkAsRestored = New System.Windows.Forms.Button()
|
||||||
Me.btnRestore = New System.Windows.Forms.Button()
|
Me.btnRestore = New System.Windows.Forms.Button()
|
||||||
Me.btnSave = New System.Windows.Forms.Button()
|
Me.btnSave = New System.Windows.Forms.Button()
|
||||||
@@ -89,13 +90,20 @@ Partial Class frmGameManager
|
|||||||
Me.cmsImport = New System.Windows.Forms.ContextMenuStrip(Me.components)
|
Me.cmsImport = New System.Windows.Forms.ContextMenuStrip(Me.components)
|
||||||
Me.cmsOfficial = New System.Windows.Forms.ToolStripMenuItem()
|
Me.cmsOfficial = New System.Windows.Forms.ToolStripMenuItem()
|
||||||
Me.cmsFile = New System.Windows.Forms.ToolStripMenuItem()
|
Me.cmsFile = New System.Windows.Forms.ToolStripMenuItem()
|
||||||
|
Me.txtQuickFilter = New System.Windows.Forms.TextBox()
|
||||||
|
Me.lblQuickFilter = New System.Windows.Forms.Label()
|
||||||
|
Me.cmsDeleteBackup = New System.Windows.Forms.ContextMenuStrip(Me.components)
|
||||||
|
Me.cmsDeleteOne = New System.Windows.Forms.ToolStripMenuItem()
|
||||||
|
Me.cmsDeleteAll = New System.Windows.Forms.ToolStripMenuItem()
|
||||||
Me.grpConfig.SuspendLayout()
|
Me.grpConfig.SuspendLayout()
|
||||||
|
CType(Me.nudLimit, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||||
Me.grpExtra.SuspendLayout()
|
Me.grpExtra.SuspendLayout()
|
||||||
CType(Me.pbIcon, System.ComponentModel.ISupportInitialize).BeginInit()
|
CType(Me.pbIcon, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||||
CType(Me.nudHours, System.ComponentModel.ISupportInitialize).BeginInit()
|
CType(Me.nudHours, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||||
Me.grpStats.SuspendLayout()
|
Me.grpStats.SuspendLayout()
|
||||||
Me.grpFilter.SuspendLayout()
|
Me.grpFilter.SuspendLayout()
|
||||||
Me.cmsImport.SuspendLayout()
|
Me.cmsImport.SuspendLayout()
|
||||||
|
Me.cmsDeleteBackup.SuspendLayout()
|
||||||
Me.SuspendLayout()
|
Me.SuspendLayout()
|
||||||
'
|
'
|
||||||
'btnAdd
|
'btnAdd
|
||||||
@@ -105,7 +113,7 @@ Partial Class frmGameManager
|
|||||||
Me.btnAdd.Location = New System.Drawing.Point(12, 526)
|
Me.btnAdd.Location = New System.Drawing.Point(12, 526)
|
||||||
Me.btnAdd.Name = "btnAdd"
|
Me.btnAdd.Name = "btnAdd"
|
||||||
Me.btnAdd.Size = New System.Drawing.Size(30, 23)
|
Me.btnAdd.Size = New System.Drawing.Size(30, 23)
|
||||||
Me.btnAdd.TabIndex = 2
|
Me.btnAdd.TabIndex = 4
|
||||||
Me.btnAdd.Text = "+"
|
Me.btnAdd.Text = "+"
|
||||||
Me.btnAdd.UseVisualStyleBackColor = True
|
Me.btnAdd.UseVisualStyleBackColor = True
|
||||||
'
|
'
|
||||||
@@ -116,33 +124,35 @@ Partial Class frmGameManager
|
|||||||
Me.btnDelete.Location = New System.Drawing.Point(48, 526)
|
Me.btnDelete.Location = New System.Drawing.Point(48, 526)
|
||||||
Me.btnDelete.Name = "btnDelete"
|
Me.btnDelete.Name = "btnDelete"
|
||||||
Me.btnDelete.Size = New System.Drawing.Size(30, 23)
|
Me.btnDelete.Size = New System.Drawing.Size(30, 23)
|
||||||
Me.btnDelete.TabIndex = 3
|
Me.btnDelete.TabIndex = 5
|
||||||
Me.btnDelete.Text = "-"
|
Me.btnDelete.Text = "-"
|
||||||
Me.btnDelete.UseVisualStyleBackColor = True
|
Me.btnDelete.UseVisualStyleBackColor = True
|
||||||
'
|
'
|
||||||
'btnBackup
|
'btnBackup
|
||||||
'
|
'
|
||||||
Me.btnBackup.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
Me.btnBackup.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||||
Me.btnBackup.Location = New System.Drawing.Point(616, 525)
|
Me.btnBackup.Location = New System.Drawing.Point(616, 526)
|
||||||
Me.btnBackup.Name = "btnBackup"
|
Me.btnBackup.Name = "btnBackup"
|
||||||
Me.btnBackup.Size = New System.Drawing.Size(75, 23)
|
Me.btnBackup.Size = New System.Drawing.Size(75, 23)
|
||||||
Me.btnBackup.TabIndex = 16
|
Me.btnBackup.TabIndex = 19
|
||||||
Me.btnBackup.Text = "&Backup"
|
Me.btnBackup.Text = "&Backup"
|
||||||
Me.btnBackup.UseVisualStyleBackColor = True
|
Me.btnBackup.UseVisualStyleBackColor = True
|
||||||
'
|
'
|
||||||
'btnClose
|
'btnClose
|
||||||
'
|
'
|
||||||
Me.btnClose.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
Me.btnClose.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||||
Me.btnClose.Location = New System.Drawing.Point(697, 525)
|
Me.btnClose.Location = New System.Drawing.Point(697, 526)
|
||||||
Me.btnClose.Name = "btnClose"
|
Me.btnClose.Name = "btnClose"
|
||||||
Me.btnClose.Size = New System.Drawing.Size(75, 23)
|
Me.btnClose.Size = New System.Drawing.Size(75, 23)
|
||||||
Me.btnClose.TabIndex = 17
|
Me.btnClose.TabIndex = 20
|
||||||
Me.btnClose.Text = "C&lose"
|
Me.btnClose.Text = "C&lose"
|
||||||
Me.btnClose.UseVisualStyleBackColor = True
|
Me.btnClose.UseVisualStyleBackColor = True
|
||||||
'
|
'
|
||||||
'grpConfig
|
'grpConfig
|
||||||
'
|
'
|
||||||
Me.grpConfig.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
Me.grpConfig.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||||
|
Me.grpConfig.Controls.Add(Me.lblLimit)
|
||||||
|
Me.grpConfig.Controls.Add(Me.nudLimit)
|
||||||
Me.grpConfig.Controls.Add(Me.btnExclude)
|
Me.grpConfig.Controls.Add(Me.btnExclude)
|
||||||
Me.grpConfig.Controls.Add(Me.btnInclude)
|
Me.grpConfig.Controls.Add(Me.btnInclude)
|
||||||
Me.grpConfig.Controls.Add(Me.txtID)
|
Me.grpConfig.Controls.Add(Me.txtID)
|
||||||
@@ -162,16 +172,36 @@ Partial Class frmGameManager
|
|||||||
Me.grpConfig.Location = New System.Drawing.Point(247, 12)
|
Me.grpConfig.Location = New System.Drawing.Point(247, 12)
|
||||||
Me.grpConfig.Name = "grpConfig"
|
Me.grpConfig.Name = "grpConfig"
|
||||||
Me.grpConfig.Size = New System.Drawing.Size(525, 157)
|
Me.grpConfig.Size = New System.Drawing.Size(525, 157)
|
||||||
Me.grpConfig.TabIndex = 6
|
Me.grpConfig.TabIndex = 8
|
||||||
Me.grpConfig.TabStop = False
|
Me.grpConfig.TabStop = False
|
||||||
Me.grpConfig.Text = "Configuration"
|
Me.grpConfig.Text = "Configuration"
|
||||||
'
|
'
|
||||||
|
'lblLimit
|
||||||
|
'
|
||||||
|
Me.lblLimit.AutoSize = True
|
||||||
|
Me.lblLimit.Location = New System.Drawing.Point(375, 130)
|
||||||
|
Me.lblLimit.Name = "lblLimit"
|
||||||
|
Me.lblLimit.Size = New System.Drawing.Size(68, 13)
|
||||||
|
Me.lblLimit.TabIndex = 13
|
||||||
|
Me.lblLimit.Text = "Backup Limit"
|
||||||
|
Me.lblLimit.Visible = False
|
||||||
|
'
|
||||||
|
'nudLimit
|
||||||
|
'
|
||||||
|
Me.nudLimit.Location = New System.Drawing.Point(329, 128)
|
||||||
|
Me.nudLimit.Minimum = New Decimal(New Integer() {2, 0, 0, 0})
|
||||||
|
Me.nudLimit.Name = "nudLimit"
|
||||||
|
Me.nudLimit.Size = New System.Drawing.Size(40, 20)
|
||||||
|
Me.nudLimit.TabIndex = 12
|
||||||
|
Me.nudLimit.Value = New Decimal(New Integer() {2, 0, 0, 0})
|
||||||
|
Me.nudLimit.Visible = False
|
||||||
|
'
|
||||||
'btnExclude
|
'btnExclude
|
||||||
'
|
'
|
||||||
Me.btnExclude.Location = New System.Drawing.Point(9, 125)
|
Me.btnExclude.Location = New System.Drawing.Point(9, 125)
|
||||||
Me.btnExclude.Name = "btnExclude"
|
Me.btnExclude.Name = "btnExclude"
|
||||||
Me.btnExclude.Size = New System.Drawing.Size(175, 23)
|
Me.btnExclude.Size = New System.Drawing.Size(175, 23)
|
||||||
Me.btnExclude.TabIndex = 13
|
Me.btnExclude.TabIndex = 9
|
||||||
Me.btnExclude.Text = "E&xclude Items..."
|
Me.btnExclude.Text = "E&xclude Items..."
|
||||||
Me.btnExclude.UseVisualStyleBackColor = True
|
Me.btnExclude.UseVisualStyleBackColor = True
|
||||||
'
|
'
|
||||||
@@ -180,7 +210,7 @@ Partial Class frmGameManager
|
|||||||
Me.btnInclude.Location = New System.Drawing.Point(9, 97)
|
Me.btnInclude.Location = New System.Drawing.Point(9, 97)
|
||||||
Me.btnInclude.Name = "btnInclude"
|
Me.btnInclude.Name = "btnInclude"
|
||||||
Me.btnInclude.Size = New System.Drawing.Size(175, 23)
|
Me.btnInclude.Size = New System.Drawing.Size(175, 23)
|
||||||
Me.btnInclude.TabIndex = 10
|
Me.btnInclude.TabIndex = 8
|
||||||
Me.btnInclude.Text = "In&clude Items..."
|
Me.btnInclude.Text = "In&clude Items..."
|
||||||
Me.btnInclude.UseVisualStyleBackColor = True
|
Me.btnInclude.UseVisualStyleBackColor = True
|
||||||
'
|
'
|
||||||
@@ -190,7 +220,7 @@ Partial Class frmGameManager
|
|||||||
Me.txtID.Location = New System.Drawing.Point(489, 19)
|
Me.txtID.Location = New System.Drawing.Point(489, 19)
|
||||||
Me.txtID.Name = "txtID"
|
Me.txtID.Name = "txtID"
|
||||||
Me.txtID.Size = New System.Drawing.Size(30, 20)
|
Me.txtID.Size = New System.Drawing.Size(30, 20)
|
||||||
Me.txtID.TabIndex = 16
|
Me.txtID.TabIndex = 0
|
||||||
Me.txtID.TabStop = False
|
Me.txtID.TabStop = False
|
||||||
Me.txtID.Visible = False
|
Me.txtID.Visible = False
|
||||||
'
|
'
|
||||||
@@ -199,7 +229,7 @@ Partial Class frmGameManager
|
|||||||
Me.btnSavePathBrowse.Location = New System.Drawing.Point(489, 71)
|
Me.btnSavePathBrowse.Location = New System.Drawing.Point(489, 71)
|
||||||
Me.btnSavePathBrowse.Name = "btnSavePathBrowse"
|
Me.btnSavePathBrowse.Name = "btnSavePathBrowse"
|
||||||
Me.btnSavePathBrowse.Size = New System.Drawing.Size(30, 20)
|
Me.btnSavePathBrowse.Size = New System.Drawing.Size(30, 20)
|
||||||
Me.btnSavePathBrowse.TabIndex = 9
|
Me.btnSavePathBrowse.TabIndex = 7
|
||||||
Me.btnSavePathBrowse.Text = "..."
|
Me.btnSavePathBrowse.Text = "..."
|
||||||
Me.btnSavePathBrowse.UseVisualStyleBackColor = True
|
Me.btnSavePathBrowse.UseVisualStyleBackColor = True
|
||||||
'
|
'
|
||||||
@@ -208,7 +238,7 @@ Partial Class frmGameManager
|
|||||||
Me.btnProcessBrowse.Location = New System.Drawing.Point(489, 45)
|
Me.btnProcessBrowse.Location = New System.Drawing.Point(489, 45)
|
||||||
Me.btnProcessBrowse.Name = "btnProcessBrowse"
|
Me.btnProcessBrowse.Name = "btnProcessBrowse"
|
||||||
Me.btnProcessBrowse.Size = New System.Drawing.Size(30, 20)
|
Me.btnProcessBrowse.Size = New System.Drawing.Size(30, 20)
|
||||||
Me.btnProcessBrowse.TabIndex = 7
|
Me.btnProcessBrowse.TabIndex = 5
|
||||||
Me.btnProcessBrowse.Text = "..."
|
Me.btnProcessBrowse.Text = "..."
|
||||||
Me.btnProcessBrowse.UseVisualStyleBackColor = True
|
Me.btnProcessBrowse.UseVisualStyleBackColor = True
|
||||||
'
|
'
|
||||||
@@ -241,18 +271,18 @@ Partial Class frmGameManager
|
|||||||
'
|
'
|
||||||
'txtExclude
|
'txtExclude
|
||||||
'
|
'
|
||||||
Me.txtExclude.Location = New System.Drawing.Point(363, 128)
|
Me.txtExclude.Location = New System.Drawing.Point(489, 122)
|
||||||
Me.txtExclude.Name = "txtExclude"
|
Me.txtExclude.Name = "txtExclude"
|
||||||
Me.txtExclude.Size = New System.Drawing.Size(156, 20)
|
Me.txtExclude.Size = New System.Drawing.Size(30, 20)
|
||||||
Me.txtExclude.TabIndex = 0
|
Me.txtExclude.TabIndex = 0
|
||||||
Me.txtExclude.TabStop = False
|
Me.txtExclude.TabStop = False
|
||||||
Me.txtExclude.Visible = False
|
Me.txtExclude.Visible = False
|
||||||
'
|
'
|
||||||
'txtFileType
|
'txtFileType
|
||||||
'
|
'
|
||||||
Me.txtFileType.Location = New System.Drawing.Point(363, 99)
|
Me.txtFileType.Location = New System.Drawing.Point(489, 99)
|
||||||
Me.txtFileType.Name = "txtFileType"
|
Me.txtFileType.Name = "txtFileType"
|
||||||
Me.txtFileType.Size = New System.Drawing.Size(156, 20)
|
Me.txtFileType.Size = New System.Drawing.Size(30, 20)
|
||||||
Me.txtFileType.TabIndex = 0
|
Me.txtFileType.TabIndex = 0
|
||||||
Me.txtFileType.TabStop = False
|
Me.txtFileType.TabStop = False
|
||||||
Me.txtFileType.Visible = False
|
Me.txtFileType.Visible = False
|
||||||
@@ -262,9 +292,9 @@ Partial Class frmGameManager
|
|||||||
Me.chkTimeStamp.AutoSize = True
|
Me.chkTimeStamp.AutoSize = True
|
||||||
Me.chkTimeStamp.Location = New System.Drawing.Point(190, 129)
|
Me.chkTimeStamp.Location = New System.Drawing.Point(190, 129)
|
||||||
Me.chkTimeStamp.Name = "chkTimeStamp"
|
Me.chkTimeStamp.Name = "chkTimeStamp"
|
||||||
Me.chkTimeStamp.Size = New System.Drawing.Size(146, 17)
|
Me.chkTimeStamp.Size = New System.Drawing.Size(133, 17)
|
||||||
Me.chkTimeStamp.TabIndex = 14
|
Me.chkTimeStamp.TabIndex = 11
|
||||||
Me.chkTimeStamp.Text = "Time stamp each backup"
|
Me.chkTimeStamp.Text = "Save multiple backups"
|
||||||
Me.chkTimeStamp.UseVisualStyleBackColor = True
|
Me.chkTimeStamp.UseVisualStyleBackColor = True
|
||||||
'
|
'
|
||||||
'chkFolderSave
|
'chkFolderSave
|
||||||
@@ -273,7 +303,7 @@ Partial Class frmGameManager
|
|||||||
Me.chkFolderSave.Location = New System.Drawing.Point(190, 101)
|
Me.chkFolderSave.Location = New System.Drawing.Point(190, 101)
|
||||||
Me.chkFolderSave.Name = "chkFolderSave"
|
Me.chkFolderSave.Name = "chkFolderSave"
|
||||||
Me.chkFolderSave.Size = New System.Drawing.Size(109, 17)
|
Me.chkFolderSave.Size = New System.Drawing.Size(109, 17)
|
||||||
Me.chkFolderSave.TabIndex = 11
|
Me.chkFolderSave.TabIndex = 10
|
||||||
Me.chkFolderSave.Text = "Save entire folder"
|
Me.chkFolderSave.Text = "Save entire folder"
|
||||||
Me.chkFolderSave.UseVisualStyleBackColor = True
|
Me.chkFolderSave.UseVisualStyleBackColor = True
|
||||||
'
|
'
|
||||||
@@ -282,30 +312,30 @@ Partial Class frmGameManager
|
|||||||
Me.txtSavePath.Location = New System.Drawing.Point(69, 71)
|
Me.txtSavePath.Location = New System.Drawing.Point(69, 71)
|
||||||
Me.txtSavePath.Name = "txtSavePath"
|
Me.txtSavePath.Name = "txtSavePath"
|
||||||
Me.txtSavePath.Size = New System.Drawing.Size(414, 20)
|
Me.txtSavePath.Size = New System.Drawing.Size(414, 20)
|
||||||
Me.txtSavePath.TabIndex = 8
|
Me.txtSavePath.TabIndex = 6
|
||||||
'
|
'
|
||||||
'txtProcess
|
'txtProcess
|
||||||
'
|
'
|
||||||
Me.txtProcess.Location = New System.Drawing.Point(69, 45)
|
Me.txtProcess.Location = New System.Drawing.Point(69, 45)
|
||||||
Me.txtProcess.Name = "txtProcess"
|
Me.txtProcess.Name = "txtProcess"
|
||||||
Me.txtProcess.Size = New System.Drawing.Size(414, 20)
|
Me.txtProcess.Size = New System.Drawing.Size(414, 20)
|
||||||
Me.txtProcess.TabIndex = 6
|
Me.txtProcess.TabIndex = 4
|
||||||
'
|
'
|
||||||
'txtName
|
'txtName
|
||||||
'
|
'
|
||||||
Me.txtName.Location = New System.Drawing.Point(69, 19)
|
Me.txtName.Location = New System.Drawing.Point(69, 19)
|
||||||
Me.txtName.Name = "txtName"
|
Me.txtName.Name = "txtName"
|
||||||
Me.txtName.Size = New System.Drawing.Size(414, 20)
|
Me.txtName.Size = New System.Drawing.Size(414, 20)
|
||||||
Me.txtName.TabIndex = 5
|
Me.txtName.TabIndex = 3
|
||||||
'
|
'
|
||||||
'chkMonitorOnly
|
'chkMonitorOnly
|
||||||
'
|
'
|
||||||
Me.chkMonitorOnly.AutoSize = True
|
Me.chkMonitorOnly.AutoSize = True
|
||||||
Me.chkMonitorOnly.Location = New System.Drawing.Point(362, 340)
|
Me.chkMonitorOnly.Location = New System.Drawing.Point(362, 340)
|
||||||
Me.chkMonitorOnly.Name = "chkMonitorOnly"
|
Me.chkMonitorOnly.Name = "chkMonitorOnly"
|
||||||
Me.chkMonitorOnly.Size = New System.Drawing.Size(145, 17)
|
Me.chkMonitorOnly.Size = New System.Drawing.Size(83, 17)
|
||||||
Me.chkMonitorOnly.TabIndex = 9
|
Me.chkMonitorOnly.TabIndex = 11
|
||||||
Me.chkMonitorOnly.Text = "Monitor only (No backup)"
|
Me.chkMonitorOnly.Text = "Monitor only"
|
||||||
Me.chkMonitorOnly.UseVisualStyleBackColor = True
|
Me.chkMonitorOnly.UseVisualStyleBackColor = True
|
||||||
'
|
'
|
||||||
'grpExtra
|
'grpExtra
|
||||||
@@ -328,7 +358,7 @@ Partial Class frmGameManager
|
|||||||
Me.grpExtra.Location = New System.Drawing.Point(247, 175)
|
Me.grpExtra.Location = New System.Drawing.Point(247, 175)
|
||||||
Me.grpExtra.Name = "grpExtra"
|
Me.grpExtra.Name = "grpExtra"
|
||||||
Me.grpExtra.Size = New System.Drawing.Size(525, 155)
|
Me.grpExtra.Size = New System.Drawing.Size(525, 155)
|
||||||
Me.grpExtra.TabIndex = 7
|
Me.grpExtra.TabIndex = 9
|
||||||
Me.grpExtra.TabStop = False
|
Me.grpExtra.TabStop = False
|
||||||
Me.grpExtra.Text = "Game Information"
|
Me.grpExtra.Text = "Game Information"
|
||||||
'
|
'
|
||||||
@@ -459,32 +489,73 @@ Partial Class frmGameManager
|
|||||||
Me.btnTags.Location = New System.Drawing.Point(535, 336)
|
Me.btnTags.Location = New System.Drawing.Point(535, 336)
|
||||||
Me.btnTags.Name = "btnTags"
|
Me.btnTags.Name = "btnTags"
|
||||||
Me.btnTags.Size = New System.Drawing.Size(75, 23)
|
Me.btnTags.Size = New System.Drawing.Size(75, 23)
|
||||||
Me.btnTags.TabIndex = 10
|
Me.btnTags.TabIndex = 12
|
||||||
Me.btnTags.Text = "Tags..."
|
Me.btnTags.Text = "Tags..."
|
||||||
Me.btnTags.UseVisualStyleBackColor = True
|
Me.btnTags.UseVisualStyleBackColor = True
|
||||||
'
|
'
|
||||||
'grpStats
|
'grpStats
|
||||||
'
|
'
|
||||||
Me.grpStats.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
Me.grpStats.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||||
|
Me.grpStats.Controls.Add(Me.cboRemoteBackup)
|
||||||
|
Me.grpStats.Controls.Add(Me.lblRestorePathData)
|
||||||
|
Me.grpStats.Controls.Add(Me.lblBackupFileData)
|
||||||
|
Me.grpStats.Controls.Add(Me.lblLocalBackupData)
|
||||||
Me.grpStats.Controls.Add(Me.lblRestorePath)
|
Me.grpStats.Controls.Add(Me.lblRestorePath)
|
||||||
Me.grpStats.Controls.Add(Me.txtRestorePath)
|
|
||||||
Me.grpStats.Controls.Add(Me.btnOpenRestorePath)
|
Me.grpStats.Controls.Add(Me.btnOpenRestorePath)
|
||||||
Me.grpStats.Controls.Add(Me.btnOpenBackupFile)
|
Me.grpStats.Controls.Add(Me.btnOpenBackupFile)
|
||||||
Me.grpStats.Controls.Add(Me.txtFileSize)
|
|
||||||
Me.grpStats.Controls.Add(Me.btnDeleteBackup)
|
Me.grpStats.Controls.Add(Me.btnDeleteBackup)
|
||||||
Me.grpStats.Controls.Add(Me.lblFileSize)
|
Me.grpStats.Controls.Add(Me.lblBackupFile)
|
||||||
Me.grpStats.Controls.Add(Me.lblSync)
|
Me.grpStats.Controls.Add(Me.lblRemote)
|
||||||
Me.grpStats.Controls.Add(Me.txtCurrentBackup)
|
Me.grpStats.Controls.Add(Me.lblLocalData)
|
||||||
Me.grpStats.Controls.Add(Me.lblCurrentBackup)
|
|
||||||
Me.grpStats.Controls.Add(Me.txtLocalBackup)
|
|
||||||
Me.grpStats.Controls.Add(Me.lblLastBackup)
|
|
||||||
Me.grpStats.Location = New System.Drawing.Point(247, 365)
|
Me.grpStats.Location = New System.Drawing.Point(247, 365)
|
||||||
Me.grpStats.Name = "grpStats"
|
Me.grpStats.Name = "grpStats"
|
||||||
Me.grpStats.Size = New System.Drawing.Size(525, 154)
|
Me.grpStats.Size = New System.Drawing.Size(525, 154)
|
||||||
Me.grpStats.TabIndex = 13
|
Me.grpStats.TabIndex = 15
|
||||||
Me.grpStats.TabStop = False
|
Me.grpStats.TabStop = False
|
||||||
Me.grpStats.Text = "Backup Information"
|
Me.grpStats.Text = "Backup Information"
|
||||||
'
|
'
|
||||||
|
'cboRemoteBackup
|
||||||
|
'
|
||||||
|
Me.cboRemoteBackup.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||||
|
Me.cboRemoteBackup.FormattingEnabled = True
|
||||||
|
Me.cboRemoteBackup.Location = New System.Drawing.Point(96, 24)
|
||||||
|
Me.cboRemoteBackup.Name = "cboRemoteBackup"
|
||||||
|
Me.cboRemoteBackup.Size = New System.Drawing.Size(387, 21)
|
||||||
|
Me.cboRemoteBackup.TabIndex = 12
|
||||||
|
'
|
||||||
|
'lblRestorePathData
|
||||||
|
'
|
||||||
|
Me.lblRestorePathData.AutoEllipsis = True
|
||||||
|
Me.lblRestorePathData.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||||
|
Me.lblRestorePathData.Location = New System.Drawing.Point(96, 98)
|
||||||
|
Me.lblRestorePathData.Name = "lblRestorePathData"
|
||||||
|
Me.lblRestorePathData.Size = New System.Drawing.Size(387, 20)
|
||||||
|
Me.lblRestorePathData.TabIndex = 7
|
||||||
|
Me.lblRestorePathData.Tag = "wipe"
|
||||||
|
Me.lblRestorePathData.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||||
|
'
|
||||||
|
'lblBackupFileData
|
||||||
|
'
|
||||||
|
Me.lblBackupFileData.AutoEllipsis = True
|
||||||
|
Me.lblBackupFileData.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||||
|
Me.lblBackupFileData.Location = New System.Drawing.Point(96, 73)
|
||||||
|
Me.lblBackupFileData.Name = "lblBackupFileData"
|
||||||
|
Me.lblBackupFileData.Size = New System.Drawing.Size(387, 20)
|
||||||
|
Me.lblBackupFileData.TabIndex = 6
|
||||||
|
Me.lblBackupFileData.Tag = "wipe"
|
||||||
|
Me.lblBackupFileData.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||||
|
'
|
||||||
|
'lblLocalBackupData
|
||||||
|
'
|
||||||
|
Me.lblLocalBackupData.AutoEllipsis = True
|
||||||
|
Me.lblLocalBackupData.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||||
|
Me.lblLocalBackupData.Location = New System.Drawing.Point(96, 49)
|
||||||
|
Me.lblLocalBackupData.Name = "lblLocalBackupData"
|
||||||
|
Me.lblLocalBackupData.Size = New System.Drawing.Size(387, 20)
|
||||||
|
Me.lblLocalBackupData.TabIndex = 5
|
||||||
|
Me.lblLocalBackupData.Tag = "wipe"
|
||||||
|
Me.lblLocalBackupData.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||||
|
'
|
||||||
'lblRestorePath
|
'lblRestorePath
|
||||||
'
|
'
|
||||||
Me.lblRestorePath.AutoSize = True
|
Me.lblRestorePath.AutoSize = True
|
||||||
@@ -494,122 +565,77 @@ Partial Class frmGameManager
|
|||||||
Me.lblRestorePath.TabIndex = 3
|
Me.lblRestorePath.TabIndex = 3
|
||||||
Me.lblRestorePath.Text = "Restore Path:"
|
Me.lblRestorePath.Text = "Restore Path:"
|
||||||
'
|
'
|
||||||
'txtRestorePath
|
|
||||||
'
|
|
||||||
Me.txtRestorePath.Location = New System.Drawing.Point(96, 99)
|
|
||||||
Me.txtRestorePath.Name = "txtRestorePath"
|
|
||||||
Me.txtRestorePath.ReadOnly = True
|
|
||||||
Me.txtRestorePath.Size = New System.Drawing.Size(387, 20)
|
|
||||||
Me.txtRestorePath.TabIndex = 8
|
|
||||||
'
|
|
||||||
'btnOpenRestorePath
|
'btnOpenRestorePath
|
||||||
'
|
'
|
||||||
Me.btnOpenRestorePath.Location = New System.Drawing.Point(339, 125)
|
Me.btnOpenRestorePath.Location = New System.Drawing.Point(369, 125)
|
||||||
Me.btnOpenRestorePath.Name = "btnOpenRestorePath"
|
Me.btnOpenRestorePath.Name = "btnOpenRestorePath"
|
||||||
Me.btnOpenRestorePath.Size = New System.Drawing.Size(114, 23)
|
Me.btnOpenRestorePath.Size = New System.Drawing.Size(114, 23)
|
||||||
Me.btnOpenRestorePath.TabIndex = 12
|
Me.btnOpenRestorePath.TabIndex = 11
|
||||||
Me.btnOpenRestorePath.Text = "O&pen Restore Path"
|
Me.btnOpenRestorePath.Text = "O&pen Restore Path"
|
||||||
Me.btnOpenRestorePath.UseVisualStyleBackColor = True
|
Me.btnOpenRestorePath.UseVisualStyleBackColor = True
|
||||||
'
|
'
|
||||||
'btnOpenBackupFile
|
'btnOpenBackupFile
|
||||||
'
|
'
|
||||||
Me.btnOpenBackupFile.Location = New System.Drawing.Point(216, 125)
|
Me.btnOpenBackupFile.Location = New System.Drawing.Point(249, 125)
|
||||||
Me.btnOpenBackupFile.Name = "btnOpenBackupFile"
|
Me.btnOpenBackupFile.Name = "btnOpenBackupFile"
|
||||||
Me.btnOpenBackupFile.Size = New System.Drawing.Size(114, 23)
|
Me.btnOpenBackupFile.Size = New System.Drawing.Size(114, 23)
|
||||||
Me.btnOpenBackupFile.TabIndex = 11
|
Me.btnOpenBackupFile.TabIndex = 10
|
||||||
Me.btnOpenBackupFile.Text = "&Open Backup File"
|
Me.btnOpenBackupFile.Text = "&Open Backup File"
|
||||||
Me.btnOpenBackupFile.UseVisualStyleBackColor = True
|
Me.btnOpenBackupFile.UseVisualStyleBackColor = True
|
||||||
'
|
'
|
||||||
'txtFileSize
|
|
||||||
'
|
|
||||||
Me.txtFileSize.Location = New System.Drawing.Point(96, 74)
|
|
||||||
Me.txtFileSize.Name = "txtFileSize"
|
|
||||||
Me.txtFileSize.ReadOnly = True
|
|
||||||
Me.txtFileSize.Size = New System.Drawing.Size(387, 20)
|
|
||||||
Me.txtFileSize.TabIndex = 7
|
|
||||||
Me.txtFileSize.TabStop = False
|
|
||||||
'
|
|
||||||
'btnDeleteBackup
|
'btnDeleteBackup
|
||||||
'
|
'
|
||||||
Me.btnDeleteBackup.Location = New System.Drawing.Point(96, 125)
|
Me.btnDeleteBackup.Location = New System.Drawing.Point(129, 125)
|
||||||
Me.btnDeleteBackup.Name = "btnDeleteBackup"
|
Me.btnDeleteBackup.Name = "btnDeleteBackup"
|
||||||
Me.btnDeleteBackup.Size = New System.Drawing.Size(114, 23)
|
Me.btnDeleteBackup.Size = New System.Drawing.Size(114, 23)
|
||||||
Me.btnDeleteBackup.TabIndex = 10
|
Me.btnDeleteBackup.TabIndex = 8
|
||||||
Me.btnDeleteBackup.Text = "&Delete Backup"
|
Me.btnDeleteBackup.Text = "&Delete Backup"
|
||||||
Me.btnDeleteBackup.UseVisualStyleBackColor = True
|
Me.btnDeleteBackup.UseVisualStyleBackColor = True
|
||||||
'
|
'
|
||||||
'lblFileSize
|
'lblBackupFile
|
||||||
'
|
'
|
||||||
Me.lblFileSize.AutoSize = True
|
Me.lblBackupFile.AutoSize = True
|
||||||
Me.lblFileSize.Location = New System.Drawing.Point(6, 77)
|
Me.lblBackupFile.Location = New System.Drawing.Point(6, 77)
|
||||||
Me.lblFileSize.Name = "lblFileSize"
|
Me.lblBackupFile.Name = "lblBackupFile"
|
||||||
Me.lblFileSize.Size = New System.Drawing.Size(70, 13)
|
Me.lblBackupFile.Size = New System.Drawing.Size(66, 13)
|
||||||
Me.lblFileSize.TabIndex = 2
|
Me.lblBackupFile.TabIndex = 2
|
||||||
Me.lblFileSize.Text = "Backup Size:"
|
Me.lblBackupFile.Text = "Backup File:"
|
||||||
'
|
'
|
||||||
'lblSync
|
'lblRemote
|
||||||
'
|
'
|
||||||
Me.lblSync.AutoSize = True
|
Me.lblRemote.AutoSize = True
|
||||||
Me.lblSync.Location = New System.Drawing.Point(6, 130)
|
Me.lblRemote.Location = New System.Drawing.Point(6, 27)
|
||||||
Me.lblSync.Name = "lblSync"
|
Me.lblRemote.Name = "lblRemote"
|
||||||
Me.lblSync.Size = New System.Drawing.Size(62, 13)
|
Me.lblRemote.Size = New System.Drawing.Size(73, 13)
|
||||||
Me.lblSync.TabIndex = 4
|
Me.lblRemote.TabIndex = 0
|
||||||
Me.lblSync.Text = "Up to Date!"
|
Me.lblRemote.Text = "Backup Data:"
|
||||||
Me.lblSync.Visible = False
|
|
||||||
'
|
'
|
||||||
'txtCurrentBackup
|
'lblLocalData
|
||||||
'
|
'
|
||||||
Me.txtCurrentBackup.Location = New System.Drawing.Point(96, 24)
|
Me.lblLocalData.AutoSize = True
|
||||||
Me.txtCurrentBackup.Name = "txtCurrentBackup"
|
Me.lblLocalData.Location = New System.Drawing.Point(6, 53)
|
||||||
Me.txtCurrentBackup.ReadOnly = True
|
Me.lblLocalData.Name = "lblLocalData"
|
||||||
Me.txtCurrentBackup.Size = New System.Drawing.Size(387, 20)
|
Me.lblLocalData.Size = New System.Drawing.Size(62, 13)
|
||||||
Me.txtCurrentBackup.TabIndex = 5
|
Me.lblLocalData.TabIndex = 1
|
||||||
Me.txtCurrentBackup.TabStop = False
|
Me.lblLocalData.Text = "Local Data:"
|
||||||
'
|
|
||||||
'lblCurrentBackup
|
|
||||||
'
|
|
||||||
Me.lblCurrentBackup.AutoSize = True
|
|
||||||
Me.lblCurrentBackup.Location = New System.Drawing.Point(6, 27)
|
|
||||||
Me.lblCurrentBackup.Name = "lblCurrentBackup"
|
|
||||||
Me.lblCurrentBackup.Size = New System.Drawing.Size(84, 13)
|
|
||||||
Me.lblCurrentBackup.TabIndex = 0
|
|
||||||
Me.lblCurrentBackup.Text = "Current Backup:"
|
|
||||||
'
|
|
||||||
'txtLocalBackup
|
|
||||||
'
|
|
||||||
Me.txtLocalBackup.Location = New System.Drawing.Point(96, 50)
|
|
||||||
Me.txtLocalBackup.Name = "txtLocalBackup"
|
|
||||||
Me.txtLocalBackup.ReadOnly = True
|
|
||||||
Me.txtLocalBackup.Size = New System.Drawing.Size(387, 20)
|
|
||||||
Me.txtLocalBackup.TabIndex = 6
|
|
||||||
Me.txtLocalBackup.TabStop = False
|
|
||||||
'
|
|
||||||
'lblLastBackup
|
|
||||||
'
|
|
||||||
Me.lblLastBackup.AutoSize = True
|
|
||||||
Me.lblLastBackup.Location = New System.Drawing.Point(6, 53)
|
|
||||||
Me.lblLastBackup.Name = "lblLastBackup"
|
|
||||||
Me.lblLastBackup.Size = New System.Drawing.Size(76, 13)
|
|
||||||
Me.lblLastBackup.TabIndex = 1
|
|
||||||
Me.lblLastBackup.Text = "Local Backup:"
|
|
||||||
'
|
'
|
||||||
'btnMarkAsRestored
|
'btnMarkAsRestored
|
||||||
'
|
'
|
||||||
Me.btnMarkAsRestored.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
Me.btnMarkAsRestored.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||||
Me.btnMarkAsRestored.Location = New System.Drawing.Point(429, 525)
|
Me.btnMarkAsRestored.Location = New System.Drawing.Point(429, 526)
|
||||||
Me.btnMarkAsRestored.Name = "btnMarkAsRestored"
|
Me.btnMarkAsRestored.Name = "btnMarkAsRestored"
|
||||||
Me.btnMarkAsRestored.Size = New System.Drawing.Size(100, 23)
|
Me.btnMarkAsRestored.Size = New System.Drawing.Size(100, 23)
|
||||||
Me.btnMarkAsRestored.TabIndex = 14
|
Me.btnMarkAsRestored.TabIndex = 17
|
||||||
Me.btnMarkAsRestored.Text = "&Mark as Restored"
|
Me.btnMarkAsRestored.Text = "&Mark as Restored"
|
||||||
Me.btnMarkAsRestored.UseVisualStyleBackColor = True
|
Me.btnMarkAsRestored.UseVisualStyleBackColor = True
|
||||||
'
|
'
|
||||||
'btnRestore
|
'btnRestore
|
||||||
'
|
'
|
||||||
Me.btnRestore.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
Me.btnRestore.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||||
Me.btnRestore.Location = New System.Drawing.Point(535, 525)
|
Me.btnRestore.Location = New System.Drawing.Point(535, 526)
|
||||||
Me.btnRestore.Name = "btnRestore"
|
Me.btnRestore.Name = "btnRestore"
|
||||||
Me.btnRestore.Size = New System.Drawing.Size(75, 23)
|
Me.btnRestore.Size = New System.Drawing.Size(75, 23)
|
||||||
Me.btnRestore.TabIndex = 15
|
Me.btnRestore.TabIndex = 18
|
||||||
Me.btnRestore.Text = "&Restore"
|
Me.btnRestore.Text = "&Restore"
|
||||||
Me.btnRestore.UseVisualStyleBackColor = True
|
Me.btnRestore.UseVisualStyleBackColor = True
|
||||||
'
|
'
|
||||||
@@ -619,18 +645,18 @@ Partial Class frmGameManager
|
|||||||
Me.btnSave.Location = New System.Drawing.Point(616, 336)
|
Me.btnSave.Location = New System.Drawing.Point(616, 336)
|
||||||
Me.btnSave.Name = "btnSave"
|
Me.btnSave.Name = "btnSave"
|
||||||
Me.btnSave.Size = New System.Drawing.Size(75, 23)
|
Me.btnSave.Size = New System.Drawing.Size(75, 23)
|
||||||
Me.btnSave.TabIndex = 11
|
Me.btnSave.TabIndex = 13
|
||||||
Me.btnSave.Text = "&Save"
|
Me.btnSave.Text = "&Save"
|
||||||
Me.btnSave.UseVisualStyleBackColor = True
|
Me.btnSave.UseVisualStyleBackColor = True
|
||||||
'
|
'
|
||||||
'lstGames
|
'lstGames
|
||||||
'
|
'
|
||||||
Me.lstGames.FormattingEnabled = True
|
Me.lstGames.FormattingEnabled = True
|
||||||
Me.lstGames.Location = New System.Drawing.Point(12, 138)
|
Me.lstGames.Location = New System.Drawing.Point(12, 160)
|
||||||
Me.lstGames.Name = "lstGames"
|
Me.lstGames.Name = "lstGames"
|
||||||
Me.lstGames.SelectionMode = System.Windows.Forms.SelectionMode.MultiExtended
|
Me.lstGames.SelectionMode = System.Windows.Forms.SelectionMode.MultiExtended
|
||||||
Me.lstGames.Size = New System.Drawing.Size(228, 381)
|
Me.lstGames.Size = New System.Drawing.Size(228, 355)
|
||||||
Me.lstGames.TabIndex = 1
|
Me.lstGames.TabIndex = 3
|
||||||
'
|
'
|
||||||
'btnCancel
|
'btnCancel
|
||||||
'
|
'
|
||||||
@@ -638,7 +664,7 @@ Partial Class frmGameManager
|
|||||||
Me.btnCancel.Location = New System.Drawing.Point(697, 336)
|
Me.btnCancel.Location = New System.Drawing.Point(697, 336)
|
||||||
Me.btnCancel.Name = "btnCancel"
|
Me.btnCancel.Name = "btnCancel"
|
||||||
Me.btnCancel.Size = New System.Drawing.Size(75, 23)
|
Me.btnCancel.Size = New System.Drawing.Size(75, 23)
|
||||||
Me.btnCancel.TabIndex = 12
|
Me.btnCancel.TabIndex = 14
|
||||||
Me.btnCancel.Text = "&Cancel"
|
Me.btnCancel.Text = "&Cancel"
|
||||||
Me.btnCancel.UseVisualStyleBackColor = True
|
Me.btnCancel.UseVisualStyleBackColor = True
|
||||||
'
|
'
|
||||||
@@ -648,7 +674,7 @@ Partial Class frmGameManager
|
|||||||
Me.chkEnabled.Location = New System.Drawing.Point(247, 340)
|
Me.chkEnabled.Location = New System.Drawing.Point(247, 340)
|
||||||
Me.chkEnabled.Name = "chkEnabled"
|
Me.chkEnabled.Name = "chkEnabled"
|
||||||
Me.chkEnabled.Size = New System.Drawing.Size(109, 17)
|
Me.chkEnabled.Size = New System.Drawing.Size(109, 17)
|
||||||
Me.chkEnabled.TabIndex = 8
|
Me.chkEnabled.TabIndex = 10
|
||||||
Me.chkEnabled.Text = "Monitor this game"
|
Me.chkEnabled.Text = "Monitor this game"
|
||||||
Me.chkEnabled.UseVisualStyleBackColor = True
|
Me.chkEnabled.UseVisualStyleBackColor = True
|
||||||
'
|
'
|
||||||
@@ -714,7 +740,7 @@ Partial Class frmGameManager
|
|||||||
Me.btnImport.Location = New System.Drawing.Point(84, 526)
|
Me.btnImport.Location = New System.Drawing.Point(84, 526)
|
||||||
Me.btnImport.Name = "btnImport"
|
Me.btnImport.Name = "btnImport"
|
||||||
Me.btnImport.Size = New System.Drawing.Size(75, 23)
|
Me.btnImport.Size = New System.Drawing.Size(75, 23)
|
||||||
Me.btnImport.TabIndex = 4
|
Me.btnImport.TabIndex = 6
|
||||||
Me.btnImport.Text = "&Import"
|
Me.btnImport.Text = "&Import"
|
||||||
Me.btnImport.UseVisualStyleBackColor = True
|
Me.btnImport.UseVisualStyleBackColor = True
|
||||||
'
|
'
|
||||||
@@ -723,7 +749,7 @@ Partial Class frmGameManager
|
|||||||
Me.btnExport.Location = New System.Drawing.Point(165, 526)
|
Me.btnExport.Location = New System.Drawing.Point(165, 526)
|
||||||
Me.btnExport.Name = "btnExport"
|
Me.btnExport.Name = "btnExport"
|
||||||
Me.btnExport.Size = New System.Drawing.Size(75, 23)
|
Me.btnExport.Size = New System.Drawing.Size(75, 23)
|
||||||
Me.btnExport.TabIndex = 5
|
Me.btnExport.TabIndex = 7
|
||||||
Me.btnExport.Text = "&Export"
|
Me.btnExport.Text = "&Export"
|
||||||
Me.btnExport.UseVisualStyleBackColor = True
|
Me.btnExport.UseVisualStyleBackColor = True
|
||||||
'
|
'
|
||||||
@@ -746,11 +772,48 @@ Partial Class frmGameManager
|
|||||||
Me.cmsFile.Size = New System.Drawing.Size(117, 22)
|
Me.cmsFile.Size = New System.Drawing.Size(117, 22)
|
||||||
Me.cmsFile.Text = "&File..."
|
Me.cmsFile.Text = "&File..."
|
||||||
'
|
'
|
||||||
|
'txtQuickFilter
|
||||||
|
'
|
||||||
|
Me.txtQuickFilter.Location = New System.Drawing.Point(80, 134)
|
||||||
|
Me.txtQuickFilter.Name = "txtQuickFilter"
|
||||||
|
Me.txtQuickFilter.Size = New System.Drawing.Size(160, 20)
|
||||||
|
Me.txtQuickFilter.TabIndex = 2
|
||||||
|
'
|
||||||
|
'lblQuickFilter
|
||||||
|
'
|
||||||
|
Me.lblQuickFilter.AutoSize = True
|
||||||
|
Me.lblQuickFilter.Location = New System.Drawing.Point(12, 137)
|
||||||
|
Me.lblQuickFilter.Name = "lblQuickFilter"
|
||||||
|
Me.lblQuickFilter.Size = New System.Drawing.Size(63, 13)
|
||||||
|
Me.lblQuickFilter.TabIndex = 1
|
||||||
|
Me.lblQuickFilter.Text = "Quick Filter:"
|
||||||
|
'
|
||||||
|
'cmsDeleteBackup
|
||||||
|
'
|
||||||
|
Me.cmsDeleteBackup.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.cmsDeleteOne, Me.cmsDeleteAll})
|
||||||
|
Me.cmsDeleteBackup.Name = "cmsDeleteBackup"
|
||||||
|
Me.cmsDeleteBackup.ShowImageMargin = False
|
||||||
|
Me.cmsDeleteBackup.Size = New System.Drawing.Size(115, 48)
|
||||||
|
'
|
||||||
|
'cmsDeleteOne
|
||||||
|
'
|
||||||
|
Me.cmsDeleteOne.Name = "cmsDeleteOne"
|
||||||
|
Me.cmsDeleteOne.Size = New System.Drawing.Size(114, 22)
|
||||||
|
Me.cmsDeleteOne.Text = "&Selected File"
|
||||||
|
'
|
||||||
|
'cmsDeleteAll
|
||||||
|
'
|
||||||
|
Me.cmsDeleteAll.Name = "cmsDeleteAll"
|
||||||
|
Me.cmsDeleteAll.Size = New System.Drawing.Size(114, 22)
|
||||||
|
Me.cmsDeleteAll.Text = "&All Files"
|
||||||
|
'
|
||||||
'frmGameManager
|
'frmGameManager
|
||||||
'
|
'
|
||||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||||
Me.ClientSize = New System.Drawing.Size(784, 561)
|
Me.ClientSize = New System.Drawing.Size(784, 561)
|
||||||
|
Me.Controls.Add(Me.lblQuickFilter)
|
||||||
|
Me.Controls.Add(Me.txtQuickFilter)
|
||||||
Me.Controls.Add(Me.btnExport)
|
Me.Controls.Add(Me.btnExport)
|
||||||
Me.Controls.Add(Me.btnImport)
|
Me.Controls.Add(Me.btnImport)
|
||||||
Me.Controls.Add(Me.grpFilter)
|
Me.Controls.Add(Me.grpFilter)
|
||||||
@@ -778,6 +841,7 @@ Partial Class frmGameManager
|
|||||||
Me.Text = "Game Manager"
|
Me.Text = "Game Manager"
|
||||||
Me.grpConfig.ResumeLayout(False)
|
Me.grpConfig.ResumeLayout(False)
|
||||||
Me.grpConfig.PerformLayout()
|
Me.grpConfig.PerformLayout()
|
||||||
|
CType(Me.nudLimit, System.ComponentModel.ISupportInitialize).EndInit()
|
||||||
Me.grpExtra.ResumeLayout(False)
|
Me.grpExtra.ResumeLayout(False)
|
||||||
Me.grpExtra.PerformLayout()
|
Me.grpExtra.PerformLayout()
|
||||||
CType(Me.pbIcon, System.ComponentModel.ISupportInitialize).EndInit()
|
CType(Me.pbIcon, System.ComponentModel.ISupportInitialize).EndInit()
|
||||||
@@ -787,6 +851,7 @@ Partial Class frmGameManager
|
|||||||
Me.grpFilter.ResumeLayout(False)
|
Me.grpFilter.ResumeLayout(False)
|
||||||
Me.grpFilter.PerformLayout()
|
Me.grpFilter.PerformLayout()
|
||||||
Me.cmsImport.ResumeLayout(False)
|
Me.cmsImport.ResumeLayout(False)
|
||||||
|
Me.cmsDeleteBackup.ResumeLayout(False)
|
||||||
Me.ResumeLayout(False)
|
Me.ResumeLayout(False)
|
||||||
Me.PerformLayout()
|
Me.PerformLayout()
|
||||||
|
|
||||||
@@ -828,14 +893,10 @@ Partial Class frmGameManager
|
|||||||
Friend WithEvents btnIconBrowse As System.Windows.Forms.Button
|
Friend WithEvents btnIconBrowse As System.Windows.Forms.Button
|
||||||
Friend WithEvents txtIcon As System.Windows.Forms.TextBox
|
Friend WithEvents txtIcon As System.Windows.Forms.TextBox
|
||||||
Friend WithEvents txtID As System.Windows.Forms.TextBox
|
Friend WithEvents txtID As System.Windows.Forms.TextBox
|
||||||
Friend WithEvents txtCurrentBackup As System.Windows.Forms.TextBox
|
Friend WithEvents lblRemote As System.Windows.Forms.Label
|
||||||
Friend WithEvents lblCurrentBackup As System.Windows.Forms.Label
|
Friend WithEvents lblLocalData As System.Windows.Forms.Label
|
||||||
Friend WithEvents txtLocalBackup As System.Windows.Forms.TextBox
|
|
||||||
Friend WithEvents lblLastBackup As System.Windows.Forms.Label
|
|
||||||
Friend WithEvents lblSync As System.Windows.Forms.Label
|
|
||||||
Friend WithEvents chkEnabled As System.Windows.Forms.CheckBox
|
Friend WithEvents chkEnabled As System.Windows.Forms.CheckBox
|
||||||
Friend WithEvents txtFileSize As System.Windows.Forms.TextBox
|
Friend WithEvents lblBackupFile As System.Windows.Forms.Label
|
||||||
Friend WithEvents lblFileSize As System.Windows.Forms.Label
|
|
||||||
Friend WithEvents btnMarkAsRestored As System.Windows.Forms.Button
|
Friend WithEvents btnMarkAsRestored As System.Windows.Forms.Button
|
||||||
Friend WithEvents btnRestore As System.Windows.Forms.Button
|
Friend WithEvents btnRestore As System.Windows.Forms.Button
|
||||||
Friend WithEvents btnDeleteBackup As System.Windows.Forms.Button
|
Friend WithEvents btnDeleteBackup As System.Windows.Forms.Button
|
||||||
@@ -851,10 +912,20 @@ Partial Class frmGameManager
|
|||||||
Friend WithEvents btnInclude As System.Windows.Forms.Button
|
Friend WithEvents btnInclude As System.Windows.Forms.Button
|
||||||
Friend WithEvents btnExclude As System.Windows.Forms.Button
|
Friend WithEvents btnExclude As System.Windows.Forms.Button
|
||||||
Friend WithEvents lblRestorePath As Label
|
Friend WithEvents lblRestorePath As Label
|
||||||
Friend WithEvents txtRestorePath As TextBox
|
|
||||||
Friend WithEvents btnImport As System.Windows.Forms.Button
|
Friend WithEvents btnImport As System.Windows.Forms.Button
|
||||||
Friend WithEvents btnExport As System.Windows.Forms.Button
|
Friend WithEvents btnExport As System.Windows.Forms.Button
|
||||||
Friend WithEvents cmsImport As System.Windows.Forms.ContextMenuStrip
|
Friend WithEvents cmsImport As System.Windows.Forms.ContextMenuStrip
|
||||||
Friend WithEvents cmsOfficial As System.Windows.Forms.ToolStripMenuItem
|
Friend WithEvents cmsOfficial As System.Windows.Forms.ToolStripMenuItem
|
||||||
Friend WithEvents cmsFile As System.Windows.Forms.ToolStripMenuItem
|
Friend WithEvents cmsFile As System.Windows.Forms.ToolStripMenuItem
|
||||||
|
Friend WithEvents txtQuickFilter As TextBox
|
||||||
|
Friend WithEvents lblQuickFilter As Label
|
||||||
|
Friend WithEvents lblLocalBackupData As Label
|
||||||
|
Friend WithEvents lblRestorePathData As Label
|
||||||
|
Friend WithEvents lblBackupFileData As Label
|
||||||
|
Friend WithEvents lblLimit As Label
|
||||||
|
Friend WithEvents nudLimit As NumericUpDown
|
||||||
|
Friend WithEvents cboRemoteBackup As ComboBox
|
||||||
|
Friend WithEvents cmsDeleteBackup As ContextMenuStrip
|
||||||
|
Friend WithEvents cmsDeleteOne As ToolStripMenuItem
|
||||||
|
Friend WithEvents cmsDeleteAll As ToolStripMenuItem
|
||||||
End Class
|
End Class
|
||||||
|
|||||||
@@ -120,4 +120,7 @@
|
|||||||
<metadata name="cmsImport.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
<metadata name="cmsImport.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||||
<value>17, 17</value>
|
<value>17, 17</value>
|
||||||
</metadata>
|
</metadata>
|
||||||
|
<metadata name="cmsDeleteBackup.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||||
|
<value>127, 17</value>
|
||||||
|
</metadata>
|
||||||
</root>
|
</root>
|
||||||
+286
-157
@@ -11,7 +11,7 @@ Public Class frmGameManager
|
|||||||
Private bTriggerBackup As Boolean = False
|
Private bTriggerBackup As Boolean = False
|
||||||
Private bTriggerRestore As Boolean = False
|
Private bTriggerRestore As Boolean = False
|
||||||
Private oBackupList As New List(Of clsGame)
|
Private oBackupList As New List(Of clsGame)
|
||||||
Private oRestoreList As New List(Of clsGame)
|
Private oRestoreList As New Hashtable
|
||||||
Private oAppData As Hashtable
|
Private oAppData As Hashtable
|
||||||
Private oLocalBackupData As SortedList
|
Private oLocalBackupData As SortedList
|
||||||
Private oRemoteBackupData As SortedList
|
Private oRemoteBackupData As SortedList
|
||||||
@@ -20,6 +20,7 @@ Public Class frmGameManager
|
|||||||
Private oCurrentTagFilters As New List(Of clsTag)
|
Private oCurrentTagFilters As New List(Of clsTag)
|
||||||
Private oCurrentStringFilters As New Hashtable
|
Private oCurrentStringFilters As New Hashtable
|
||||||
Private eCurrentFilter As frmFilter.eFilterType = frmFilter.eFilterType.NoFilter
|
Private eCurrentFilter As frmFilter.eFilterType = frmFilter.eFilterType.NoFilter
|
||||||
|
Private WithEvents tmFilterTimer As Timer
|
||||||
|
|
||||||
Private Enum eModes As Integer
|
Private Enum eModes As Integer
|
||||||
View = 1
|
View = 1
|
||||||
@@ -113,11 +114,11 @@ Public Class frmGameManager
|
|||||||
End Set
|
End Set
|
||||||
End Property
|
End Property
|
||||||
|
|
||||||
Property RestoreList As List(Of clsGame)
|
Property RestoreList As Hashtable
|
||||||
Get
|
Get
|
||||||
Return oRestoreList
|
Return oRestoreList
|
||||||
End Get
|
End Get
|
||||||
Set(value As List(Of clsGame))
|
Set(value As Hashtable)
|
||||||
oRestoreList = value
|
oRestoreList = value
|
||||||
End Set
|
End Set
|
||||||
End Property
|
End Property
|
||||||
@@ -141,8 +142,8 @@ Public Class frmGameManager
|
|||||||
End Property
|
End Property
|
||||||
|
|
||||||
Private Sub LoadBackupData()
|
Private Sub LoadBackupData()
|
||||||
oRemoteBackupData = mgrManifest.ReadManifest(mgrSQLite.Database.Remote)
|
oRemoteBackupData = mgrManifest.ReadLatestManifest(mgrSQLite.Database.Remote)
|
||||||
oLocalBackupData = mgrManifest.ReadManifest(mgrSQLite.Database.Local)
|
oLocalBackupData = mgrManifest.ReadLatestManifest(mgrSQLite.Database.Local)
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
Private Function ConvertToRelativePath(ByVal sSavePath As String, ByVal sAppPath As String) As String
|
Private Function ConvertToRelativePath(ByVal sSavePath As String, ByVal sAppPath As String) As String
|
||||||
@@ -159,48 +160,54 @@ Public Class frmGameManager
|
|||||||
End Function
|
End Function
|
||||||
|
|
||||||
Private Sub CheckManifestandUpdate(ByVal oOriginalApp As clsGame, ByVal oNewApp As clsGame)
|
Private Sub CheckManifestandUpdate(ByVal oOriginalApp As clsGame, ByVal oNewApp As clsGame)
|
||||||
Dim oBackupItem As clsBackup
|
Dim oBackupItems As List(Of clsBackup)
|
||||||
Dim sDirectory As String
|
Dim sDirectory As String
|
||||||
Dim sNewDirectory As String
|
Dim sNewDirectory As String
|
||||||
Dim sFileName As String
|
Dim sFileName As String
|
||||||
Dim sNewFileName As String
|
Dim sNewFileName As String
|
||||||
|
|
||||||
'If there is a name change, check and update the manifest
|
'If there is a name change, check and update the manifest
|
||||||
If oNewApp.Name <> oOriginalApp.Name Then
|
If oNewApp.Name <> oOriginalApp.Name Then
|
||||||
'Local
|
'Local
|
||||||
If mgrManifest.DoManifestCheck(oOriginalApp.Name, mgrSQLite.Database.Local) Then
|
If mgrManifest.DoManifestNameCheck(oOriginalApp.Name, mgrSQLite.Database.Local) Then
|
||||||
oBackupItem = mgrManifest.DoManifestGetByName(oOriginalApp.Name, mgrSQLite.Database.Local)
|
oBackupItems = mgrManifest.DoManifestGetByName(oOriginalApp.Name, mgrSQLite.Database.Local)
|
||||||
|
'The local manifest will only have one entry per game, therefore this runs only once
|
||||||
|
For Each oBackupItem As clsBackup In oBackupItems
|
||||||
|
'Rename Current Backup File & Folder
|
||||||
|
sFileName = BackupFolder & oBackupItem.FileName
|
||||||
|
|
||||||
'Rename Current Backup File & Folder
|
'Rename Backup File
|
||||||
sFileName = BackupFolder & oBackupItem.FileName
|
sNewFileName = Path.GetDirectoryName(sFileName) & Path.DirectorySeparatorChar & Path.GetFileName(sFileName).Replace(oOriginalApp.Name, oNewApp.Name)
|
||||||
|
If File.Exists(sFileName) Then
|
||||||
'Rename Backup File
|
FileSystem.Rename(sFileName, sNewFileName)
|
||||||
sNewFileName = Path.GetDirectoryName(sFileName) & Path.DirectorySeparatorChar & Path.GetFileName(sFileName).Replace(oOriginalApp.Name, oNewApp.Name)
|
|
||||||
If File.Exists(sFileName) Then
|
|
||||||
FileSystem.Rename(sFileName, sNewFileName)
|
|
||||||
End If
|
|
||||||
|
|
||||||
'Rename Directory
|
|
||||||
sDirectory = Path.GetDirectoryName(sFileName)
|
|
||||||
sNewDirectory = sDirectory.Replace(oOriginalApp.Name, oNewApp.Name)
|
|
||||||
If sDirectory <> sNewDirectory Then
|
|
||||||
If Directory.Exists(sDirectory) Then
|
|
||||||
FileSystem.Rename(sDirectory, sNewDirectory)
|
|
||||||
End If
|
End If
|
||||||
End If
|
|
||||||
|
|
||||||
oBackupItem.Name = oNewApp.Name
|
'Rename Directory
|
||||||
oBackupItem.FileName = oBackupItem.FileName.Replace(oOriginalApp.Name, oNewApp.Name)
|
sDirectory = Path.GetDirectoryName(sFileName)
|
||||||
mgrManifest.DoManifestNameUpdate(oOriginalApp.Name, oBackupItem, mgrSQLite.Database.Local)
|
sNewDirectory = sDirectory.Replace(oOriginalApp.Name, oNewApp.Name)
|
||||||
oLocalBackupData = mgrManifest.ReadManifest(mgrSQLite.Database.Local)
|
If sDirectory <> sNewDirectory Then
|
||||||
|
If Directory.Exists(sDirectory) Then
|
||||||
|
FileSystem.Rename(sDirectory, sNewDirectory)
|
||||||
|
End If
|
||||||
|
End If
|
||||||
|
|
||||||
|
oBackupItem.Name = oNewApp.Name
|
||||||
|
oBackupItem.FileName = oBackupItem.FileName.Replace(oOriginalApp.Name, oNewApp.Name)
|
||||||
|
mgrManifest.DoManifestUpdateByID(oBackupItem, mgrSQLite.Database.Local)
|
||||||
|
Next
|
||||||
|
oLocalBackupData = mgrManifest.ReadLatestManifest(mgrSQLite.Database.Local)
|
||||||
End If
|
End If
|
||||||
|
|
||||||
'Remote
|
'Remote
|
||||||
If mgrManifest.DoManifestCheck(oOriginalApp.Name, mgrSQLite.Database.Remote) Then
|
If mgrManifest.DoManifestNameCheck(oOriginalApp.Name, mgrSQLite.Database.Remote) Then
|
||||||
oBackupItem = mgrManifest.DoManifestGetByName(oOriginalApp.Name, mgrSQLite.Database.Remote)
|
oBackupItems = mgrManifest.DoManifestGetByName(oOriginalApp.Name, mgrSQLite.Database.Remote)
|
||||||
oBackupItem.Name = oNewApp.Name
|
|
||||||
oBackupItem.FileName = oBackupItem.FileName.Replace(oOriginalApp.Name, oNewApp.Name)
|
For Each oBackupItem As clsBackup In oBackupItems
|
||||||
mgrManifest.DoManifestNameUpdate(oOriginalApp.Name, oBackupItem, mgrSQLite.Database.Remote)
|
oBackupItem.Name = oNewApp.Name
|
||||||
oRemoteBackupData = mgrManifest.ReadManifest(mgrSQLite.Database.Remote)
|
oBackupItem.FileName = oBackupItem.FileName.Replace(oOriginalApp.Name, oNewApp.Name)
|
||||||
|
mgrManifest.DoManifestUpdateByID(oBackupItem, mgrSQLite.Database.Remote)
|
||||||
|
Next
|
||||||
|
oRemoteBackupData = mgrManifest.ReadLatestManifest(mgrSQLite.Database.Remote)
|
||||||
End If
|
End If
|
||||||
End If
|
End If
|
||||||
End Sub
|
End Sub
|
||||||
@@ -280,7 +287,7 @@ Public Class frmGameManager
|
|||||||
End If
|
End If
|
||||||
End If
|
End If
|
||||||
|
|
||||||
sNewPath = mgrCommon.OpenFileBrowser(frmGameManager_ChooseExe, "exe", _
|
sNewPath = mgrCommon.OpenFileBrowser(frmGameManager_ChooseExe, "exe",
|
||||||
frmGameManager_Executable, sDefaultFolder, False)
|
frmGameManager_Executable, sDefaultFolder, False)
|
||||||
|
|
||||||
If sNewPath <> String.Empty Then
|
If sNewPath <> String.Empty Then
|
||||||
@@ -338,10 +345,10 @@ Public Class frmGameManager
|
|||||||
|
|
||||||
'Unix Handler
|
'Unix Handler
|
||||||
If Not mgrCommon.IsUnix Then
|
If Not mgrCommon.IsUnix Then
|
||||||
sNewPath = mgrCommon.OpenFileBrowser(frmGameManager_ChooseCustomIcon, "ico", _
|
sNewPath = mgrCommon.OpenFileBrowser(frmGameManager_ChooseCustomIcon, "ico",
|
||||||
frmGameManager_Icon, sDefaultFolder, False)
|
frmGameManager_Icon, sDefaultFolder, False)
|
||||||
Else
|
Else
|
||||||
sNewPath = mgrCommon.OpenFileBrowser(frmGameManager_ChooseCustomIcon, "png", _
|
sNewPath = mgrCommon.OpenFileBrowser(frmGameManager_ChooseCustomIcon, "png",
|
||||||
"PNG", sDefaultFolder, False)
|
"PNG", sDefaultFolder, False)
|
||||||
End If
|
End If
|
||||||
|
|
||||||
@@ -377,11 +384,19 @@ Public Class frmGameManager
|
|||||||
Dim oApp As clsGame
|
Dim oApp As clsGame
|
||||||
Dim oData As KeyValuePair(Of String, String)
|
Dim oData As KeyValuePair(Of String, String)
|
||||||
Dim oList As New List(Of KeyValuePair(Of String, String))
|
Dim oList As New List(Of KeyValuePair(Of String, String))
|
||||||
|
Dim sFilter As String = txtQuickFilter.Text
|
||||||
|
|
||||||
For Each de As DictionaryEntry In AppData
|
For Each de As DictionaryEntry In AppData
|
||||||
oApp = DirectCast(de.Value, clsGame)
|
oApp = DirectCast(de.Value, clsGame)
|
||||||
oData = New KeyValuePair(Of String, String)(oApp.ID, oApp.Name)
|
oData = New KeyValuePair(Of String, String)(oApp.ID, oApp.Name)
|
||||||
oList.Add(oData)
|
'Apply the quick filter if applicable
|
||||||
|
If sFilter = String.Empty Then
|
||||||
|
oList.Add(oData)
|
||||||
|
Else
|
||||||
|
If oApp.Name.ToLower.Contains(sFilter.ToLower) Then
|
||||||
|
oList.Add(oData)
|
||||||
|
End If
|
||||||
|
End If
|
||||||
Next
|
Next
|
||||||
|
|
||||||
oList.Sort(AddressOf mgrCommon.CompareByListBoxItemByValue)
|
oList.Sort(AddressOf mgrCommon.CompareByListBoxItemByValue)
|
||||||
@@ -487,12 +502,12 @@ Public Class frmGameManager
|
|||||||
Dim oProcessStartInfo As ProcessStartInfo
|
Dim oProcessStartInfo As ProcessStartInfo
|
||||||
|
|
||||||
If CurrentBackupItem.AbsolutePath Then
|
If CurrentBackupItem.AbsolutePath Then
|
||||||
sPath = CurrentBackupItem.RestorePath
|
sPath = CurrentBackupItem.RestorePath
|
||||||
Else
|
Else
|
||||||
If FindRestorePath() Then
|
If FindRestorePath() Then
|
||||||
sPath = CurrentBackupItem.RelativeRestorePath
|
sPath = CurrentBackupItem.RelativeRestorePath
|
||||||
End If
|
|
||||||
End If
|
End If
|
||||||
|
End If
|
||||||
|
|
||||||
If Directory.Exists(sPath) Then
|
If Directory.Exists(sPath) Then
|
||||||
oProcessStartInfo = New ProcessStartInfo
|
oProcessStartInfo = New ProcessStartInfo
|
||||||
@@ -532,13 +547,49 @@ Public Class frmGameManager
|
|||||||
ModeChange()
|
ModeChange()
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
Private Sub GetBackupInfo(ByVal oApp As clsGame)
|
Private Sub UpdateBackupInfo(ByVal sManifestID As String)
|
||||||
Dim oBackupInfo As clsBackup
|
|
||||||
Dim sFileName As String
|
Dim sFileName As String
|
||||||
|
|
||||||
|
If sManifestID <> String.Empty Then
|
||||||
|
CurrentBackupItem = mgrManifest.DoManifestGetByID(sManifestID, mgrSQLite.Database.Remote)
|
||||||
|
|
||||||
|
sFileName = BackupFolder & CurrentBackupItem.FileName
|
||||||
|
|
||||||
|
If File.Exists(sFileName) Then
|
||||||
|
lblBackupFileData.Text = Path.GetFileName(CurrentBackupItem.FileName) & " (" & mgrCommon.GetFileSize(sFileName) & ")"
|
||||||
|
Else
|
||||||
|
lblBackupFileData.Text = frmGameManager_ErrorNoBackupExists
|
||||||
|
End If
|
||||||
|
|
||||||
|
mgrRestore.DoPathOverride(CurrentBackupItem, CurrentGame)
|
||||||
|
lblRestorePathData.Text = CurrentBackupItem.RestorePath
|
||||||
|
End If
|
||||||
|
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Sub GetBackupInfo(ByVal oApp As clsGame)
|
||||||
|
Dim oBackupInfo As clsBackup
|
||||||
|
Dim oCurrentBackup As clsBackup
|
||||||
|
Dim oCurrentBackups As List(Of clsBackup)
|
||||||
|
Dim sFileName As String
|
||||||
|
Dim oComboItems As New List(Of KeyValuePair(Of String, String))
|
||||||
|
Dim bLocalData As Boolean = False
|
||||||
|
Dim bRemoteData As Boolean = False
|
||||||
|
|
||||||
|
'cboRemoteBackup
|
||||||
|
cboRemoteBackup.ValueMember = "Key"
|
||||||
|
cboRemoteBackup.DisplayMember = "Value"
|
||||||
|
|
||||||
If oRemoteBackupData.Contains(oApp.Name) Then
|
If oRemoteBackupData.Contains(oApp.Name) Then
|
||||||
|
bRemoteData = True
|
||||||
|
oCurrentBackups = mgrManifest.DoManifestGetByName(oApp.Name, mgrSQLite.Database.Remote)
|
||||||
|
|
||||||
|
For Each oCurrentBackup In oCurrentBackups
|
||||||
|
oComboItems.Add(New KeyValuePair(Of String, String)(oCurrentBackup.ID, mgrCommon.FormatString(frmGameManager_BackupTimeAndName, New String() {oCurrentBackup.DateUpdated, oCurrentBackup.UpdatedBy})))
|
||||||
|
Next
|
||||||
|
|
||||||
CurrentBackupItem = DirectCast(oRemoteBackupData(oApp.Name), clsBackup)
|
CurrentBackupItem = DirectCast(oRemoteBackupData(oApp.Name), clsBackup)
|
||||||
txtCurrentBackup.Text = mgrCommon.FormatString(frmGameManager_BackupTimeAndName, New String() {CurrentBackupItem.DateUpdated, CurrentBackupItem.UpdatedBy})
|
|
||||||
sFileName = BackupFolder & CurrentBackupItem.FileName
|
sFileName = BackupFolder & CurrentBackupItem.FileName
|
||||||
|
|
||||||
btnOpenBackupFile.Enabled = True
|
btnOpenBackupFile.Enabled = True
|
||||||
@@ -547,80 +598,95 @@ Public Class frmGameManager
|
|||||||
btnDeleteBackup.Enabled = True
|
btnDeleteBackup.Enabled = True
|
||||||
|
|
||||||
If File.Exists(sFileName) Then
|
If File.Exists(sFileName) Then
|
||||||
txtFileSize.Text = mgrCommon.GetFileSize(sFileName)
|
lblBackupFileData.Text = Path.GetFileName(CurrentBackupItem.FileName) & " (" & mgrCommon.GetFileSize(sFileName) & ")"
|
||||||
Else
|
Else
|
||||||
txtFileSize.Text = frmGameManager_ErrorNoBackupExists
|
lblBackupFileData.Text = frmGameManager_ErrorNoBackupExists
|
||||||
End If
|
End If
|
||||||
|
|
||||||
mgrRestore.DoPathOverride(CurrentBackupItem, oApp)
|
mgrRestore.DoPathOverride(CurrentBackupItem, oApp)
|
||||||
txtRestorePath.Text = CurrentBackupItem.RestorePath
|
lblRestorePathData.Text = CurrentBackupItem.RestorePath
|
||||||
Else
|
Else
|
||||||
txtCurrentBackup.Text = frmGameManager_Never
|
oComboItems.Add(New KeyValuePair(Of String, String)(String.Empty, frmGameManager_None))
|
||||||
txtFileSize.Text = String.Empty
|
lblBackupFileData.Text = String.Empty
|
||||||
txtRestorePath.Text = String.Empty
|
lblRestorePathData.Text = String.Empty
|
||||||
btnOpenBackupFile.Enabled = False
|
btnOpenBackupFile.Enabled = False
|
||||||
btnOpenRestorePath.Enabled = False
|
btnOpenRestorePath.Enabled = False
|
||||||
btnRestore.Enabled = False
|
btnRestore.Enabled = False
|
||||||
btnDeleteBackup.Enabled = False
|
btnDeleteBackup.Enabled = False
|
||||||
End If
|
End If
|
||||||
|
|
||||||
|
cboRemoteBackup.DataSource = oComboItems
|
||||||
|
|
||||||
If oLocalBackupData.Contains(oApp.Name) Then
|
If oLocalBackupData.Contains(oApp.Name) Then
|
||||||
|
bLocalData = True
|
||||||
oBackupInfo = DirectCast(oLocalBackupData(oApp.Name), clsBackup)
|
oBackupInfo = DirectCast(oLocalBackupData(oApp.Name), clsBackup)
|
||||||
txtLocalBackup.Text = mgrCommon.FormatString(frmGameManager_BackupTimeAndName, New String() {oBackupInfo.DateUpdated, oBackupInfo.UpdatedBy})
|
lblLocalBackupData.Text = mgrCommon.FormatString(frmGameManager_BackupTimeAndName, New String() {oBackupInfo.DateUpdated, oBackupInfo.UpdatedBy})
|
||||||
Else
|
Else
|
||||||
txtLocalBackup.Text = frmGameManager_Never
|
lblLocalBackupData.Text = frmGameManager_Unknown
|
||||||
End If
|
End If
|
||||||
|
|
||||||
If txtCurrentBackup.Text = frmGameManager_Never And txtLocalBackup.Text = frmGameManager_Never Then
|
If Not bRemoteData And Not bLocalData Then
|
||||||
lblSync.Visible = False
|
|
||||||
btnMarkAsRestored.Enabled = False
|
btnMarkAsRestored.Enabled = False
|
||||||
ElseIf txtCurrentBackup.Text = frmGameManager_Never And txtLocalBackup.Text <> frmGameManager_Never Then
|
lblLocalBackupData.ForeColor = Color.Black
|
||||||
lblSync.Visible = False
|
ElseIf Not bRemoteData And bLocalData Then
|
||||||
btnMarkAsRestored.Enabled = False
|
btnMarkAsRestored.Enabled = False
|
||||||
ElseIf txtCurrentBackup.Text <> txtLocalBackup.Text Then
|
lblLocalBackupData.ForeColor = Color.Black
|
||||||
lblSync.ForeColor = Color.Red
|
ElseIf oComboItems(0).Value <> lblLocalBackupData.Text Then
|
||||||
lblSync.Text = frmGameManager_OutofSync
|
lblLocalBackupData.ForeColor = Color.Red
|
||||||
lblSync.Visible = True
|
|
||||||
btnMarkAsRestored.Enabled = True
|
btnMarkAsRestored.Enabled = True
|
||||||
Else
|
Else
|
||||||
lblSync.ForeColor = Color.Green
|
lblLocalBackupData.ForeColor = Color.Green
|
||||||
lblSync.Text = frmGameManager_UpToDate
|
|
||||||
lblSync.Visible = True
|
|
||||||
btnMarkAsRestored.Enabled = False
|
btnMarkAsRestored.Enabled = False
|
||||||
End If
|
End If
|
||||||
|
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
Private Sub DeleteBackup()
|
Private Sub DeleteAllBackups()
|
||||||
Dim oDir As DirectoryInfo
|
Dim oBackupData As List(Of clsBackup)
|
||||||
Dim sSubDir As String
|
Dim oBackup As clsBackup
|
||||||
|
|
||||||
If mgrCommon.ShowMessage(frmGameManager_ConfirmBackupDelete, CurrentBackupItem.Name, MsgBoxStyle.YesNo) = MsgBoxResult.Yes Then
|
If mgrCommon.ShowMessage(frmGameManager_ConfirmBackupDeleteAll, CurrentGame.Name, MsgBoxStyle.YesNo) = MsgBoxResult.Yes Then
|
||||||
mgrManifest.DoManifestDelete(CurrentBackupItem, mgrSQLite.Database.Local)
|
oBackupData = mgrManifest.DoManifestGetByName(CurrentGame.Name, mgrSQLite.Database.Remote)
|
||||||
mgrManifest.DoManifestDelete(CurrentBackupItem, mgrSQLite.Database.Remote)
|
|
||||||
|
For Each oBackup In oBackupData
|
||||||
|
'Delete the specific remote manifest entry
|
||||||
|
mgrManifest.DoManifestDeletebyID(oBackup, mgrSQLite.Database.Remote)
|
||||||
|
'Delete referenced backup file from the backup folder
|
||||||
|
mgrCommon.DeleteFile(BackupFolder & oBackup.FileName)
|
||||||
|
'Check for sub-directory and delete if empty (we need to do this every pass just in case the user had a mix of settings at one point)
|
||||||
|
mgrCommon.DeleteDirectoryByBackup(BackupFolder, oBackup)
|
||||||
|
Next
|
||||||
|
|
||||||
|
'Delete local manifest entry
|
||||||
|
mgrManifest.DoManifestDeletebyName(CurrentBackupItem, mgrSQLite.Database.Local)
|
||||||
|
|
||||||
|
LoadBackupData()
|
||||||
|
|
||||||
|
If oCurrentGame.Temporary Then
|
||||||
|
LoadData()
|
||||||
|
eCurrentMode = eModes.Disabled
|
||||||
|
ModeChange()
|
||||||
|
Else
|
||||||
|
FillData()
|
||||||
|
End If
|
||||||
|
End If
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Sub DeleteBackup()
|
||||||
|
If mgrCommon.ShowMessage(frmGameManager_ConfirmBackupDelete, Path.GetFileName(CurrentBackupItem.FileName), MsgBoxStyle.YesNo) = MsgBoxResult.Yes Then
|
||||||
|
'Delete the specific remote manifest entry
|
||||||
|
mgrManifest.DoManifestDeletebyID(CurrentBackupItem, mgrSQLite.Database.Remote)
|
||||||
|
|
||||||
|
'If a remote manifest entry no longer exists for this game, delete the local entry
|
||||||
|
If Not mgrManifest.DoGlobalManifestCheck(CurrentBackupItem.Name, mgrSQLite.Database.Remote) Then
|
||||||
|
mgrManifest.DoManifestDeletebyName(CurrentBackupItem, mgrSQLite.Database.Local)
|
||||||
|
End If
|
||||||
|
|
||||||
'Delete referenced backup file from the backup folder
|
'Delete referenced backup file from the backup folder
|
||||||
mgrCommon.DeleteFile(BackupFolder & CurrentBackupItem.FileName)
|
mgrCommon.DeleteFile(BackupFolder & CurrentBackupItem.FileName)
|
||||||
|
|
||||||
'Check if using backup sub-directories (Probably not the best way to check for this)
|
'Check for sub-directory and delete if empty
|
||||||
If CurrentBackupItem.FileName.StartsWith(CurrentBackupItem.Name & Path.DirectorySeparatorChar) Then
|
mgrCommon.DeleteDirectoryByBackup(BackupFolder, CurrentBackupItem)
|
||||||
'Build sub-dir backup path
|
|
||||||
sSubDir = BackupFolder & CurrentBackupItem.Name
|
|
||||||
|
|
||||||
If Directory.Exists(sSubDir) Then
|
|
||||||
'Check if there's any sub-directories or files remaining
|
|
||||||
oDir = New DirectoryInfo(sSubDir)
|
|
||||||
If oDir.GetDirectories.Length > 0 Or oDir.GetFiles.Length > 0 Then
|
|
||||||
'Confirm
|
|
||||||
If mgrCommon.ShowMessage(frmGameManager_ConfirmBackupFolderDelete, New String() {sSubDir, oDir.GetDirectories.Length, oDir.GetFiles.Length}, MsgBoxStyle.YesNo) = MsgBoxResult.Yes Then
|
|
||||||
If Directory.Exists(sSubDir) Then mgrCommon.DeleteDirectory(sSubDir, True)
|
|
||||||
End If
|
|
||||||
Else
|
|
||||||
'Folder is empty, delete the empty sub-folder
|
|
||||||
If Directory.Exists(sSubDir) Then mgrCommon.DeleteDirectory(sSubDir)
|
|
||||||
End If
|
|
||||||
End If
|
|
||||||
End If
|
|
||||||
|
|
||||||
LoadBackupData()
|
LoadBackupData()
|
||||||
|
|
||||||
@@ -649,6 +715,7 @@ Public Class frmGameManager
|
|||||||
txtExclude.Text = oApp.ExcludeList
|
txtExclude.Text = oApp.ExcludeList
|
||||||
chkFolderSave.Checked = oApp.FolderSave
|
chkFolderSave.Checked = oApp.FolderSave
|
||||||
chkTimeStamp.Checked = oApp.AppendTimeStamp
|
chkTimeStamp.Checked = oApp.AppendTimeStamp
|
||||||
|
nudLimit.Value = oApp.BackupLimit
|
||||||
chkEnabled.Checked = oApp.Enabled
|
chkEnabled.Checked = oApp.Enabled
|
||||||
chkMonitorOnly.Checked = oApp.MonitorOnly
|
chkMonitorOnly.Checked = oApp.MonitorOnly
|
||||||
|
|
||||||
@@ -720,9 +787,6 @@ Public Class frmGameManager
|
|||||||
AddHandler DirectCast(ctl, NumericUpDown).ValueChanged, AddressOf DirtyCheck_ValueChanged
|
AddHandler DirectCast(ctl, NumericUpDown).ValueChanged, AddressOf DirtyCheck_ValueChanged
|
||||||
End If
|
End If
|
||||||
Next
|
Next
|
||||||
|
|
||||||
'Exemptions
|
|
||||||
RemoveHandler txtRestorePath.TextChanged, AddressOf DirtyCheck_ValueChanged
|
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
Private Sub AssignDirtyHandlersMisc()
|
Private Sub AssignDirtyHandlersMisc()
|
||||||
@@ -736,8 +800,12 @@ Public Class frmGameManager
|
|||||||
DirectCast(ctl, TextBox).Text = String.Empty
|
DirectCast(ctl, TextBox).Text = String.Empty
|
||||||
ElseIf TypeOf ctl Is CheckBox Then
|
ElseIf TypeOf ctl Is CheckBox Then
|
||||||
DirectCast(ctl, CheckBox).Checked = False
|
DirectCast(ctl, CheckBox).Checked = False
|
||||||
|
ElseIf TypeOf ctl Is Label Then
|
||||||
|
If ctl.Tag = "wipe" Then DirectCast(ctl, Label).Text = String.Empty
|
||||||
ElseIf TypeOf ctl Is NumericUpDown Then
|
ElseIf TypeOf ctl Is NumericUpDown Then
|
||||||
DirectCast(ctl, NumericUpDown).Value = 0
|
DirectCast(ctl, NumericUpDown).Value = DirectCast(ctl, NumericUpDown).Minimum
|
||||||
|
ElseIf TypeOf ctl Is ComboBox Then
|
||||||
|
DirectCast(ctl, ComboBox).DataSource = Nothing
|
||||||
End If
|
End If
|
||||||
Next
|
Next
|
||||||
End Sub
|
End Sub
|
||||||
@@ -749,6 +817,8 @@ Public Class frmGameManager
|
|||||||
Case eModes.Add
|
Case eModes.Add
|
||||||
grpFilter.Enabled = False
|
grpFilter.Enabled = False
|
||||||
lstGames.Enabled = False
|
lstGames.Enabled = False
|
||||||
|
lblQuickFilter.Enabled = False
|
||||||
|
txtQuickFilter.Enabled = False
|
||||||
grpConfig.Enabled = True
|
grpConfig.Enabled = True
|
||||||
chkMonitorOnly.Enabled = True
|
chkMonitorOnly.Enabled = True
|
||||||
grpExtra.Enabled = True
|
grpExtra.Enabled = True
|
||||||
@@ -769,7 +839,6 @@ Public Class frmGameManager
|
|||||||
btnDeleteBackup.Enabled = False
|
btnDeleteBackup.Enabled = False
|
||||||
btnOpenBackupFile.Enabled = False
|
btnOpenBackupFile.Enabled = False
|
||||||
btnOpenRestorePath.Enabled = False
|
btnOpenRestorePath.Enabled = False
|
||||||
lblSync.Visible = False
|
|
||||||
chkEnabled.Checked = True
|
chkEnabled.Checked = True
|
||||||
chkMonitorOnly.Checked = False
|
chkMonitorOnly.Checked = False
|
||||||
btnTags.Enabled = False
|
btnTags.Enabled = False
|
||||||
@@ -781,6 +850,8 @@ Public Class frmGameManager
|
|||||||
Case eModes.Edit
|
Case eModes.Edit
|
||||||
grpFilter.Enabled = False
|
grpFilter.Enabled = False
|
||||||
lstGames.Enabled = False
|
lstGames.Enabled = False
|
||||||
|
lblQuickFilter.Enabled = False
|
||||||
|
txtQuickFilter.Enabled = False
|
||||||
grpConfig.Enabled = True
|
grpConfig.Enabled = True
|
||||||
chkEnabled.Enabled = True
|
chkEnabled.Enabled = True
|
||||||
chkMonitorOnly.Enabled = True
|
chkMonitorOnly.Enabled = True
|
||||||
@@ -803,6 +874,8 @@ Public Class frmGameManager
|
|||||||
Case eModes.View
|
Case eModes.View
|
||||||
grpFilter.Enabled = True
|
grpFilter.Enabled = True
|
||||||
lstGames.Enabled = True
|
lstGames.Enabled = True
|
||||||
|
lblQuickFilter.Enabled = True
|
||||||
|
txtQuickFilter.Enabled = True
|
||||||
grpConfig.Enabled = True
|
grpConfig.Enabled = True
|
||||||
chkEnabled.Enabled = True
|
chkEnabled.Enabled = True
|
||||||
chkMonitorOnly.Enabled = True
|
chkMonitorOnly.Enabled = True
|
||||||
@@ -820,6 +893,8 @@ Public Class frmGameManager
|
|||||||
Case eModes.ViewTemp
|
Case eModes.ViewTemp
|
||||||
grpFilter.Enabled = True
|
grpFilter.Enabled = True
|
||||||
lstGames.Enabled = True
|
lstGames.Enabled = True
|
||||||
|
lblQuickFilter.Enabled = True
|
||||||
|
txtQuickFilter.Enabled = True
|
||||||
grpConfig.Enabled = False
|
grpConfig.Enabled = False
|
||||||
chkEnabled.Enabled = False
|
chkEnabled.Enabled = False
|
||||||
chkMonitorOnly.Enabled = False
|
chkMonitorOnly.Enabled = False
|
||||||
@@ -840,11 +915,12 @@ Public Class frmGameManager
|
|||||||
Case eModes.Disabled
|
Case eModes.Disabled
|
||||||
grpFilter.Enabled = True
|
grpFilter.Enabled = True
|
||||||
lstGames.Enabled = True
|
lstGames.Enabled = True
|
||||||
|
lblQuickFilter.Enabled = True
|
||||||
|
txtQuickFilter.Enabled = True
|
||||||
WipeControls(grpConfig.Controls)
|
WipeControls(grpConfig.Controls)
|
||||||
WipeControls(grpExtra.Controls)
|
WipeControls(grpExtra.Controls)
|
||||||
WipeControls(grpStats.Controls)
|
WipeControls(grpStats.Controls)
|
||||||
pbIcon.Image = Icon_Unknown
|
pbIcon.Image = Icon_Unknown
|
||||||
lblSync.Visible = False
|
|
||||||
btnSave.Enabled = False
|
btnSave.Enabled = False
|
||||||
btnCancel.Enabled = False
|
btnCancel.Enabled = False
|
||||||
grpConfig.Enabled = False
|
grpConfig.Enabled = False
|
||||||
@@ -865,11 +941,12 @@ Public Class frmGameManager
|
|||||||
btnExport.Enabled = True
|
btnExport.Enabled = True
|
||||||
Case eModes.MultiSelect
|
Case eModes.MultiSelect
|
||||||
lstGames.Enabled = True
|
lstGames.Enabled = True
|
||||||
|
lblQuickFilter.Enabled = False
|
||||||
|
txtQuickFilter.Enabled = False
|
||||||
WipeControls(grpConfig.Controls)
|
WipeControls(grpConfig.Controls)
|
||||||
WipeControls(grpExtra.Controls)
|
WipeControls(grpExtra.Controls)
|
||||||
WipeControls(grpStats.Controls)
|
WipeControls(grpStats.Controls)
|
||||||
pbIcon.Image = Icon_Unknown
|
pbIcon.Image = Icon_Unknown
|
||||||
lblSync.Visible = False
|
|
||||||
btnSave.Enabled = True
|
btnSave.Enabled = True
|
||||||
btnCancel.Enabled = False
|
btnCancel.Enabled = False
|
||||||
grpConfig.Enabled = False
|
grpConfig.Enabled = False
|
||||||
@@ -907,36 +984,15 @@ Public Class frmGameManager
|
|||||||
End If
|
End If
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
Private Sub MonitorOnlyModeChange()
|
Private Sub TimeStampModeChange()
|
||||||
If chkMonitorOnly.Checked Then
|
If chkTimeStamp.Checked Then
|
||||||
txtSavePath.Text = String.Empty
|
nudLimit.Visible = True
|
||||||
chkFolderSave.Checked = True
|
lblLimit.Visible = True
|
||||||
chkTimeStamp.Checked = False
|
nudLimit.Value = 5
|
||||||
|
|
||||||
If txtFileType.Text <> String.Empty Then
|
|
||||||
txtFileType.Text = String.Empty
|
|
||||||
UpdateBuilderButtonLabel(txtFileType.Text, frmGameManager_IncludeShortcut, btnInclude, False)
|
|
||||||
End If
|
|
||||||
If txtExclude.Text <> String.Empty Then
|
|
||||||
txtExclude.Text = String.Empty
|
|
||||||
UpdateBuilderButtonLabel(txtExclude.Text, frmGameManager_ExcludeShortcut, btnExclude, False)
|
|
||||||
End If
|
|
||||||
|
|
||||||
lblSavePath.Enabled = False
|
|
||||||
btnSavePathBrowse.Enabled = False
|
|
||||||
txtSavePath.Enabled = False
|
|
||||||
chkFolderSave.Enabled = False
|
|
||||||
chkTimeStamp.Enabled = False
|
|
||||||
btnInclude.Enabled = False
|
|
||||||
btnExclude.Enabled = False
|
|
||||||
Else
|
Else
|
||||||
lblSavePath.Enabled = True
|
nudLimit.Visible = False
|
||||||
btnSavePathBrowse.Enabled = True
|
nudLimit.Value = nudLimit.Minimum
|
||||||
txtSavePath.Enabled = True
|
lblLimit.Visible = False
|
||||||
chkFolderSave.Enabled = True
|
|
||||||
chkTimeStamp.Enabled = True
|
|
||||||
btnInclude.Enabled = True
|
|
||||||
btnExclude.Enabled = True
|
|
||||||
End If
|
End If
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
@@ -1007,6 +1063,7 @@ Public Class frmGameManager
|
|||||||
oApp.ExcludeList = txtExclude.Text
|
oApp.ExcludeList = txtExclude.Text
|
||||||
oApp.FolderSave = chkFolderSave.Checked
|
oApp.FolderSave = chkFolderSave.Checked
|
||||||
oApp.AppendTimeStamp = chkTimeStamp.Checked
|
oApp.AppendTimeStamp = chkTimeStamp.Checked
|
||||||
|
oApp.BackupLimit = nudLimit.Value
|
||||||
oApp.Enabled = chkEnabled.Checked
|
oApp.Enabled = chkEnabled.Checked
|
||||||
oApp.MonitorOnly = chkMonitorOnly.Checked
|
oApp.MonitorOnly = chkMonitorOnly.Checked
|
||||||
oApp.ProcessPath = txtAppPath.Text
|
oApp.ProcessPath = txtAppPath.Text
|
||||||
@@ -1139,8 +1196,8 @@ Public Class frmGameManager
|
|||||||
If oMarkList.Count = 1 Then
|
If oMarkList.Count = 1 Then
|
||||||
If mgrCommon.ShowMessage(frmGameManager_ConfirmMark, oMarkList(0).Name, MsgBoxStyle.YesNo) = MsgBoxResult.Yes Then
|
If mgrCommon.ShowMessage(frmGameManager_ConfirmMark, oMarkList(0).Name, MsgBoxStyle.YesNo) = MsgBoxResult.Yes Then
|
||||||
bWasUpdated = True
|
bWasUpdated = True
|
||||||
If mgrManifest.DoManifestCheck(oMarkList(0).Name, mgrSQLite.Database.Local) Then
|
If mgrManifest.DoGlobalManifestCheck(oMarkList(0).Name, mgrSQLite.Database.Local) Then
|
||||||
mgrManifest.DoManifestUpdate(oMarkList(0), mgrSQLite.Database.Local)
|
mgrManifest.DoManifestUpdateByName(oMarkList(0), mgrSQLite.Database.Local)
|
||||||
Else
|
Else
|
||||||
mgrManifest.DoManifestAdd(oMarkList(0), mgrSQLite.Database.Local)
|
mgrManifest.DoManifestAdd(oMarkList(0), mgrSQLite.Database.Local)
|
||||||
End If
|
End If
|
||||||
@@ -1149,8 +1206,8 @@ Public Class frmGameManager
|
|||||||
If mgrCommon.ShowMessage(frmGameManager_ConfirmMultiMark, oMarkList.Count, MsgBoxStyle.YesNo) = MsgBoxResult.Yes Then
|
If mgrCommon.ShowMessage(frmGameManager_ConfirmMultiMark, oMarkList.Count, MsgBoxStyle.YesNo) = MsgBoxResult.Yes Then
|
||||||
bWasUpdated = True
|
bWasUpdated = True
|
||||||
For Each oGameBackup In oMarkList
|
For Each oGameBackup In oMarkList
|
||||||
If mgrManifest.DoManifestCheck(oGameBackup.Name, mgrSQLite.Database.Local) Then
|
If mgrManifest.DoGlobalManifestCheck(oGameBackup.Name, mgrSQLite.Database.Local) Then
|
||||||
mgrManifest.DoManifestUpdate(oGameBackup, mgrSQLite.Database.Local)
|
mgrManifest.DoManifestUpdateByName(oGameBackup, mgrSQLite.Database.Local)
|
||||||
Else
|
Else
|
||||||
mgrManifest.DoManifestAdd(oGameBackup, mgrSQLite.Database.Local)
|
mgrManifest.DoManifestAdd(oGameBackup, mgrSQLite.Database.Local)
|
||||||
End If
|
End If
|
||||||
@@ -1177,10 +1234,11 @@ Public Class frmGameManager
|
|||||||
End If
|
End If
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
Private Sub TriggerSelectedBackup()
|
Private Sub TriggerSelectedBackup(Optional ByVal bPrompt As Boolean = True)
|
||||||
Dim oData As KeyValuePair(Of String, String)
|
Dim oData As KeyValuePair(Of String, String)
|
||||||
Dim sMsg As String = String.Empty
|
Dim sMsg As String = String.Empty
|
||||||
Dim oGame As clsGame
|
Dim oGame As clsGame
|
||||||
|
Dim bDoBackup As Boolean = False
|
||||||
|
|
||||||
If lstGames.SelectedItems.Count > 0 Then
|
If lstGames.SelectedItems.Count > 0 Then
|
||||||
BackupList.Clear()
|
BackupList.Clear()
|
||||||
@@ -1191,41 +1249,61 @@ Public Class frmGameManager
|
|||||||
Next
|
Next
|
||||||
|
|
||||||
If BackupList.Count = 1 Then
|
If BackupList.Count = 1 Then
|
||||||
|
bDoBackup = True
|
||||||
sMsg = mgrCommon.FormatString(frmGameManager_ConfirmBackup, BackupList(0).Name)
|
sMsg = mgrCommon.FormatString(frmGameManager_ConfirmBackup, BackupList(0).Name)
|
||||||
ElseIf BackupList.Count > 1 Then
|
ElseIf BackupList.Count > 1 Then
|
||||||
|
bDoBackup = True
|
||||||
sMsg = mgrCommon.FormatString(frmGameManager_ConfirmMultiBackup, BackupList.Count)
|
sMsg = mgrCommon.FormatString(frmGameManager_ConfirmMultiBackup, BackupList.Count)
|
||||||
|
Else
|
||||||
|
mgrCommon.ShowMessage(frmGameManager_ErrorNoValidBackup, MsgBoxStyle.Information)
|
||||||
End If
|
End If
|
||||||
|
|
||||||
If mgrCommon.ShowMessage(sMsg, MsgBoxStyle.YesNo) = MsgBoxResult.Yes Then
|
If bDoBackup Then
|
||||||
TriggerBackup = True
|
If bPrompt Then
|
||||||
Me.Close()
|
If mgrCommon.ShowMessage(sMsg, MsgBoxStyle.YesNo) = MsgBoxResult.Yes Then
|
||||||
|
TriggerBackup = True
|
||||||
|
Me.Close()
|
||||||
|
End If
|
||||||
|
Else
|
||||||
|
TriggerBackup = True
|
||||||
|
Me.Close()
|
||||||
|
End If
|
||||||
End If
|
End If
|
||||||
End If
|
End If
|
||||||
|
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
Private Sub TriggerSelectedRestore()
|
Private Sub TriggerSelectedRestore(Optional ByVal bPrompt As Boolean = True)
|
||||||
Dim oData As KeyValuePair(Of String, String)
|
Dim oData As KeyValuePair(Of String, String)
|
||||||
Dim sMsg As String = String.Empty
|
Dim sMsg As String = String.Empty
|
||||||
Dim oGame As clsGame
|
Dim oGame As clsGame
|
||||||
|
Dim oBackup As clsBackup
|
||||||
Dim bDoRestore As Boolean = False
|
Dim bDoRestore As Boolean = False
|
||||||
|
|
||||||
If lstGames.SelectedItems.Count > 0 Then
|
If lstGames.SelectedItems.Count > 0 Then
|
||||||
RestoreList.Clear()
|
RestoreList.Clear()
|
||||||
|
|
||||||
For Each oData In lstGames.SelectedItems
|
If lstGames.SelectedItems.Count = 1 Then
|
||||||
If oRemoteBackupData.Contains(oData.Value) Then
|
RestoreList.Add(CurrentGame, CurrentBackupItem)
|
||||||
oGame = DirectCast(AppData(oData.Key), clsGame)
|
Else
|
||||||
RestoreList.Add(oGame)
|
For Each oData In lstGames.SelectedItems
|
||||||
End If
|
If oRemoteBackupData.Contains(oData.Value) Then
|
||||||
Next
|
oGame = DirectCast(AppData(oData.Key), clsGame)
|
||||||
|
oBackup = DirectCast(oRemoteBackupData(oData.Value), clsBackup)
|
||||||
|
RestoreList.Add(oGame, oBackup)
|
||||||
|
End If
|
||||||
|
Next
|
||||||
|
End If
|
||||||
|
|
||||||
If RestoreList.Count = 1 Then
|
If RestoreList.Count = 1 Then
|
||||||
bDoRestore = True
|
bDoRestore = True
|
||||||
If Not mgrRestore.CheckManifest(RestoreList(0).Name) Then
|
oGame = New clsGame
|
||||||
sMsg = mgrCommon.FormatString(frmGameManager_ConfirmRestoreAnyway, RestoreList(0).Name)
|
For Each de As DictionaryEntry In RestoreList
|
||||||
|
oGame = DirectCast(de.Key, clsGame)
|
||||||
|
Next
|
||||||
|
If Not mgrRestore.CheckManifest(oGame.Name) Then
|
||||||
|
sMsg = mgrCommon.FormatString(frmGameManager_ConfirmRestoreAnyway, oGame.Name)
|
||||||
Else
|
Else
|
||||||
sMsg = mgrCommon.FormatString(frmGameManager_ConfirmRestore, RestoreList(0).Name)
|
sMsg = mgrCommon.FormatString(frmGameManager_ConfirmRestore, oGame.Name)
|
||||||
End If
|
End If
|
||||||
ElseIf RestoreList.Count > 1 Then
|
ElseIf RestoreList.Count > 1 Then
|
||||||
bDoRestore = True
|
bDoRestore = True
|
||||||
@@ -1234,9 +1312,13 @@ Public Class frmGameManager
|
|||||||
mgrCommon.ShowMessage(frmGameManager_ErrorNoBackupData, MsgBoxStyle.Information)
|
mgrCommon.ShowMessage(frmGameManager_ErrorNoBackupData, MsgBoxStyle.Information)
|
||||||
End If
|
End If
|
||||||
|
|
||||||
'We need this check in case a bunch of games with no backups are multi-selected
|
|
||||||
If bDoRestore Then
|
If bDoRestore Then
|
||||||
If mgrCommon.ShowMessage(sMsg, MsgBoxStyle.YesNo) = MsgBoxResult.Yes Then
|
If bPrompt Then
|
||||||
|
If mgrCommon.ShowMessage(sMsg, MsgBoxStyle.YesNo) = MsgBoxResult.Yes Then
|
||||||
|
TriggerRestore = True
|
||||||
|
Me.Close()
|
||||||
|
End If
|
||||||
|
Else
|
||||||
TriggerRestore = True
|
TriggerRestore = True
|
||||||
Me.Close()
|
Me.Close()
|
||||||
End If
|
End If
|
||||||
@@ -1269,14 +1351,16 @@ Public Class frmGameManager
|
|||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
Private Sub ImportOfficialGameList()
|
Private Sub ImportOfficialGameList()
|
||||||
|
Dim sImportURL As String
|
||||||
|
|
||||||
If mgrCommon.IsUnix Then
|
If mgrCommon.IsUnix Then
|
||||||
If mgrCommon.ShowMessage(frmGameManager_ConfirmUnixImportWarning, MsgBoxStyle.YesNo) = MsgBoxResult.No Then
|
sImportURL = App_URLImportLinux
|
||||||
Exit Sub
|
Else
|
||||||
End If
|
sImportURL = App_URLImport
|
||||||
End If
|
End If
|
||||||
|
|
||||||
If mgrCommon.ShowMessage(frmGameManager_ConfirmOfficialImport, MsgBoxStyle.YesNo) = MsgBoxResult.Yes Then
|
If mgrCommon.ShowMessage(frmGameManager_ConfirmOfficialImport, MsgBoxStyle.YesNo) = MsgBoxResult.Yes Then
|
||||||
If mgrMonitorList.DoImport(App_URLImport) Then
|
If mgrMonitorList.DoImport(sImportURL) Then
|
||||||
LoadData()
|
LoadData()
|
||||||
End If
|
End If
|
||||||
End If
|
End If
|
||||||
@@ -1308,9 +1392,9 @@ Public Class frmGameManager
|
|||||||
btnOpenRestorePath.Text = frmGameManager_btnOpenRestorePath
|
btnOpenRestorePath.Text = frmGameManager_btnOpenRestorePath
|
||||||
btnOpenBackupFile.Text = frmGameManager_btnOpenBackupFile
|
btnOpenBackupFile.Text = frmGameManager_btnOpenBackupFile
|
||||||
btnDeleteBackup.Text = frmGameManager_btnDeleteBackup
|
btnDeleteBackup.Text = frmGameManager_btnDeleteBackup
|
||||||
lblFileSize.Text = frmGameManager_lblFileSize
|
lblBackupFile.Text = frmGameManager_lblBackupFile
|
||||||
lblCurrentBackup.Text = frmGameManager_lblCurrentBackup
|
lblRemote.Text = frmGameManager_lblRemote
|
||||||
lblLastBackup.Text = frmGameManager_lblLastBackup
|
lblLocalData.Text = frmGameManager_lblLocalData
|
||||||
btnIconBrowse.Text = frmGameManager_btnIconBrowse
|
btnIconBrowse.Text = frmGameManager_btnIconBrowse
|
||||||
lblVersion.Text = frmGameManager_lblVersion
|
lblVersion.Text = frmGameManager_lblVersion
|
||||||
lblCompany.Text = frmGameManager_lblCompany
|
lblCompany.Text = frmGameManager_lblCompany
|
||||||
@@ -1333,6 +1417,15 @@ Public Class frmGameManager
|
|||||||
btnAdd.Text = frmGameManager_btnAdd
|
btnAdd.Text = frmGameManager_btnAdd
|
||||||
cmsOfficial.Text = frmGameManager_cmsOfficial
|
cmsOfficial.Text = frmGameManager_cmsOfficial
|
||||||
cmsFile.Text = frmGameManager_cmsFile
|
cmsFile.Text = frmGameManager_cmsFile
|
||||||
|
lblQuickFilter.Text = frmGameManager_lblQuickFilter
|
||||||
|
lblLimit.Text = frmGameManager_lblLimit
|
||||||
|
cmsDeleteOne.Text = frmGameManager_cmsDeleteOne
|
||||||
|
cmsDeleteAll.Text = frmGameManager_cmsDeleteAll
|
||||||
|
|
||||||
|
'Init Filter Timer
|
||||||
|
tmFilterTimer = New Timer()
|
||||||
|
tmFilterTimer.Interval = 1000
|
||||||
|
tmFilterTimer.Enabled = False
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
Private Sub frmGameManager_Load(sender As Object, e As EventArgs) Handles MyBase.Load
|
Private Sub frmGameManager_Load(sender As Object, e As EventArgs) Handles MyBase.Load
|
||||||
@@ -1435,9 +1528,21 @@ Public Class frmGameManager
|
|||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
Private Sub btnDeleteBackup_Click(sender As Object, e As EventArgs) Handles btnDeleteBackup.Click
|
Private Sub btnDeleteBackup_Click(sender As Object, e As EventArgs) Handles btnDeleteBackup.Click
|
||||||
|
If cboRemoteBackup.Items.Count > 1 Then
|
||||||
|
cmsDeleteBackup.Show(btnDeleteBackup, New Drawing.Point(109, 11), ToolStripDropDownDirection.AboveRight)
|
||||||
|
Else
|
||||||
|
DeleteBackup()
|
||||||
|
End If
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Sub cmsDeleteOne_Click(sender As Object, e As EventArgs) Handles cmsDeleteOne.Click
|
||||||
DeleteBackup()
|
DeleteBackup()
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
|
Private Sub cmsDeleteAll_Click(sender As Object, e As EventArgs) Handles cmsDeleteAll.Click
|
||||||
|
DeleteAllBackups()
|
||||||
|
End Sub
|
||||||
|
|
||||||
Private Sub btnMarkAsRestored_Click(sender As Object, e As EventArgs) Handles btnMarkAsRestored.Click
|
Private Sub btnMarkAsRestored_Click(sender As Object, e As EventArgs) Handles btnMarkAsRestored.Click
|
||||||
MarkAsRestored()
|
MarkAsRestored()
|
||||||
End Sub
|
End Sub
|
||||||
@@ -1469,8 +1574,14 @@ Public Class frmGameManager
|
|||||||
FolderSaveModeChange()
|
FolderSaveModeChange()
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
Private Sub chkMonitorOnly_CheckedChanged(sender As Object, e As EventArgs) Handles chkMonitorOnly.CheckedChanged
|
Private Sub chkTimeStamp_CheckedChanged(sender As Object, e As EventArgs) Handles chkTimeStamp.CheckedChanged
|
||||||
MonitorOnlyModeChange()
|
TimeStampModeChange()
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Sub cboRemoteBackup_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cboRemoteBackup.SelectedIndexChanged
|
||||||
|
If Not bIsLoading Then
|
||||||
|
UpdateBackupInfo(DirectCast(cboRemoteBackup.SelectedItem, KeyValuePair(Of String, String)).Key)
|
||||||
|
End If
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
Private Sub btnImport_Click(sender As Object, e As EventArgs) Handles btnImport.Click
|
Private Sub btnImport_Click(sender As Object, e As EventArgs) Handles btnImport.Click
|
||||||
@@ -1489,4 +1600,22 @@ Public Class frmGameManager
|
|||||||
ExportGameList()
|
ExportGameList()
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
|
Private Sub txtQuickFilter_TextChanged(sender As Object, e As EventArgs) Handles txtQuickFilter.TextChanged
|
||||||
|
If Not tmFilterTimer.Enabled Then
|
||||||
|
tmFilterTimer.Enabled = True
|
||||||
|
tmFilterTimer.Start()
|
||||||
|
End If
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Sub tmFilterTimer_Tick(sender As Object, ByVal e As EventArgs) Handles tmFilterTimer.Tick
|
||||||
|
lstGames.DataSource = Nothing
|
||||||
|
FormatAndFillList()
|
||||||
|
tmFilterTimer.Stop()
|
||||||
|
tmFilterTimer.Enabled = False
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Sub frmGameManager_Shown(sender As Object, e As EventArgs) Handles MyBase.Shown
|
||||||
|
txtQuickFilter.Focus()
|
||||||
|
End Sub
|
||||||
|
|
||||||
End Class
|
End Class
|
||||||
|
|||||||
Generated
+1
-1
@@ -224,7 +224,7 @@ Partial Class frmMain
|
|||||||
'
|
'
|
||||||
Me.txtLog.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
Me.txtLog.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
Me.txtLog.Location = New System.Drawing.Point(12, 184)
|
Me.txtLog.Location = New System.Drawing.Point(12, 184)
|
||||||
Me.txtLog.MaxLength = 16777216
|
Me.txtLog.MaxLength = 524288
|
||||||
Me.txtLog.Multiline = True
|
Me.txtLog.Multiline = True
|
||||||
Me.txtLog.Name = "txtLog"
|
Me.txtLog.Name = "txtLog"
|
||||||
Me.txtLog.ReadOnly = True
|
Me.txtLog.ReadOnly = True
|
||||||
|
|||||||
+100
-81
@@ -24,6 +24,8 @@ Public Class frmMain
|
|||||||
Private bCancelledByUser As Boolean = False
|
Private bCancelledByUser As Boolean = False
|
||||||
Private bShutdown As Boolean = False
|
Private bShutdown As Boolean = False
|
||||||
Private bInitFail As Boolean = False
|
Private bInitFail As Boolean = False
|
||||||
|
Private bPathDetectionFailure As Boolean = False
|
||||||
|
Private sPathDetectionError As String = String.Empty
|
||||||
Private bMenuEnabled As Boolean = True
|
Private bMenuEnabled As Boolean = True
|
||||||
Private bLockdown As Boolean = True
|
Private bLockdown As Boolean = True
|
||||||
Private bFirstRun As Boolean = False
|
Private bFirstRun As Boolean = False
|
||||||
@@ -155,8 +157,7 @@ Public Class frmMain
|
|||||||
OperationEnded()
|
OperationEnded()
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
Private Sub RunRestore(ByVal oRestoreList As List(Of clsGame))
|
Private Sub RunRestore(ByVal oRestoreList As Hashtable)
|
||||||
Dim oBackupData As SortedList = mgrManifest.ReadManifest(mgrSQLite.Database.Remote)
|
|
||||||
Dim oGame As clsGame
|
Dim oGame As clsGame
|
||||||
Dim oReadyList As New List(Of clsBackup)
|
Dim oReadyList As New List(Of clsBackup)
|
||||||
Dim oRestoreInfo As clsBackup
|
Dim oRestoreInfo As clsBackup
|
||||||
@@ -166,9 +167,10 @@ Public Class frmMain
|
|||||||
OperationStarted()
|
OperationStarted()
|
||||||
|
|
||||||
'Build Restore List
|
'Build Restore List
|
||||||
For Each oGame In oRestoreList
|
For Each de As DictionaryEntry In oRestoreList
|
||||||
bPathVerified = False
|
bPathVerified = False
|
||||||
oRestoreInfo = oBackupData(oGame.Name)
|
oGame = DirectCast(de.Key, clsGame)
|
||||||
|
oRestoreInfo = DirectCast(de.Value, clsBackup)
|
||||||
|
|
||||||
If mgrRestore.CheckPath(oRestoreInfo, oGame, bTriggerReload) Then
|
If mgrRestore.CheckPath(oRestoreInfo, oGame, bTriggerReload) Then
|
||||||
bPathVerified = True
|
bPathVerified = True
|
||||||
@@ -554,7 +556,7 @@ Public Class frmMain
|
|||||||
End If
|
End If
|
||||||
|
|
||||||
mgrMonitorList.DoListUpdate(oProcess.GameInfo)
|
mgrMonitorList.DoListUpdate(oProcess.GameInfo)
|
||||||
If oSettings.Sync Then mgrMonitorList.SyncMonitorLists()
|
If oSettings.Sync Then mgrMonitorList.SyncMonitorLists(oSettings.SyncFields)
|
||||||
|
|
||||||
UpdateTimeSpent(dCurrentHours, oProcess.TimeSpent.TotalHours)
|
UpdateTimeSpent(dCurrentHours, oProcess.TimeSpent.TotalHours)
|
||||||
End Sub
|
End Sub
|
||||||
@@ -669,7 +671,7 @@ Public Class frmMain
|
|||||||
Dim frm As New frmTags
|
Dim frm As New frmTags
|
||||||
PauseScan()
|
PauseScan()
|
||||||
frm.ShowDialog()
|
frm.ShowDialog()
|
||||||
If oSettings.Sync Then mgrMonitorList.SyncMonitorLists()
|
If oSettings.Sync Then mgrMonitorList.SyncMonitorLists(oSettings.SyncFields)
|
||||||
ResumeScan()
|
ResumeScan()
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
@@ -680,7 +682,7 @@ Public Class frmMain
|
|||||||
frm.PendingRestores = bPendingRestores
|
frm.PendingRestores = bPendingRestores
|
||||||
frm.ShowDialog()
|
frm.ShowDialog()
|
||||||
LoadGameSettings()
|
LoadGameSettings()
|
||||||
If oSettings.Sync Then mgrMonitorList.SyncMonitorLists()
|
If oSettings.Sync Then mgrMonitorList.SyncMonitorLists(oSettings.SyncFields)
|
||||||
ResumeScan()
|
ResumeScan()
|
||||||
|
|
||||||
'Handle backup trigger
|
'Handle backup trigger
|
||||||
@@ -716,7 +718,7 @@ Public Class frmMain
|
|||||||
frm.GameData = mgrMonitorList.ReadList(mgrMonitorList.eListTypes.FullList)
|
frm.GameData = mgrMonitorList.ReadList(mgrMonitorList.eListTypes.FullList)
|
||||||
frm.ShowDialog()
|
frm.ShowDialog()
|
||||||
LoadGameSettings()
|
LoadGameSettings()
|
||||||
If oSettings.Sync Then mgrMonitorList.SyncMonitorLists()
|
If oSettings.Sync Then mgrMonitorList.SyncMonitorLists(oSettings.SyncFields)
|
||||||
ResumeScan()
|
ResumeScan()
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
@@ -725,7 +727,7 @@ Public Class frmMain
|
|||||||
PauseScan()
|
PauseScan()
|
||||||
frm.ShowDialog()
|
frm.ShowDialog()
|
||||||
mgrPath.CustomVariablesReload()
|
mgrPath.CustomVariablesReload()
|
||||||
If oSettings.Sync Then mgrMonitorList.SyncMonitorLists()
|
If oSettings.Sync Then mgrMonitorList.SyncMonitorLists(oSettings.SyncFields)
|
||||||
ResumeScan()
|
ResumeScan()
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
@@ -796,7 +798,7 @@ Public Class frmMain
|
|||||||
|
|
||||||
Private Sub SyncGameSettings()
|
Private Sub SyncGameSettings()
|
||||||
'Sync Monitor List
|
'Sync Monitor List
|
||||||
If oSettings.Sync Then mgrMonitorList.SyncMonitorLists(False)
|
If oSettings.Sync Then mgrMonitorList.SyncMonitorLists(oSettings.SyncFields, False)
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
Private Sub LocalDatabaseCheck()
|
Private Sub LocalDatabaseCheck()
|
||||||
@@ -811,11 +813,11 @@ Public Class frmMain
|
|||||||
|
|
||||||
Private Sub LoadAndVerify()
|
Private Sub LoadAndVerify()
|
||||||
|
|
||||||
'The application cannot continue if this fails
|
'If the default utility is missing we cannot continue
|
||||||
If Not oBackup.CheckForUtilities(mgrPath.Utility7zLocation) Then
|
If Not oBackup.CheckForUtilities(mgrPath.Default7zLocation) Then
|
||||||
mgrCommon.ShowMessage(frmMain_Error7zip, MsgBoxStyle.Critical)
|
mgrCommon.ShowMessage(frmMain_Error7zip, MsgBoxStyle.Critical)
|
||||||
bShutdown = True
|
bInitFail = True
|
||||||
Me.Close()
|
Exit Sub
|
||||||
End If
|
End If
|
||||||
|
|
||||||
'Local Database Check
|
'Local Database Check
|
||||||
@@ -830,8 +832,8 @@ Public Class frmMain
|
|||||||
If Not bFirstRun Then
|
If Not bFirstRun Then
|
||||||
'The application cannot continue if this fails
|
'The application cannot continue if this fails
|
||||||
If Not VerifyBackupLocation() Then
|
If Not VerifyBackupLocation() Then
|
||||||
bShutdown = True
|
bInitFail = True
|
||||||
Me.Close()
|
Exit Sub
|
||||||
End If
|
End If
|
||||||
|
|
||||||
'Remote Database Check
|
'Remote Database Check
|
||||||
@@ -855,6 +857,13 @@ Public Class frmMain
|
|||||||
End If
|
End If
|
||||||
End If
|
End If
|
||||||
|
|
||||||
|
'Check for any custom 7z utility and display a warning if it's missing
|
||||||
|
If oSettings.Custom7zLocation <> String.Empty Then
|
||||||
|
If Not oBackup.CheckForUtilities(oSettings.Custom7zLocation) Then
|
||||||
|
mgrCommon.ShowMessage(frmMain_Error7zCustom, oSettings.Custom7zLocation, MsgBoxStyle.Exclamation)
|
||||||
|
End If
|
||||||
|
End If
|
||||||
|
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
'Functions that handle buttons, menus and other GUI features on this form
|
'Functions that handle buttons, menus and other GUI features on this form
|
||||||
@@ -1041,12 +1050,17 @@ Public Class frmMain
|
|||||||
Dim d As New UpdateLogCallBack(AddressOf UpdateLog)
|
Dim d As New UpdateLogCallBack(AddressOf UpdateLog)
|
||||||
Me.Invoke(d, New Object() {sLogUpdate, bTrayUpdate, objIcon, bTimeStamp})
|
Me.Invoke(d, New Object() {sLogUpdate, bTrayUpdate, objIcon, bTimeStamp})
|
||||||
Else
|
Else
|
||||||
'Auto save and clear the log if we are approaching the limit
|
'Auto save and/or clear the log if we are approaching the limit
|
||||||
If txtLog.TextLength > 16770000 Then
|
If txtLog.TextLength > 262144 Then
|
||||||
Dim sLogFile As String = mgrPath.LogFileLocation
|
If oSettings.AutoSaveLog Then
|
||||||
mgrCommon.SaveText(txtLog.Text, sLogFile)
|
Dim sLogFile As String = mgrPath.LogFileLocation
|
||||||
txtLog.Clear()
|
mgrCommon.SaveText(txtLog.Text, sLogFile)
|
||||||
txtLog.AppendText("[" & Date.Now & "] " & mgrCommon.FormatString(frmMain_LogAutoSave, sLogFile))
|
txtLog.Clear()
|
||||||
|
txtLog.AppendText("[" & Date.Now & "] " & mgrCommon.FormatString(frmMain_LogAutoSave, sLogFile))
|
||||||
|
Else
|
||||||
|
txtLog.Clear()
|
||||||
|
txtLog.AppendText("[" & Date.Now & "] " & frmMain_LogAutoClear)
|
||||||
|
End If
|
||||||
End If
|
End If
|
||||||
|
|
||||||
'We shouldn't allow any one message to be greater than 255 characters if that same message is pushed to the tray icon
|
'We shouldn't allow any one message to be greater than 255 characters if that same message is pushed to the tray icon
|
||||||
@@ -1234,7 +1248,7 @@ Public Class frmMain
|
|||||||
oSettings.BackupFolder = sBackupPath
|
oSettings.BackupFolder = sBackupPath
|
||||||
oSettings.SaveSettings()
|
oSettings.SaveSettings()
|
||||||
oSettings.LoadSettings()
|
oSettings.LoadSettings()
|
||||||
If oSettings.Sync Then mgrMonitorList.HandleBackupLocationChange()
|
If oSettings.Sync Then mgrMonitorList.HandleBackupLocationChange(oSettings)
|
||||||
End If
|
End If
|
||||||
Return True
|
Return True
|
||||||
Else
|
Else
|
||||||
@@ -1513,7 +1527,6 @@ Public Class frmMain
|
|||||||
Private Sub ScanTimerEventProcessor(myObject As Object, ByVal myEventArgs As EventArgs) Handles tmScanTimer.Tick
|
Private Sub ScanTimerEventProcessor(myObject As Object, ByVal myEventArgs As EventArgs) Handles tmScanTimer.Tick
|
||||||
Dim bNeedsPath As Boolean = False
|
Dim bNeedsPath As Boolean = False
|
||||||
Dim bContinue As Boolean = True
|
Dim bContinue As Boolean = True
|
||||||
Dim bAskForRestart As Boolean = False
|
|
||||||
Dim iErrorCode As Integer = 0
|
Dim iErrorCode As Integer = 0
|
||||||
Dim sErrorMessage As String = String.Empty
|
Dim sErrorMessage As String = String.Empty
|
||||||
|
|
||||||
@@ -1525,39 +1538,24 @@ Public Class frmMain
|
|||||||
If iErrorCode = 5 Then
|
If iErrorCode = 5 Then
|
||||||
If oProcess.Duplicate Then
|
If oProcess.Duplicate Then
|
||||||
sErrorMessage = mgrCommon.FormatString(frmMain_ErrorMultiAdmin)
|
sErrorMessage = mgrCommon.FormatString(frmMain_ErrorMultiAdmin)
|
||||||
mgrCommon.ShowMessage(sErrorMessage, MsgBoxStyle.Exclamation)
|
UpdateLog(sErrorMessage, True, ToolTipIcon.Warning, True)
|
||||||
bAskForRestart = True
|
|
||||||
Else
|
Else
|
||||||
If Not CheckForSavedPath() Then
|
If Not CheckForSavedPath() Then
|
||||||
sErrorMessage = mgrCommon.FormatString(frmMain_ErrorAdminBackup, oProcess.GameInfo.Name)
|
bPathDetectionFailure = True
|
||||||
oProcess.GameInfo.ProcessPath = mgrPath.ProcessPathSearch(oProcess.GameInfo.Name, oProcess.GameInfo.ProcessName, sErrorMessage)
|
sPathDetectionError = mgrCommon.FormatString(frmMain_ErrorAdminBackup, oProcess.GameInfo.Name)
|
||||||
If oProcess.GameInfo.ProcessPath <> String.Empty Then
|
|
||||||
'Update and reload
|
|
||||||
mgrMonitorList.DoListUpdate(oProcess.GameInfo)
|
|
||||||
LoadGameSettings()
|
|
||||||
bContinue = True
|
|
||||||
End If
|
|
||||||
Else
|
|
||||||
bContinue = True
|
|
||||||
End If
|
End If
|
||||||
|
bContinue = True
|
||||||
End If
|
End If
|
||||||
ElseIf iErrorCode = 299 Then
|
ElseIf iErrorCode = 299 Then
|
||||||
If oProcess.Duplicate Then
|
If oProcess.Duplicate Then
|
||||||
sErrorMessage = mgrCommon.FormatString(frmMain_ErrorMulti64)
|
sErrorMessage = mgrCommon.FormatString(frmMain_ErrorMulti64)
|
||||||
mgrCommon.ShowMessage(sErrorMessage, MsgBoxStyle.Exclamation)
|
UpdateLog(sErrorMessage, True, ToolTipIcon.Warning, True)
|
||||||
Else
|
Else
|
||||||
If Not CheckForSavedPath() Then
|
If Not CheckForSavedPath() Then
|
||||||
sErrorMessage = mgrCommon.FormatString(frmMain_Error64Backup, oProcess.GameInfo.Name)
|
bPathDetectionFailure = True
|
||||||
oProcess.GameInfo.ProcessPath = mgrPath.ProcessPathSearch(oProcess.GameInfo.Name, oProcess.GameInfo.ProcessName, sErrorMessage)
|
sPathDetectionError = mgrCommon.FormatString(frmMain_Error64Backup, oProcess.GameInfo.Name)
|
||||||
If oProcess.GameInfo.ProcessPath <> String.Empty Then
|
|
||||||
'Update and reload
|
|
||||||
mgrMonitorList.DoListUpdate(oProcess.GameInfo)
|
|
||||||
LoadGameSettings()
|
|
||||||
bContinue = True
|
|
||||||
End If
|
|
||||||
Else
|
|
||||||
bContinue = True
|
|
||||||
End If
|
End If
|
||||||
|
bContinue = True
|
||||||
End If
|
End If
|
||||||
End If
|
End If
|
||||||
End If
|
End If
|
||||||
@@ -1577,9 +1575,6 @@ Public Class frmMain
|
|||||||
bwMonitor.RunWorkerAsync()
|
bwMonitor.RunWorkerAsync()
|
||||||
Else
|
Else
|
||||||
StopScan()
|
StopScan()
|
||||||
If bAskForRestart Then
|
|
||||||
RestartAsAdmin()
|
|
||||||
End If
|
|
||||||
End If
|
End If
|
||||||
End If
|
End If
|
||||||
End Sub
|
End Sub
|
||||||
@@ -1600,21 +1595,44 @@ Public Class frmMain
|
|||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
Private Sub bwMain_RunWorkerCompleted(sender As System.Object, e As System.ComponentModel.RunWorkerCompletedEventArgs) Handles bwMonitor.RunWorkerCompleted
|
Private Sub bwMain_RunWorkerCompleted(sender As System.Object, e As System.ComponentModel.RunWorkerCompletedEventArgs) Handles bwMonitor.RunWorkerCompleted
|
||||||
|
Dim bContinue As Boolean = True
|
||||||
oProcess.EndTime = Now
|
oProcess.EndTime = Now
|
||||||
|
|
||||||
If Not bCancelledByUser Then
|
If Not bCancelledByUser Then
|
||||||
If DoMultiGameCheck() Then
|
'Check if we failed to detect the game path
|
||||||
UpdateLog(mgrCommon.FormatString(frmMain_GameEnded, oProcess.GameInfo.Name), False)
|
If bPathDetectionFailure Then
|
||||||
If oSettings.TimeTracking Then HandleTimeSpent()
|
oProcess.GameInfo.ProcessPath = mgrPath.ProcessPathSearch(oProcess.GameInfo.Name, oProcess.GameInfo.ProcessName, sPathDetectionError)
|
||||||
RunBackup()
|
If oProcess.GameInfo.ProcessPath <> String.Empty Then
|
||||||
Else
|
'Update and reload
|
||||||
UpdateLog(frmMain_UnknownGameEnded, False)
|
mgrMonitorList.DoListUpdate(oProcess.GameInfo)
|
||||||
oProcess.GameInfo = Nothing
|
LoadGameSettings()
|
||||||
ResetGameInfo()
|
Else
|
||||||
ResumeScan()
|
bContinue = False
|
||||||
|
If oSettings.TimeTracking Then HandleTimeSpent()
|
||||||
|
UpdateLog(mgrCommon.FormatString(frmMain_ErrorBackupUnknownPath, oProcess.GameInfo.Name), False)
|
||||||
|
oProcess.GameInfo = Nothing
|
||||||
|
ResetGameInfo()
|
||||||
|
ResumeScan()
|
||||||
|
End If
|
||||||
|
End If
|
||||||
|
|
||||||
|
If bContinue Then
|
||||||
|
If DoMultiGameCheck() Then
|
||||||
|
UpdateLog(mgrCommon.FormatString(frmMain_GameEnded, oProcess.GameInfo.Name), False)
|
||||||
|
If oSettings.TimeTracking Then HandleTimeSpent()
|
||||||
|
RunBackup()
|
||||||
|
Else
|
||||||
|
UpdateLog(frmMain_UnknownGameEnded, False)
|
||||||
|
oProcess.GameInfo = Nothing
|
||||||
|
ResetGameInfo()
|
||||||
|
ResumeScan()
|
||||||
|
End If
|
||||||
End If
|
End If
|
||||||
End If
|
End If
|
||||||
|
|
||||||
|
'Reset globals
|
||||||
|
bPathDetectionFailure = False
|
||||||
|
sPathDetectionError = String.Empty
|
||||||
bCancelledByUser = False
|
bCancelledByUser = False
|
||||||
oProcess.StartTime = Now : oProcess.EndTime = Now
|
oProcess.StartTime = Now : oProcess.EndTime = Now
|
||||||
End Sub
|
End Sub
|
||||||
@@ -1625,35 +1643,36 @@ Public Class frmMain
|
|||||||
SetForm()
|
SetForm()
|
||||||
VerifyGameDataPath()
|
VerifyGameDataPath()
|
||||||
LoadAndVerify()
|
LoadAndVerify()
|
||||||
VerifyCustomPathVariables()
|
If Not bInitFail Then
|
||||||
|
VerifyCustomPathVariables()
|
||||||
|
|
||||||
If oSettings.StartToTray And Not mgrCommon.IsUnix Then
|
If oSettings.StartToTray And Not mgrCommon.IsUnix Then
|
||||||
bShowToggle = False
|
bShowToggle = False
|
||||||
Me.Visible = False
|
Me.Visible = False
|
||||||
Me.ShowInTaskbar = False
|
Me.ShowInTaskbar = False
|
||||||
|
End If
|
||||||
|
|
||||||
|
If oSettings.MonitorOnStartup Then
|
||||||
|
eCurrentStatus = eStatus.Stopped
|
||||||
|
Else
|
||||||
|
eCurrentStatus = eStatus.Running
|
||||||
|
End If
|
||||||
|
|
||||||
|
HandleScan()
|
||||||
|
CheckForNewBackups()
|
||||||
|
|
||||||
|
'Unix Handler
|
||||||
|
If mgrCommon.IsUnix Then
|
||||||
|
Me.MinimizeBox = True
|
||||||
|
Else
|
||||||
|
Me.gMonTray.Visible = True
|
||||||
|
End If
|
||||||
End If
|
End If
|
||||||
|
|
||||||
If oSettings.MonitorOnStartup Then
|
|
||||||
eCurrentStatus = eStatus.Stopped
|
|
||||||
Else
|
|
||||||
eCurrentStatus = eStatus.Running
|
|
||||||
End If
|
|
||||||
|
|
||||||
HandleScan()
|
|
||||||
CheckForNewBackups()
|
|
||||||
Catch ex As Exception
|
Catch ex As Exception
|
||||||
If mgrCommon.ShowMessage(frmMain_ErrorInitFailure, ex.Message, MsgBoxStyle.YesNo) = MsgBoxResult.No Then
|
If mgrCommon.ShowMessage(frmMain_ErrorInitFailure, ex.Message, MsgBoxStyle.YesNo) = MsgBoxResult.No Then
|
||||||
bInitFail = True
|
bInitFail = True
|
||||||
End If
|
End If
|
||||||
End Try
|
End Try
|
||||||
|
|
||||||
'Unix Handler
|
|
||||||
If mgrCommon.IsUnix Then
|
|
||||||
Me.MinimizeBox = True
|
|
||||||
Else
|
|
||||||
Me.gMonTray.Visible = True
|
|
||||||
End If
|
|
||||||
|
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
Private Sub frmMain_Shown(sender As Object, e As EventArgs) Handles MyBase.Shown
|
Private Sub frmMain_Shown(sender As Object, e As EventArgs) Handles MyBase.Shown
|
||||||
|
|||||||
Generated
+335
-140
@@ -24,34 +24,55 @@ Partial Class frmSettings
|
|||||||
Private Sub InitializeComponent()
|
Private Sub InitializeComponent()
|
||||||
Me.chkMonitorOnStartup = New System.Windows.Forms.CheckBox()
|
Me.chkMonitorOnStartup = New System.Windows.Forms.CheckBox()
|
||||||
Me.chkBackupConfirm = New System.Windows.Forms.CheckBox()
|
Me.chkBackupConfirm = New System.Windows.Forms.CheckBox()
|
||||||
Me.grpGeneral = New System.Windows.Forms.GroupBox()
|
Me.grpStartup = New System.Windows.Forms.GroupBox()
|
||||||
Me.chkTimeTracking = New System.Windows.Forms.CheckBox()
|
|
||||||
Me.chkStartWindows = New System.Windows.Forms.CheckBox()
|
Me.chkStartWindows = New System.Windows.Forms.CheckBox()
|
||||||
|
Me.chkStartToTray = New System.Windows.Forms.CheckBox()
|
||||||
|
Me.chkAutoSaveLog = New System.Windows.Forms.CheckBox()
|
||||||
|
Me.btnOptionalFields = New System.Windows.Forms.Button()
|
||||||
|
Me.chkTimeTracking = New System.Windows.Forms.CheckBox()
|
||||||
Me.chkSync = New System.Windows.Forms.CheckBox()
|
Me.chkSync = New System.Windows.Forms.CheckBox()
|
||||||
Me.chkShowDetectionTips = New System.Windows.Forms.CheckBox()
|
Me.chkShowDetectionTips = New System.Windows.Forms.CheckBox()
|
||||||
Me.chkStartToTray = New System.Windows.Forms.CheckBox()
|
Me.grpFolderOptions = New System.Windows.Forms.GroupBox()
|
||||||
Me.grpPaths = New System.Windows.Forms.GroupBox()
|
|
||||||
Me.btnBackupFolder = New System.Windows.Forms.Button()
|
Me.btnBackupFolder = New System.Windows.Forms.Button()
|
||||||
Me.lblBackupFolder = New System.Windows.Forms.Label()
|
Me.lblBackupFolder = New System.Windows.Forms.Label()
|
||||||
Me.txtBackupFolder = New System.Windows.Forms.TextBox()
|
Me.txtBackupFolder = New System.Windows.Forms.TextBox()
|
||||||
|
Me.chkCreateFolder = New System.Windows.Forms.CheckBox()
|
||||||
Me.btnSave = New System.Windows.Forms.Button()
|
Me.btnSave = New System.Windows.Forms.Button()
|
||||||
Me.btnCancel = New System.Windows.Forms.Button()
|
Me.btnCancel = New System.Windows.Forms.Button()
|
||||||
Me.grpBackup = New System.Windows.Forms.GroupBox()
|
|
||||||
Me.lblMinutes = New System.Windows.Forms.Label()
|
Me.lblMinutes = New System.Windows.Forms.Label()
|
||||||
Me.nudSupressBackupThreshold = New System.Windows.Forms.NumericUpDown()
|
Me.nudSupressBackupThreshold = New System.Windows.Forms.NumericUpDown()
|
||||||
Me.chkSupressBackup = New System.Windows.Forms.CheckBox()
|
Me.chkSupressBackup = New System.Windows.Forms.CheckBox()
|
||||||
Me.chkCheckSum = New System.Windows.Forms.CheckBox()
|
Me.chkCheckSum = New System.Windows.Forms.CheckBox()
|
||||||
Me.chkRestoreOnLaunch = New System.Windows.Forms.CheckBox()
|
Me.chkRestoreOnLaunch = New System.Windows.Forms.CheckBox()
|
||||||
Me.chkOverwriteWarning = New System.Windows.Forms.CheckBox()
|
Me.chkOverwriteWarning = New System.Windows.Forms.CheckBox()
|
||||||
Me.chkCreateFolder = New System.Windows.Forms.CheckBox()
|
Me.grp7zGeneral = New System.Windows.Forms.GroupBox()
|
||||||
Me.grp7z = New System.Windows.Forms.GroupBox()
|
|
||||||
Me.lblCompression = New System.Windows.Forms.Label()
|
|
||||||
Me.cboCompression = New System.Windows.Forms.ComboBox()
|
Me.cboCompression = New System.Windows.Forms.ComboBox()
|
||||||
Me.grpGeneral.SuspendLayout()
|
Me.lblCompression = New System.Windows.Forms.Label()
|
||||||
Me.grpPaths.SuspendLayout()
|
Me.btn7zLocation = New System.Windows.Forms.Button()
|
||||||
Me.grpBackup.SuspendLayout()
|
Me.txt7zLocation = New System.Windows.Forms.TextBox()
|
||||||
|
Me.lblLocation = New System.Windows.Forms.Label()
|
||||||
|
Me.txt7zArguments = New System.Windows.Forms.TextBox()
|
||||||
|
Me.lblArguments = New System.Windows.Forms.Label()
|
||||||
|
Me.lbl7zCopyright = New System.Windows.Forms.Label()
|
||||||
|
Me.lbl7zProduct = New System.Windows.Forms.Label()
|
||||||
|
Me.btnDefaults = New System.Windows.Forms.Button()
|
||||||
|
Me.pnlBackup = New System.Windows.Forms.Panel()
|
||||||
|
Me.pnl7z = New System.Windows.Forms.Panel()
|
||||||
|
Me.grp7zAdvanced = New System.Windows.Forms.GroupBox()
|
||||||
|
Me.grp7zInformation = New System.Windows.Forms.GroupBox()
|
||||||
|
Me.pnlGeneral = New System.Windows.Forms.Panel()
|
||||||
|
Me.grpGameData = New System.Windows.Forms.GroupBox()
|
||||||
|
Me.lstSettings = New System.Windows.Forms.ListBox()
|
||||||
|
Me.grpStartup.SuspendLayout()
|
||||||
|
Me.grpFolderOptions.SuspendLayout()
|
||||||
CType(Me.nudSupressBackupThreshold, System.ComponentModel.ISupportInitialize).BeginInit()
|
CType(Me.nudSupressBackupThreshold, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||||
Me.grp7z.SuspendLayout()
|
Me.grp7zGeneral.SuspendLayout()
|
||||||
|
Me.pnlBackup.SuspendLayout()
|
||||||
|
Me.pnl7z.SuspendLayout()
|
||||||
|
Me.grp7zAdvanced.SuspendLayout()
|
||||||
|
Me.grp7zInformation.SuspendLayout()
|
||||||
|
Me.pnlGeneral.SuspendLayout()
|
||||||
|
Me.grpGameData.SuspendLayout()
|
||||||
Me.SuspendLayout()
|
Me.SuspendLayout()
|
||||||
'
|
'
|
||||||
'chkMonitorOnStartup
|
'chkMonitorOnStartup
|
||||||
@@ -67,37 +88,24 @@ Partial Class frmSettings
|
|||||||
'chkBackupConfirm
|
'chkBackupConfirm
|
||||||
'
|
'
|
||||||
Me.chkBackupConfirm.AutoSize = True
|
Me.chkBackupConfirm.AutoSize = True
|
||||||
Me.chkBackupConfirm.Location = New System.Drawing.Point(6, 42)
|
Me.chkBackupConfirm.Location = New System.Drawing.Point(6, 88)
|
||||||
Me.chkBackupConfirm.Name = "chkBackupConfirm"
|
Me.chkBackupConfirm.Name = "chkBackupConfirm"
|
||||||
Me.chkBackupConfirm.Size = New System.Drawing.Size(160, 17)
|
Me.chkBackupConfirm.Size = New System.Drawing.Size(160, 17)
|
||||||
Me.chkBackupConfirm.TabIndex = 1
|
Me.chkBackupConfirm.TabIndex = 1
|
||||||
Me.chkBackupConfirm.Text = "Disable backup confirmation"
|
Me.chkBackupConfirm.Text = "Disable backup confirmation"
|
||||||
Me.chkBackupConfirm.UseVisualStyleBackColor = True
|
Me.chkBackupConfirm.UseVisualStyleBackColor = True
|
||||||
'
|
'
|
||||||
'grpGeneral
|
'grpStartup
|
||||||
'
|
'
|
||||||
Me.grpGeneral.Controls.Add(Me.chkTimeTracking)
|
Me.grpStartup.Controls.Add(Me.chkStartWindows)
|
||||||
Me.grpGeneral.Controls.Add(Me.chkStartWindows)
|
Me.grpStartup.Controls.Add(Me.chkStartToTray)
|
||||||
Me.grpGeneral.Controls.Add(Me.chkSync)
|
Me.grpStartup.Controls.Add(Me.chkMonitorOnStartup)
|
||||||
Me.grpGeneral.Controls.Add(Me.chkShowDetectionTips)
|
Me.grpStartup.Location = New System.Drawing.Point(6, 12)
|
||||||
Me.grpGeneral.Controls.Add(Me.chkStartToTray)
|
Me.grpStartup.Name = "grpStartup"
|
||||||
Me.grpGeneral.Controls.Add(Me.chkMonitorOnStartup)
|
Me.grpStartup.Size = New System.Drawing.Size(354, 90)
|
||||||
Me.grpGeneral.Location = New System.Drawing.Point(12, 12)
|
Me.grpStartup.TabIndex = 0
|
||||||
Me.grpGeneral.Name = "grpGeneral"
|
Me.grpStartup.TabStop = False
|
||||||
Me.grpGeneral.Size = New System.Drawing.Size(360, 165)
|
Me.grpStartup.Text = "Startup"
|
||||||
Me.grpGeneral.TabIndex = 0
|
|
||||||
Me.grpGeneral.TabStop = False
|
|
||||||
Me.grpGeneral.Text = "General"
|
|
||||||
'
|
|
||||||
'chkTimeTracking
|
|
||||||
'
|
|
||||||
Me.chkTimeTracking.AutoSize = True
|
|
||||||
Me.chkTimeTracking.Location = New System.Drawing.Point(6, 111)
|
|
||||||
Me.chkTimeTracking.Name = "chkTimeTracking"
|
|
||||||
Me.chkTimeTracking.Size = New System.Drawing.Size(122, 17)
|
|
||||||
Me.chkTimeTracking.TabIndex = 4
|
|
||||||
Me.chkTimeTracking.Text = "Enable time tracking"
|
|
||||||
Me.chkTimeTracking.UseVisualStyleBackColor = True
|
|
||||||
'
|
'
|
||||||
'chkStartWindows
|
'chkStartWindows
|
||||||
'
|
'
|
||||||
@@ -109,26 +117,6 @@ Partial Class frmSettings
|
|||||||
Me.chkStartWindows.Text = "Start with Windows"
|
Me.chkStartWindows.Text = "Start with Windows"
|
||||||
Me.chkStartWindows.UseVisualStyleBackColor = True
|
Me.chkStartWindows.UseVisualStyleBackColor = True
|
||||||
'
|
'
|
||||||
'chkSync
|
|
||||||
'
|
|
||||||
Me.chkSync.AutoSize = True
|
|
||||||
Me.chkSync.Location = New System.Drawing.Point(6, 134)
|
|
||||||
Me.chkSync.Name = "chkSync"
|
|
||||||
Me.chkSync.Size = New System.Drawing.Size(208, 17)
|
|
||||||
Me.chkSync.TabIndex = 5
|
|
||||||
Me.chkSync.Text = "Sync game list data with backup folder"
|
|
||||||
Me.chkSync.UseVisualStyleBackColor = True
|
|
||||||
'
|
|
||||||
'chkShowDetectionTips
|
|
||||||
'
|
|
||||||
Me.chkShowDetectionTips.AutoSize = True
|
|
||||||
Me.chkShowDetectionTips.Location = New System.Drawing.Point(6, 88)
|
|
||||||
Me.chkShowDetectionTips.Name = "chkShowDetectionTips"
|
|
||||||
Me.chkShowDetectionTips.Size = New System.Drawing.Size(159, 17)
|
|
||||||
Me.chkShowDetectionTips.TabIndex = 3
|
|
||||||
Me.chkShowDetectionTips.Text = "Show detection notifications"
|
|
||||||
Me.chkShowDetectionTips.UseVisualStyleBackColor = True
|
|
||||||
'
|
|
||||||
'chkStartToTray
|
'chkStartToTray
|
||||||
'
|
'
|
||||||
Me.chkStartToTray.AutoSize = True
|
Me.chkStartToTray.AutoSize = True
|
||||||
@@ -139,21 +127,71 @@ Partial Class frmSettings
|
|||||||
Me.chkStartToTray.Text = "Start to system tray"
|
Me.chkStartToTray.Text = "Start to system tray"
|
||||||
Me.chkStartToTray.UseVisualStyleBackColor = True
|
Me.chkStartToTray.UseVisualStyleBackColor = True
|
||||||
'
|
'
|
||||||
'grpPaths
|
'chkAutoSaveLog
|
||||||
'
|
'
|
||||||
Me.grpPaths.Controls.Add(Me.btnBackupFolder)
|
Me.chkAutoSaveLog.AutoSize = True
|
||||||
Me.grpPaths.Controls.Add(Me.lblBackupFolder)
|
Me.chkAutoSaveLog.Location = New System.Drawing.Point(6, 204)
|
||||||
Me.grpPaths.Controls.Add(Me.txtBackupFolder)
|
Me.chkAutoSaveLog.Name = "chkAutoSaveLog"
|
||||||
Me.grpPaths.Location = New System.Drawing.Point(12, 410)
|
Me.chkAutoSaveLog.Size = New System.Drawing.Size(231, 17)
|
||||||
Me.grpPaths.Name = "grpPaths"
|
Me.chkAutoSaveLog.TabIndex = 7
|
||||||
Me.grpPaths.Size = New System.Drawing.Size(360, 60)
|
Me.chkAutoSaveLog.Text = "Autosave log when max length is exceeded"
|
||||||
Me.grpPaths.TabIndex = 3
|
Me.chkAutoSaveLog.UseVisualStyleBackColor = True
|
||||||
Me.grpPaths.TabStop = False
|
'
|
||||||
Me.grpPaths.Text = "Paths"
|
'btnOptionalFields
|
||||||
|
'
|
||||||
|
Me.btnOptionalFields.Location = New System.Drawing.Point(110, 38)
|
||||||
|
Me.btnOptionalFields.Name = "btnOptionalFields"
|
||||||
|
Me.btnOptionalFields.Size = New System.Drawing.Size(134, 23)
|
||||||
|
Me.btnOptionalFields.TabIndex = 6
|
||||||
|
Me.btnOptionalFields.Text = "Choose &Optional Fields..."
|
||||||
|
Me.btnOptionalFields.UseVisualStyleBackColor = True
|
||||||
|
'
|
||||||
|
'chkTimeTracking
|
||||||
|
'
|
||||||
|
Me.chkTimeTracking.AutoSize = True
|
||||||
|
Me.chkTimeTracking.Location = New System.Drawing.Point(6, 19)
|
||||||
|
Me.chkTimeTracking.Name = "chkTimeTracking"
|
||||||
|
Me.chkTimeTracking.Size = New System.Drawing.Size(122, 17)
|
||||||
|
Me.chkTimeTracking.TabIndex = 4
|
||||||
|
Me.chkTimeTracking.Text = "Enable time tracking"
|
||||||
|
Me.chkTimeTracking.UseVisualStyleBackColor = True
|
||||||
|
'
|
||||||
|
'chkSync
|
||||||
|
'
|
||||||
|
Me.chkSync.AutoSize = True
|
||||||
|
Me.chkSync.Location = New System.Drawing.Point(6, 42)
|
||||||
|
Me.chkSync.Name = "chkSync"
|
||||||
|
Me.chkSync.Size = New System.Drawing.Size(98, 17)
|
||||||
|
Me.chkSync.TabIndex = 5
|
||||||
|
Me.chkSync.Text = "Enable syncing"
|
||||||
|
Me.chkSync.UseVisualStyleBackColor = True
|
||||||
|
'
|
||||||
|
'chkShowDetectionTips
|
||||||
|
'
|
||||||
|
Me.chkShowDetectionTips.AutoSize = True
|
||||||
|
Me.chkShowDetectionTips.Location = New System.Drawing.Point(6, 181)
|
||||||
|
Me.chkShowDetectionTips.Name = "chkShowDetectionTips"
|
||||||
|
Me.chkShowDetectionTips.Size = New System.Drawing.Size(159, 17)
|
||||||
|
Me.chkShowDetectionTips.TabIndex = 3
|
||||||
|
Me.chkShowDetectionTips.Text = "Show detection notifications"
|
||||||
|
Me.chkShowDetectionTips.UseVisualStyleBackColor = True
|
||||||
|
'
|
||||||
|
'grpFolderOptions
|
||||||
|
'
|
||||||
|
Me.grpFolderOptions.Controls.Add(Me.btnBackupFolder)
|
||||||
|
Me.grpFolderOptions.Controls.Add(Me.lblBackupFolder)
|
||||||
|
Me.grpFolderOptions.Controls.Add(Me.txtBackupFolder)
|
||||||
|
Me.grpFolderOptions.Controls.Add(Me.chkCreateFolder)
|
||||||
|
Me.grpFolderOptions.Location = New System.Drawing.Point(6, 12)
|
||||||
|
Me.grpFolderOptions.Name = "grpFolderOptions"
|
||||||
|
Me.grpFolderOptions.Size = New System.Drawing.Size(354, 70)
|
||||||
|
Me.grpFolderOptions.TabIndex = 1
|
||||||
|
Me.grpFolderOptions.TabStop = False
|
||||||
|
Me.grpFolderOptions.Text = "Folders"
|
||||||
'
|
'
|
||||||
'btnBackupFolder
|
'btnBackupFolder
|
||||||
'
|
'
|
||||||
Me.btnBackupFolder.Location = New System.Drawing.Point(318, 23)
|
Me.btnBackupFolder.Location = New System.Drawing.Point(313, 17)
|
||||||
Me.btnBackupFolder.Name = "btnBackupFolder"
|
Me.btnBackupFolder.Name = "btnBackupFolder"
|
||||||
Me.btnBackupFolder.Size = New System.Drawing.Size(27, 20)
|
Me.btnBackupFolder.Size = New System.Drawing.Size(27, 20)
|
||||||
Me.btnBackupFolder.TabIndex = 2
|
Me.btnBackupFolder.TabIndex = 2
|
||||||
@@ -163,60 +201,53 @@ Partial Class frmSettings
|
|||||||
'lblBackupFolder
|
'lblBackupFolder
|
||||||
'
|
'
|
||||||
Me.lblBackupFolder.AutoSize = True
|
Me.lblBackupFolder.AutoSize = True
|
||||||
Me.lblBackupFolder.Location = New System.Drawing.Point(6, 27)
|
Me.lblBackupFolder.Location = New System.Drawing.Point(6, 20)
|
||||||
Me.lblBackupFolder.Name = "lblBackupFolder"
|
Me.lblBackupFolder.Name = "lblBackupFolder"
|
||||||
Me.lblBackupFolder.Size = New System.Drawing.Size(76, 13)
|
Me.lblBackupFolder.Size = New System.Drawing.Size(79, 13)
|
||||||
Me.lblBackupFolder.TabIndex = 0
|
Me.lblBackupFolder.TabIndex = 0
|
||||||
Me.lblBackupFolder.Text = "Backup Folder"
|
Me.lblBackupFolder.Text = "Backup Folder:"
|
||||||
'
|
'
|
||||||
'txtBackupFolder
|
'txtBackupFolder
|
||||||
'
|
'
|
||||||
Me.txtBackupFolder.Location = New System.Drawing.Point(88, 24)
|
Me.txtBackupFolder.Location = New System.Drawing.Point(91, 17)
|
||||||
Me.txtBackupFolder.Name = "txtBackupFolder"
|
Me.txtBackupFolder.Name = "txtBackupFolder"
|
||||||
Me.txtBackupFolder.Size = New System.Drawing.Size(224, 20)
|
Me.txtBackupFolder.Size = New System.Drawing.Size(216, 20)
|
||||||
Me.txtBackupFolder.TabIndex = 1
|
Me.txtBackupFolder.TabIndex = 1
|
||||||
'
|
'
|
||||||
|
'chkCreateFolder
|
||||||
|
'
|
||||||
|
Me.chkCreateFolder.AutoSize = True
|
||||||
|
Me.chkCreateFolder.Location = New System.Drawing.Point(9, 43)
|
||||||
|
Me.chkCreateFolder.Name = "chkCreateFolder"
|
||||||
|
Me.chkCreateFolder.Size = New System.Drawing.Size(186, 17)
|
||||||
|
Me.chkCreateFolder.TabIndex = 3
|
||||||
|
Me.chkCreateFolder.Text = "Create a sub-folder for each game"
|
||||||
|
Me.chkCreateFolder.UseVisualStyleBackColor = True
|
||||||
|
'
|
||||||
'btnSave
|
'btnSave
|
||||||
'
|
'
|
||||||
Me.btnSave.DialogResult = System.Windows.Forms.DialogResult.OK
|
Me.btnSave.DialogResult = System.Windows.Forms.DialogResult.OK
|
||||||
Me.btnSave.Location = New System.Drawing.Point(216, 476)
|
Me.btnSave.Location = New System.Drawing.Point(384, 321)
|
||||||
Me.btnSave.Name = "btnSave"
|
Me.btnSave.Name = "btnSave"
|
||||||
Me.btnSave.Size = New System.Drawing.Size(75, 23)
|
Me.btnSave.Size = New System.Drawing.Size(75, 23)
|
||||||
Me.btnSave.TabIndex = 3
|
Me.btnSave.TabIndex = 5
|
||||||
Me.btnSave.Text = "&Save"
|
Me.btnSave.Text = "&Save"
|
||||||
Me.btnSave.UseVisualStyleBackColor = True
|
Me.btnSave.UseVisualStyleBackColor = True
|
||||||
'
|
'
|
||||||
'btnCancel
|
'btnCancel
|
||||||
'
|
'
|
||||||
Me.btnCancel.DialogResult = System.Windows.Forms.DialogResult.Cancel
|
Me.btnCancel.DialogResult = System.Windows.Forms.DialogResult.Cancel
|
||||||
Me.btnCancel.Location = New System.Drawing.Point(297, 476)
|
Me.btnCancel.Location = New System.Drawing.Point(465, 321)
|
||||||
Me.btnCancel.Name = "btnCancel"
|
Me.btnCancel.Name = "btnCancel"
|
||||||
Me.btnCancel.Size = New System.Drawing.Size(75, 23)
|
Me.btnCancel.Size = New System.Drawing.Size(75, 23)
|
||||||
Me.btnCancel.TabIndex = 4
|
Me.btnCancel.TabIndex = 6
|
||||||
Me.btnCancel.Text = "&Cancel"
|
Me.btnCancel.Text = "&Cancel"
|
||||||
Me.btnCancel.UseVisualStyleBackColor = True
|
Me.btnCancel.UseVisualStyleBackColor = True
|
||||||
'
|
'
|
||||||
'grpBackup
|
|
||||||
'
|
|
||||||
Me.grpBackup.Controls.Add(Me.lblMinutes)
|
|
||||||
Me.grpBackup.Controls.Add(Me.nudSupressBackupThreshold)
|
|
||||||
Me.grpBackup.Controls.Add(Me.chkSupressBackup)
|
|
||||||
Me.grpBackup.Controls.Add(Me.chkCheckSum)
|
|
||||||
Me.grpBackup.Controls.Add(Me.chkRestoreOnLaunch)
|
|
||||||
Me.grpBackup.Controls.Add(Me.chkOverwriteWarning)
|
|
||||||
Me.grpBackup.Controls.Add(Me.chkCreateFolder)
|
|
||||||
Me.grpBackup.Controls.Add(Me.chkBackupConfirm)
|
|
||||||
Me.grpBackup.Location = New System.Drawing.Point(12, 183)
|
|
||||||
Me.grpBackup.Name = "grpBackup"
|
|
||||||
Me.grpBackup.Size = New System.Drawing.Size(360, 168)
|
|
||||||
Me.grpBackup.TabIndex = 1
|
|
||||||
Me.grpBackup.TabStop = False
|
|
||||||
Me.grpBackup.Text = "Backup and Restore"
|
|
||||||
'
|
|
||||||
'lblMinutes
|
'lblMinutes
|
||||||
'
|
'
|
||||||
Me.lblMinutes.AutoSize = True
|
Me.lblMinutes.AutoSize = True
|
||||||
Me.lblMinutes.Location = New System.Drawing.Point(286, 135)
|
Me.lblMinutes.Location = New System.Drawing.Point(286, 181)
|
||||||
Me.lblMinutes.Name = "lblMinutes"
|
Me.lblMinutes.Name = "lblMinutes"
|
||||||
Me.lblMinutes.Size = New System.Drawing.Size(43, 13)
|
Me.lblMinutes.Size = New System.Drawing.Size(43, 13)
|
||||||
Me.lblMinutes.TabIndex = 7
|
Me.lblMinutes.TabIndex = 7
|
||||||
@@ -224,7 +255,7 @@ Partial Class frmSettings
|
|||||||
'
|
'
|
||||||
'nudSupressBackupThreshold
|
'nudSupressBackupThreshold
|
||||||
'
|
'
|
||||||
Me.nudSupressBackupThreshold.Location = New System.Drawing.Point(229, 133)
|
Me.nudSupressBackupThreshold.Location = New System.Drawing.Point(229, 179)
|
||||||
Me.nudSupressBackupThreshold.Maximum = New Decimal(New Integer() {999, 0, 0, 0})
|
Me.nudSupressBackupThreshold.Maximum = New Decimal(New Integer() {999, 0, 0, 0})
|
||||||
Me.nudSupressBackupThreshold.Name = "nudSupressBackupThreshold"
|
Me.nudSupressBackupThreshold.Name = "nudSupressBackupThreshold"
|
||||||
Me.nudSupressBackupThreshold.Size = New System.Drawing.Size(51, 20)
|
Me.nudSupressBackupThreshold.Size = New System.Drawing.Size(51, 20)
|
||||||
@@ -233,7 +264,7 @@ Partial Class frmSettings
|
|||||||
'chkSupressBackup
|
'chkSupressBackup
|
||||||
'
|
'
|
||||||
Me.chkSupressBackup.AutoSize = True
|
Me.chkSupressBackup.AutoSize = True
|
||||||
Me.chkSupressBackup.Location = New System.Drawing.Point(6, 134)
|
Me.chkSupressBackup.Location = New System.Drawing.Point(6, 180)
|
||||||
Me.chkSupressBackup.Name = "chkSupressBackup"
|
Me.chkSupressBackup.Name = "chkSupressBackup"
|
||||||
Me.chkSupressBackup.Size = New System.Drawing.Size(217, 17)
|
Me.chkSupressBackup.Size = New System.Drawing.Size(217, 17)
|
||||||
Me.chkSupressBackup.TabIndex = 5
|
Me.chkSupressBackup.TabIndex = 5
|
||||||
@@ -243,7 +274,7 @@ Partial Class frmSettings
|
|||||||
'chkCheckSum
|
'chkCheckSum
|
||||||
'
|
'
|
||||||
Me.chkCheckSum.AutoSize = True
|
Me.chkCheckSum.AutoSize = True
|
||||||
Me.chkCheckSum.Location = New System.Drawing.Point(6, 88)
|
Me.chkCheckSum.Location = New System.Drawing.Point(6, 134)
|
||||||
Me.chkCheckSum.Name = "chkCheckSum"
|
Me.chkCheckSum.Name = "chkCheckSum"
|
||||||
Me.chkCheckSum.Size = New System.Drawing.Size(195, 17)
|
Me.chkCheckSum.Size = New System.Drawing.Size(195, 17)
|
||||||
Me.chkCheckSum.TabIndex = 3
|
Me.chkCheckSum.TabIndex = 3
|
||||||
@@ -253,7 +284,7 @@ Partial Class frmSettings
|
|||||||
'chkRestoreOnLaunch
|
'chkRestoreOnLaunch
|
||||||
'
|
'
|
||||||
Me.chkRestoreOnLaunch.AutoSize = True
|
Me.chkRestoreOnLaunch.AutoSize = True
|
||||||
Me.chkRestoreOnLaunch.Location = New System.Drawing.Point(6, 111)
|
Me.chkRestoreOnLaunch.Location = New System.Drawing.Point(6, 157)
|
||||||
Me.chkRestoreOnLaunch.Name = "chkRestoreOnLaunch"
|
Me.chkRestoreOnLaunch.Name = "chkRestoreOnLaunch"
|
||||||
Me.chkRestoreOnLaunch.Size = New System.Drawing.Size(257, 17)
|
Me.chkRestoreOnLaunch.Size = New System.Drawing.Size(257, 17)
|
||||||
Me.chkRestoreOnLaunch.TabIndex = 4
|
Me.chkRestoreOnLaunch.TabIndex = 4
|
||||||
@@ -263,33 +294,32 @@ Partial Class frmSettings
|
|||||||
'chkOverwriteWarning
|
'chkOverwriteWarning
|
||||||
'
|
'
|
||||||
Me.chkOverwriteWarning.AutoSize = True
|
Me.chkOverwriteWarning.AutoSize = True
|
||||||
Me.chkOverwriteWarning.Location = New System.Drawing.Point(6, 65)
|
Me.chkOverwriteWarning.Location = New System.Drawing.Point(6, 111)
|
||||||
Me.chkOverwriteWarning.Name = "chkOverwriteWarning"
|
Me.chkOverwriteWarning.Name = "chkOverwriteWarning"
|
||||||
Me.chkOverwriteWarning.Size = New System.Drawing.Size(139, 17)
|
Me.chkOverwriteWarning.Size = New System.Drawing.Size(139, 17)
|
||||||
Me.chkOverwriteWarning.TabIndex = 2
|
Me.chkOverwriteWarning.TabIndex = 2
|
||||||
Me.chkOverwriteWarning.Text = "Show overwrite warning"
|
Me.chkOverwriteWarning.Text = "Show overwrite warning"
|
||||||
Me.chkOverwriteWarning.UseVisualStyleBackColor = True
|
Me.chkOverwriteWarning.UseVisualStyleBackColor = True
|
||||||
'
|
'
|
||||||
'chkCreateFolder
|
'grp7zGeneral
|
||||||
'
|
'
|
||||||
Me.chkCreateFolder.AutoSize = True
|
Me.grp7zGeneral.Controls.Add(Me.cboCompression)
|
||||||
Me.chkCreateFolder.Location = New System.Drawing.Point(6, 19)
|
Me.grp7zGeneral.Controls.Add(Me.lblCompression)
|
||||||
Me.chkCreateFolder.Name = "chkCreateFolder"
|
Me.grp7zGeneral.Location = New System.Drawing.Point(6, 12)
|
||||||
Me.chkCreateFolder.Size = New System.Drawing.Size(186, 17)
|
Me.grp7zGeneral.Name = "grp7zGeneral"
|
||||||
Me.chkCreateFolder.TabIndex = 0
|
Me.grp7zGeneral.Size = New System.Drawing.Size(354, 50)
|
||||||
Me.chkCreateFolder.Text = "Create a sub-folder for each game"
|
Me.grp7zGeneral.TabIndex = 0
|
||||||
Me.chkCreateFolder.UseVisualStyleBackColor = True
|
Me.grp7zGeneral.TabStop = False
|
||||||
|
Me.grp7zGeneral.Text = "General"
|
||||||
'
|
'
|
||||||
'grp7z
|
'cboCompression
|
||||||
'
|
'
|
||||||
Me.grp7z.Controls.Add(Me.cboCompression)
|
Me.cboCompression.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||||
Me.grp7z.Controls.Add(Me.lblCompression)
|
Me.cboCompression.FormattingEnabled = True
|
||||||
Me.grp7z.Location = New System.Drawing.Point(12, 357)
|
Me.cboCompression.Location = New System.Drawing.Point(110, 17)
|
||||||
Me.grp7z.Name = "grp7z"
|
Me.cboCompression.Name = "cboCompression"
|
||||||
Me.grp7z.Size = New System.Drawing.Size(360, 47)
|
Me.cboCompression.Size = New System.Drawing.Size(238, 21)
|
||||||
Me.grp7z.TabIndex = 2
|
Me.cboCompression.TabIndex = 1
|
||||||
Me.grp7z.TabStop = False
|
|
||||||
Me.grp7z.Text = "7z Options"
|
|
||||||
'
|
'
|
||||||
'lblCompression
|
'lblCompression
|
||||||
'
|
'
|
||||||
@@ -300,26 +330,167 @@ Partial Class frmSettings
|
|||||||
Me.lblCompression.TabIndex = 0
|
Me.lblCompression.TabIndex = 0
|
||||||
Me.lblCompression.Text = "Compression:"
|
Me.lblCompression.Text = "Compression:"
|
||||||
'
|
'
|
||||||
'cboCompression
|
'btn7zLocation
|
||||||
'
|
'
|
||||||
Me.cboCompression.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
Me.btn7zLocation.Location = New System.Drawing.Point(313, 41)
|
||||||
Me.cboCompression.FormattingEnabled = True
|
Me.btn7zLocation.Name = "btn7zLocation"
|
||||||
Me.cboCompression.Location = New System.Drawing.Point(88, 17)
|
Me.btn7zLocation.Size = New System.Drawing.Size(27, 20)
|
||||||
Me.cboCompression.Name = "cboCompression"
|
Me.btn7zLocation.TabIndex = 5
|
||||||
Me.cboCompression.Size = New System.Drawing.Size(224, 21)
|
Me.btn7zLocation.Text = "..."
|
||||||
Me.cboCompression.TabIndex = 1
|
Me.btn7zLocation.UseVisualStyleBackColor = True
|
||||||
|
'
|
||||||
|
'txt7zLocation
|
||||||
|
'
|
||||||
|
Me.txt7zLocation.Location = New System.Drawing.Point(110, 41)
|
||||||
|
Me.txt7zLocation.Name = "txt7zLocation"
|
||||||
|
Me.txt7zLocation.Size = New System.Drawing.Size(197, 20)
|
||||||
|
Me.txt7zLocation.TabIndex = 4
|
||||||
|
'
|
||||||
|
'lblLocation
|
||||||
|
'
|
||||||
|
Me.lblLocation.AutoSize = True
|
||||||
|
Me.lblLocation.Location = New System.Drawing.Point(6, 44)
|
||||||
|
Me.lblLocation.Name = "lblLocation"
|
||||||
|
Me.lblLocation.Size = New System.Drawing.Size(89, 13)
|
||||||
|
Me.lblLocation.TabIndex = 4
|
||||||
|
Me.lblLocation.Text = "Custom Location:"
|
||||||
|
'
|
||||||
|
'txt7zArguments
|
||||||
|
'
|
||||||
|
Me.txt7zArguments.Location = New System.Drawing.Point(110, 15)
|
||||||
|
Me.txt7zArguments.Name = "txt7zArguments"
|
||||||
|
Me.txt7zArguments.Size = New System.Drawing.Size(238, 20)
|
||||||
|
Me.txt7zArguments.TabIndex = 3
|
||||||
|
'
|
||||||
|
'lblArguments
|
||||||
|
'
|
||||||
|
Me.lblArguments.AutoSize = True
|
||||||
|
Me.lblArguments.Location = New System.Drawing.Point(6, 20)
|
||||||
|
Me.lblArguments.Name = "lblArguments"
|
||||||
|
Me.lblArguments.Size = New System.Drawing.Size(98, 13)
|
||||||
|
Me.lblArguments.TabIndex = 2
|
||||||
|
Me.lblArguments.Text = "Custom Arguments:"
|
||||||
|
'
|
||||||
|
'lbl7zCopyright
|
||||||
|
'
|
||||||
|
Me.lbl7zCopyright.AutoEllipsis = True
|
||||||
|
Me.lbl7zCopyright.Location = New System.Drawing.Point(9, 34)
|
||||||
|
Me.lbl7zCopyright.Name = "lbl7zCopyright"
|
||||||
|
Me.lbl7zCopyright.Size = New System.Drawing.Size(339, 17)
|
||||||
|
Me.lbl7zCopyright.TabIndex = 8
|
||||||
|
Me.lbl7zCopyright.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||||
|
'
|
||||||
|
'lbl7zProduct
|
||||||
|
'
|
||||||
|
Me.lbl7zProduct.AutoEllipsis = True
|
||||||
|
Me.lbl7zProduct.Location = New System.Drawing.Point(9, 17)
|
||||||
|
Me.lbl7zProduct.Name = "lbl7zProduct"
|
||||||
|
Me.lbl7zProduct.Size = New System.Drawing.Size(339, 17)
|
||||||
|
Me.lbl7zProduct.TabIndex = 7
|
||||||
|
Me.lbl7zProduct.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||||
|
'
|
||||||
|
'btnDefaults
|
||||||
|
'
|
||||||
|
Me.btnDefaults.Location = New System.Drawing.Point(12, 321)
|
||||||
|
Me.btnDefaults.Name = "btnDefaults"
|
||||||
|
Me.btnDefaults.Size = New System.Drawing.Size(110, 23)
|
||||||
|
Me.btnDefaults.TabIndex = 4
|
||||||
|
Me.btnDefaults.Text = "Set &Defaults"
|
||||||
|
Me.btnDefaults.UseVisualStyleBackColor = True
|
||||||
|
'
|
||||||
|
'pnlBackup
|
||||||
|
'
|
||||||
|
Me.pnlBackup.Controls.Add(Me.lblMinutes)
|
||||||
|
Me.pnlBackup.Controls.Add(Me.nudSupressBackupThreshold)
|
||||||
|
Me.pnlBackup.Controls.Add(Me.grpFolderOptions)
|
||||||
|
Me.pnlBackup.Controls.Add(Me.chkSupressBackup)
|
||||||
|
Me.pnlBackup.Controls.Add(Me.chkBackupConfirm)
|
||||||
|
Me.pnlBackup.Controls.Add(Me.chkCheckSum)
|
||||||
|
Me.pnlBackup.Controls.Add(Me.chkOverwriteWarning)
|
||||||
|
Me.pnlBackup.Controls.Add(Me.chkRestoreOnLaunch)
|
||||||
|
Me.pnlBackup.Location = New System.Drawing.Point(180, 0)
|
||||||
|
Me.pnlBackup.Name = "pnlBackup"
|
||||||
|
Me.pnlBackup.Size = New System.Drawing.Size(367, 314)
|
||||||
|
Me.pnlBackup.TabIndex = 3
|
||||||
|
'
|
||||||
|
'pnl7z
|
||||||
|
'
|
||||||
|
Me.pnl7z.Controls.Add(Me.grp7zAdvanced)
|
||||||
|
Me.pnl7z.Controls.Add(Me.grp7zInformation)
|
||||||
|
Me.pnl7z.Controls.Add(Me.grp7zGeneral)
|
||||||
|
Me.pnl7z.Location = New System.Drawing.Point(180, 0)
|
||||||
|
Me.pnl7z.Name = "pnl7z"
|
||||||
|
Me.pnl7z.Size = New System.Drawing.Size(367, 314)
|
||||||
|
Me.pnl7z.TabIndex = 2
|
||||||
|
'
|
||||||
|
'grp7zAdvanced
|
||||||
|
'
|
||||||
|
Me.grp7zAdvanced.Controls.Add(Me.btn7zLocation)
|
||||||
|
Me.grp7zAdvanced.Controls.Add(Me.lblArguments)
|
||||||
|
Me.grp7zAdvanced.Controls.Add(Me.txt7zLocation)
|
||||||
|
Me.grp7zAdvanced.Controls.Add(Me.txt7zArguments)
|
||||||
|
Me.grp7zAdvanced.Controls.Add(Me.lblLocation)
|
||||||
|
Me.grp7zAdvanced.Location = New System.Drawing.Point(6, 68)
|
||||||
|
Me.grp7zAdvanced.Name = "grp7zAdvanced"
|
||||||
|
Me.grp7zAdvanced.Size = New System.Drawing.Size(354, 73)
|
||||||
|
Me.grp7zAdvanced.TabIndex = 2
|
||||||
|
Me.grp7zAdvanced.TabStop = False
|
||||||
|
Me.grp7zAdvanced.Text = "Advanced"
|
||||||
|
'
|
||||||
|
'grp7zInformation
|
||||||
|
'
|
||||||
|
Me.grp7zInformation.Controls.Add(Me.lbl7zProduct)
|
||||||
|
Me.grp7zInformation.Controls.Add(Me.lbl7zCopyright)
|
||||||
|
Me.grp7zInformation.Location = New System.Drawing.Point(6, 146)
|
||||||
|
Me.grp7zInformation.Name = "grp7zInformation"
|
||||||
|
Me.grp7zInformation.Size = New System.Drawing.Size(354, 63)
|
||||||
|
Me.grp7zInformation.TabIndex = 1
|
||||||
|
Me.grp7zInformation.TabStop = False
|
||||||
|
Me.grp7zInformation.Text = "Utility Information"
|
||||||
|
'
|
||||||
|
'pnlGeneral
|
||||||
|
'
|
||||||
|
Me.pnlGeneral.Controls.Add(Me.chkAutoSaveLog)
|
||||||
|
Me.pnlGeneral.Controls.Add(Me.grpGameData)
|
||||||
|
Me.pnlGeneral.Controls.Add(Me.chkShowDetectionTips)
|
||||||
|
Me.pnlGeneral.Controls.Add(Me.grpStartup)
|
||||||
|
Me.pnlGeneral.Location = New System.Drawing.Point(180, 0)
|
||||||
|
Me.pnlGeneral.Name = "pnlGeneral"
|
||||||
|
Me.pnlGeneral.Size = New System.Drawing.Size(367, 314)
|
||||||
|
Me.pnlGeneral.TabIndex = 1
|
||||||
|
'
|
||||||
|
'grpGameData
|
||||||
|
'
|
||||||
|
Me.grpGameData.Controls.Add(Me.chkTimeTracking)
|
||||||
|
Me.grpGameData.Controls.Add(Me.chkSync)
|
||||||
|
Me.grpGameData.Controls.Add(Me.btnOptionalFields)
|
||||||
|
Me.grpGameData.Location = New System.Drawing.Point(6, 106)
|
||||||
|
Me.grpGameData.Name = "grpGameData"
|
||||||
|
Me.grpGameData.Size = New System.Drawing.Size(354, 69)
|
||||||
|
Me.grpGameData.TabIndex = 1
|
||||||
|
Me.grpGameData.TabStop = False
|
||||||
|
Me.grpGameData.Text = "Game Data"
|
||||||
|
'
|
||||||
|
'lstSettings
|
||||||
|
'
|
||||||
|
Me.lstSettings.FormattingEnabled = True
|
||||||
|
Me.lstSettings.Location = New System.Drawing.Point(12, 12)
|
||||||
|
Me.lstSettings.Name = "lstSettings"
|
||||||
|
Me.lstSettings.Size = New System.Drawing.Size(162, 303)
|
||||||
|
Me.lstSettings.TabIndex = 0
|
||||||
'
|
'
|
||||||
'frmSettings
|
'frmSettings
|
||||||
'
|
'
|
||||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||||
Me.ClientSize = New System.Drawing.Size(384, 511)
|
Me.ClientSize = New System.Drawing.Size(554, 361)
|
||||||
Me.Controls.Add(Me.grp7z)
|
Me.Controls.Add(Me.lstSettings)
|
||||||
Me.Controls.Add(Me.grpBackup)
|
Me.Controls.Add(Me.btnDefaults)
|
||||||
Me.Controls.Add(Me.btnCancel)
|
Me.Controls.Add(Me.btnCancel)
|
||||||
Me.Controls.Add(Me.btnSave)
|
Me.Controls.Add(Me.btnSave)
|
||||||
Me.Controls.Add(Me.grpPaths)
|
Me.Controls.Add(Me.pnlGeneral)
|
||||||
Me.Controls.Add(Me.grpGeneral)
|
Me.Controls.Add(Me.pnl7z)
|
||||||
|
Me.Controls.Add(Me.pnlBackup)
|
||||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
|
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
|
||||||
Me.MaximizeBox = False
|
Me.MaximizeBox = False
|
||||||
Me.MinimizeBox = False
|
Me.MinimizeBox = False
|
||||||
@@ -328,22 +499,30 @@ Partial Class frmSettings
|
|||||||
Me.ShowInTaskbar = False
|
Me.ShowInTaskbar = False
|
||||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
||||||
Me.Text = "Settings"
|
Me.Text = "Settings"
|
||||||
Me.grpGeneral.ResumeLayout(False)
|
Me.grpStartup.ResumeLayout(False)
|
||||||
Me.grpGeneral.PerformLayout()
|
Me.grpStartup.PerformLayout()
|
||||||
Me.grpPaths.ResumeLayout(False)
|
Me.grpFolderOptions.ResumeLayout(False)
|
||||||
Me.grpPaths.PerformLayout()
|
Me.grpFolderOptions.PerformLayout()
|
||||||
Me.grpBackup.ResumeLayout(False)
|
|
||||||
Me.grpBackup.PerformLayout()
|
|
||||||
CType(Me.nudSupressBackupThreshold, System.ComponentModel.ISupportInitialize).EndInit()
|
CType(Me.nudSupressBackupThreshold, System.ComponentModel.ISupportInitialize).EndInit()
|
||||||
Me.grp7z.ResumeLayout(False)
|
Me.grp7zGeneral.ResumeLayout(False)
|
||||||
Me.grp7z.PerformLayout()
|
Me.grp7zGeneral.PerformLayout()
|
||||||
|
Me.pnlBackup.ResumeLayout(False)
|
||||||
|
Me.pnlBackup.PerformLayout()
|
||||||
|
Me.pnl7z.ResumeLayout(False)
|
||||||
|
Me.grp7zAdvanced.ResumeLayout(False)
|
||||||
|
Me.grp7zAdvanced.PerformLayout()
|
||||||
|
Me.grp7zInformation.ResumeLayout(False)
|
||||||
|
Me.pnlGeneral.ResumeLayout(False)
|
||||||
|
Me.pnlGeneral.PerformLayout()
|
||||||
|
Me.grpGameData.ResumeLayout(False)
|
||||||
|
Me.grpGameData.PerformLayout()
|
||||||
Me.ResumeLayout(False)
|
Me.ResumeLayout(False)
|
||||||
|
|
||||||
End Sub
|
End Sub
|
||||||
Friend WithEvents chkMonitorOnStartup As System.Windows.Forms.CheckBox
|
Friend WithEvents chkMonitorOnStartup As System.Windows.Forms.CheckBox
|
||||||
Friend WithEvents chkBackupConfirm As System.Windows.Forms.CheckBox
|
Friend WithEvents chkBackupConfirm As System.Windows.Forms.CheckBox
|
||||||
Friend WithEvents grpGeneral As System.Windows.Forms.GroupBox
|
Friend WithEvents grpStartup As System.Windows.Forms.GroupBox
|
||||||
Friend WithEvents grpPaths As System.Windows.Forms.GroupBox
|
Friend WithEvents grpFolderOptions As System.Windows.Forms.GroupBox
|
||||||
Friend WithEvents txtBackupFolder As System.Windows.Forms.TextBox
|
Friend WithEvents txtBackupFolder As System.Windows.Forms.TextBox
|
||||||
Friend WithEvents btnSave As System.Windows.Forms.Button
|
Friend WithEvents btnSave As System.Windows.Forms.Button
|
||||||
Friend WithEvents btnCancel As System.Windows.Forms.Button
|
Friend WithEvents btnCancel As System.Windows.Forms.Button
|
||||||
@@ -351,7 +530,6 @@ Partial Class frmSettings
|
|||||||
Friend WithEvents btnBackupFolder As System.Windows.Forms.Button
|
Friend WithEvents btnBackupFolder As System.Windows.Forms.Button
|
||||||
Friend WithEvents chkShowDetectionTips As System.Windows.Forms.CheckBox
|
Friend WithEvents chkShowDetectionTips As System.Windows.Forms.CheckBox
|
||||||
Friend WithEvents chkStartToTray As System.Windows.Forms.CheckBox
|
Friend WithEvents chkStartToTray As System.Windows.Forms.CheckBox
|
||||||
Friend WithEvents grpBackup As System.Windows.Forms.GroupBox
|
|
||||||
Friend WithEvents chkOverwriteWarning As System.Windows.Forms.CheckBox
|
Friend WithEvents chkOverwriteWarning As System.Windows.Forms.CheckBox
|
||||||
Friend WithEvents chkCreateFolder As System.Windows.Forms.CheckBox
|
Friend WithEvents chkCreateFolder As System.Windows.Forms.CheckBox
|
||||||
Friend WithEvents chkRestoreOnLaunch As System.Windows.Forms.CheckBox
|
Friend WithEvents chkRestoreOnLaunch As System.Windows.Forms.CheckBox
|
||||||
@@ -362,7 +540,24 @@ Partial Class frmSettings
|
|||||||
Friend WithEvents lblMinutes As Label
|
Friend WithEvents lblMinutes As Label
|
||||||
Friend WithEvents nudSupressBackupThreshold As NumericUpDown
|
Friend WithEvents nudSupressBackupThreshold As NumericUpDown
|
||||||
Friend WithEvents chkSupressBackup As CheckBox
|
Friend WithEvents chkSupressBackup As CheckBox
|
||||||
Friend WithEvents grp7z As GroupBox
|
Friend WithEvents grp7zGeneral As GroupBox
|
||||||
Friend WithEvents cboCompression As ComboBox
|
Friend WithEvents cboCompression As ComboBox
|
||||||
Friend WithEvents lblCompression As Label
|
Friend WithEvents lblCompression As Label
|
||||||
|
Friend WithEvents lbl7zProduct As Label
|
||||||
|
Friend WithEvents lbl7zCopyright As Label
|
||||||
|
Friend WithEvents btn7zLocation As Button
|
||||||
|
Friend WithEvents txt7zLocation As TextBox
|
||||||
|
Friend WithEvents lblLocation As Label
|
||||||
|
Friend WithEvents txt7zArguments As TextBox
|
||||||
|
Friend WithEvents lblArguments As Label
|
||||||
|
Friend WithEvents btnDefaults As Button
|
||||||
|
Friend WithEvents btnOptionalFields As Button
|
||||||
|
Friend WithEvents chkAutoSaveLog As CheckBox
|
||||||
|
Friend WithEvents pnlBackup As Panel
|
||||||
|
Friend WithEvents pnl7z As Panel
|
||||||
|
Friend WithEvents pnlGeneral As Panel
|
||||||
|
Friend WithEvents grpGameData As GroupBox
|
||||||
|
Friend WithEvents lstSettings As ListBox
|
||||||
|
Friend WithEvents grp7zAdvanced As GroupBox
|
||||||
|
Friend WithEvents grp7zInformation As GroupBox
|
||||||
End Class
|
End Class
|
||||||
|
|||||||
+193
-24
@@ -1,9 +1,11 @@
|
|||||||
Imports GBM.My.Resources
|
Imports GBM.My.Resources
|
||||||
|
Imports System.IO
|
||||||
|
|
||||||
Public Class frmSettings
|
Public Class frmSettings
|
||||||
Dim bShutdown As Boolean = False
|
Dim bShutdown As Boolean = False
|
||||||
Dim bBackupLocationChanged As Boolean = False
|
Dim bSyncSettingsChanged As Boolean = False
|
||||||
Dim bCheckSumDisabled As Boolean = False
|
Dim bCheckSumDisabled As Boolean = False
|
||||||
|
Dim eCurrentSyncFields As clsGame.eOptionalSyncFields
|
||||||
Private oSettings As mgrSettings
|
Private oSettings As mgrSettings
|
||||||
|
|
||||||
Property Settings As mgrSettings
|
Property Settings As mgrSettings
|
||||||
@@ -15,15 +17,6 @@ Public Class frmSettings
|
|||||||
End Set
|
End Set
|
||||||
End Property
|
End Property
|
||||||
|
|
||||||
Private Property BackupLocationChanged As Boolean
|
|
||||||
Get
|
|
||||||
Return bBackupLocationChanged
|
|
||||||
End Get
|
|
||||||
Set(value As Boolean)
|
|
||||||
bBackupLocationChanged = value
|
|
||||||
End Set
|
|
||||||
End Property
|
|
||||||
|
|
||||||
Private Sub HandleRegistryUpdate(ByVal bToggle As Boolean)
|
Private Sub HandleRegistryUpdate(ByVal bToggle As Boolean)
|
||||||
Dim oKey As Microsoft.Win32.RegistryKey
|
Dim oKey As Microsoft.Win32.RegistryKey
|
||||||
Dim sAppName As String = Application.ProductName
|
Dim sAppName As String = Application.ProductName
|
||||||
@@ -51,6 +44,7 @@ Public Class frmSettings
|
|||||||
oSettings.MonitorOnStartup = chkMonitorOnStartup.Checked
|
oSettings.MonitorOnStartup = chkMonitorOnStartup.Checked
|
||||||
oSettings.StartToTray = chkStartToTray.Checked
|
oSettings.StartToTray = chkStartToTray.Checked
|
||||||
oSettings.ShowDetectionToolTips = chkShowDetectionTips.Checked
|
oSettings.ShowDetectionToolTips = chkShowDetectionTips.Checked
|
||||||
|
oSettings.AutoSaveLog = chkAutoSaveLog.Checked
|
||||||
oSettings.DisableConfirmation = chkBackupConfirm.Checked
|
oSettings.DisableConfirmation = chkBackupConfirm.Checked
|
||||||
oSettings.CreateSubFolder = chkCreateFolder.Checked
|
oSettings.CreateSubFolder = chkCreateFolder.Checked
|
||||||
oSettings.ShowOverwriteWarning = chkOverwriteWarning.Checked
|
oSettings.ShowOverwriteWarning = chkOverwriteWarning.Checked
|
||||||
@@ -60,6 +54,13 @@ Public Class frmSettings
|
|||||||
oSettings.SupressBackupThreshold = nudSupressBackupThreshold.Value
|
oSettings.SupressBackupThreshold = nudSupressBackupThreshold.Value
|
||||||
oSettings.CompressionLevel = cboCompression.SelectedValue
|
oSettings.CompressionLevel = cboCompression.SelectedValue
|
||||||
|
|
||||||
|
If oSettings.Custom7zArguments <> txt7zArguments.Text.Trim And txt7zArguments.Text.Trim <> String.Empty Then
|
||||||
|
mgrCommon.ShowMessage(frmSettings_WarningArguments, MsgBoxStyle.Exclamation)
|
||||||
|
End If
|
||||||
|
|
||||||
|
oSettings.Custom7zArguments = txt7zArguments.Text.Trim
|
||||||
|
oSettings.Custom7zLocation = txt7zLocation.Text.Trim
|
||||||
|
|
||||||
'We need to clear all checksums its turned off
|
'We need to clear all checksums its turned off
|
||||||
If chkCheckSum.Checked = False And oSettings.CheckSum = True Then
|
If chkCheckSum.Checked = False And oSettings.CheckSum = True Then
|
||||||
bCheckSumDisabled = True
|
bCheckSumDisabled = True
|
||||||
@@ -68,13 +69,13 @@ Public Class frmSettings
|
|||||||
|
|
||||||
'Turning syncing from off to on is the same as changing the backup folder
|
'Turning syncing from off to on is the same as changing the backup folder
|
||||||
If chkSync.Checked = True And oSettings.Sync = False Then
|
If chkSync.Checked = True And oSettings.Sync = False Then
|
||||||
bBackupLocationChanged = True
|
bSyncSettingsChanged = True
|
||||||
End If
|
End If
|
||||||
oSettings.Sync = chkSync.Checked
|
oSettings.Sync = chkSync.Checked
|
||||||
|
|
||||||
If IO.Directory.Exists(txtBackupFolder.Text) Then
|
If Directory.Exists(txtBackupFolder.Text) Then
|
||||||
If oSettings.BackupFolder <> txtBackupFolder.Text Then
|
If oSettings.BackupFolder <> txtBackupFolder.Text Then
|
||||||
If chkSync.Checked Then bBackupLocationChanged = True
|
If chkSync.Checked Then bSyncSettingsChanged = True
|
||||||
End If
|
End If
|
||||||
oSettings.BackupFolder = txtBackupFolder.Text
|
oSettings.BackupFolder = txtBackupFolder.Text
|
||||||
Else
|
Else
|
||||||
@@ -82,13 +83,29 @@ Public Class frmSettings
|
|||||||
Return False
|
Return False
|
||||||
End If
|
End If
|
||||||
|
|
||||||
|
If oSettings.Custom7zLocation <> String.Empty Then
|
||||||
|
If File.Exists(oSettings.Custom7zLocation) Then
|
||||||
|
If Path.GetFileNameWithoutExtension(oSettings.Custom7zLocation) <> "7za" Then
|
||||||
|
mgrCommon.ShowMessage(frmSettings_WarningLocation, MsgBoxStyle.Critical)
|
||||||
|
End If
|
||||||
|
Else
|
||||||
|
mgrCommon.ShowMessage(frmSettings_ErrorLocation, oSettings.Custom7zLocation, MsgBoxStyle.Critical)
|
||||||
|
Return False
|
||||||
|
End If
|
||||||
|
End If
|
||||||
|
|
||||||
|
'We must trigger a sync if optional fields have changed
|
||||||
|
If Settings.Sync And (eCurrentSyncFields <> Settings.SyncFields) Then
|
||||||
|
bSyncSettingsChanged = True
|
||||||
|
End If
|
||||||
|
|
||||||
Return True
|
Return True
|
||||||
End Function
|
End Function
|
||||||
|
|
||||||
Private Function SaveSettings() As Boolean
|
Private Function SaveSettings() As Boolean
|
||||||
If ValidateSettings() Then
|
If ValidateSettings() Then
|
||||||
oSettings.SaveSettings()
|
oSettings.SaveSettings()
|
||||||
If BackupLocationChanged Then mgrMonitorList.HandleBackupLocationChange()
|
If bSyncSettingsChanged Then mgrMonitorList.HandleBackupLocationChange(Settings)
|
||||||
If bCheckSumDisabled Then mgrManifest.DoManifestHashWipe()
|
If bCheckSumDisabled Then mgrManifest.DoManifestHashWipe()
|
||||||
Return True
|
Return True
|
||||||
Else
|
Else
|
||||||
@@ -96,11 +113,67 @@ Public Class frmSettings
|
|||||||
End If
|
End If
|
||||||
End Function
|
End Function
|
||||||
|
|
||||||
|
Private Sub GetUtilityInfo(ByVal sLocation As String)
|
||||||
|
Dim bDefault As Boolean = False
|
||||||
|
Dim sFileDescription As String
|
||||||
|
Dim sVersion As String
|
||||||
|
Dim sCopyright As String
|
||||||
|
|
||||||
|
'Ignore this function when on Unix and hide the information data
|
||||||
|
If mgrCommon.IsUnix Then
|
||||||
|
grp7zInformation.Visible = False
|
||||||
|
Else
|
||||||
|
Try
|
||||||
|
grp7zInformation.Visible = True
|
||||||
|
|
||||||
|
'Use default when no custom location is set
|
||||||
|
If sLocation = String.Empty Then
|
||||||
|
sLocation = mgrPath.Default7zLocation
|
||||||
|
bDefault = True
|
||||||
|
End If
|
||||||
|
|
||||||
|
'Get info
|
||||||
|
Dim oFileInfo As FileVersionInfo = FileVersionInfo.GetVersionInfo(sLocation)
|
||||||
|
|
||||||
|
If oFileInfo.FileDescription = String.Empty Then
|
||||||
|
sFileDescription = App_NotAvailable
|
||||||
|
Else
|
||||||
|
sFileDescription = oFileInfo.FileDescription
|
||||||
|
End If
|
||||||
|
|
||||||
|
If oFileInfo.ProductVersion = String.Empty Then
|
||||||
|
sVersion = App_NotAvailable
|
||||||
|
Else
|
||||||
|
sVersion = oFileInfo.ProductVersion
|
||||||
|
End If
|
||||||
|
|
||||||
|
If oFileInfo.LegalCopyright = String.Empty Then
|
||||||
|
sCopyright = App_NotAvailable
|
||||||
|
Else
|
||||||
|
sCopyright = oFileInfo.LegalCopyright
|
||||||
|
End If
|
||||||
|
|
||||||
|
lbl7zProduct.Text = sFileDescription & " - " & sVersion
|
||||||
|
lbl7zCopyright.Text = sCopyright
|
||||||
|
Catch ex As Exception
|
||||||
|
grp7zInformation.Visible = False
|
||||||
|
End Try
|
||||||
|
End If
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Sub SetDefaults()
|
||||||
|
If mgrCommon.ShowMessage(frmSettings_ConfirmDefaults, MsgBoxStyle.YesNo) = MsgBoxResult.Yes Then
|
||||||
|
oSettings = New mgrSettings
|
||||||
|
LoadSettings()
|
||||||
|
End If
|
||||||
|
End Sub
|
||||||
|
|
||||||
Private Sub LoadSettings()
|
Private Sub LoadSettings()
|
||||||
chkStartWindows.Checked = oSettings.StartWithWindows
|
chkStartWindows.Checked = oSettings.StartWithWindows
|
||||||
chkMonitorOnStartup.Checked = oSettings.MonitorOnStartup
|
chkMonitorOnStartup.Checked = oSettings.MonitorOnStartup
|
||||||
chkStartToTray.Checked = oSettings.StartToTray
|
chkStartToTray.Checked = oSettings.StartToTray
|
||||||
chkShowDetectionTips.Checked = oSettings.ShowDetectionToolTips
|
chkShowDetectionTips.Checked = oSettings.ShowDetectionToolTips
|
||||||
|
chkAutoSaveLog.Checked = oSettings.AutoSaveLog
|
||||||
chkBackupConfirm.Checked = oSettings.DisableConfirmation
|
chkBackupConfirm.Checked = oSettings.DisableConfirmation
|
||||||
chkCreateFolder.Checked = oSettings.CreateSubFolder
|
chkCreateFolder.Checked = oSettings.CreateSubFolder
|
||||||
chkOverwriteWarning.Checked = oSettings.ShowOverwriteWarning
|
chkOverwriteWarning.Checked = oSettings.ShowOverwriteWarning
|
||||||
@@ -113,16 +186,26 @@ Public Class frmSettings
|
|||||||
nudSupressBackupThreshold.Value = oSettings.SupressBackupThreshold
|
nudSupressBackupThreshold.Value = oSettings.SupressBackupThreshold
|
||||||
nudSupressBackupThreshold.Enabled = chkSupressBackup.Checked
|
nudSupressBackupThreshold.Enabled = chkSupressBackup.Checked
|
||||||
cboCompression.SelectedValue = oSettings.CompressionLevel
|
cboCompression.SelectedValue = oSettings.CompressionLevel
|
||||||
|
txt7zArguments.Text = oSettings.Custom7zArguments
|
||||||
|
txt7zLocation.Text = oSettings.Custom7zLocation
|
||||||
|
eCurrentSyncFields = oSettings.SyncFields
|
||||||
|
|
||||||
'Unix Handler
|
'Unix Handler
|
||||||
If mgrCommon.IsUnix Then
|
If mgrCommon.IsUnix Then
|
||||||
chkStartToTray.Checked = False
|
chkStartToTray.Checked = False
|
||||||
chkStartWindows.Checked = False
|
chkStartWindows.Checked = False
|
||||||
End If
|
End If
|
||||||
|
|
||||||
|
'Retrieve 7z Info
|
||||||
|
GetUtilityInfo(oSettings.Custom7zLocation)
|
||||||
|
|
||||||
|
'Toggle Sync Button
|
||||||
|
ToggleSyncButton()
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
Private Sub LoadCombos()
|
Private Sub LoadCombos()
|
||||||
Dim oComboItems As New List(Of KeyValuePair(Of Integer, String))
|
Dim oComboItems As New List(Of KeyValuePair(Of Integer, String))
|
||||||
|
Dim oSettingsItems As New List(Of KeyValuePair(Of Integer, String))
|
||||||
|
|
||||||
'cboCompression
|
'cboCompression
|
||||||
cboCompression.ValueMember = "Key"
|
cboCompression.ValueMember = "Key"
|
||||||
@@ -136,6 +219,57 @@ Public Class frmSettings
|
|||||||
oComboItems.Add(New KeyValuePair(Of Integer, String)(9, frmSettings_cboCompression_Ultra))
|
oComboItems.Add(New KeyValuePair(Of Integer, String)(9, frmSettings_cboCompression_Ultra))
|
||||||
|
|
||||||
cboCompression.DataSource = oComboItems
|
cboCompression.DataSource = oComboItems
|
||||||
|
|
||||||
|
'lstSettings
|
||||||
|
lstSettings.ValueMember = "Key"
|
||||||
|
lstSettings.DisplayMember = "Value"
|
||||||
|
|
||||||
|
oSettingsItems.Add(New KeyValuePair(Of Integer, String)(0, frmSettings_lstSettings_General))
|
||||||
|
oSettingsItems.Add(New KeyValuePair(Of Integer, String)(1, frmSettings_lstSettings_BackupRestore))
|
||||||
|
oSettingsItems.Add(New KeyValuePair(Of Integer, String)(2, frmSettings_lstSettings_7z))
|
||||||
|
|
||||||
|
lstSettings.DataSource = oSettingsItems
|
||||||
|
|
||||||
|
'Select Default
|
||||||
|
lstSettings.SelectedIndex = 0
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Sub ToggleSyncButton()
|
||||||
|
If chkSync.Checked Then
|
||||||
|
btnOptionalFields.Enabled = True
|
||||||
|
Else
|
||||||
|
btnOptionalFields.Enabled = False
|
||||||
|
End If
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Sub OpenOptionalFields()
|
||||||
|
Dim frm As New frmSyncFields
|
||||||
|
frm.SyncFields = Settings.SyncFields
|
||||||
|
frm.ShowDialog()
|
||||||
|
If frm.DialogResult = DialogResult.OK Then
|
||||||
|
Settings.SyncFields = frm.SyncFields
|
||||||
|
End If
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Sub ChangePanel()
|
||||||
|
If lstSettings.SelectedItems.Count > 0 Then
|
||||||
|
Dim oSettingsItem As KeyValuePair(Of Integer, String) = lstSettings.SelectedItems(0)
|
||||||
|
|
||||||
|
Select Case oSettingsItem.Key
|
||||||
|
Case 0
|
||||||
|
pnlGeneral.Visible = True
|
||||||
|
pnlBackup.Visible = False
|
||||||
|
pnl7z.Visible = False
|
||||||
|
Case 1
|
||||||
|
pnlGeneral.Visible = False
|
||||||
|
pnlBackup.Visible = True
|
||||||
|
pnl7z.Visible = False
|
||||||
|
Case 2
|
||||||
|
pnlGeneral.Visible = False
|
||||||
|
pnlBackup.Visible = False
|
||||||
|
pnl7z.Visible = True
|
||||||
|
End Select
|
||||||
|
End If
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
Private Sub SetForm()
|
Private Sub SetForm()
|
||||||
@@ -143,7 +277,6 @@ Public Class frmSettings
|
|||||||
Me.Text = frmSettings_FormName
|
Me.Text = frmSettings_FormName
|
||||||
|
|
||||||
'Set Form Text
|
'Set Form Text
|
||||||
grpBackup.Text = frmSettings_grpBackup
|
|
||||||
lblMinutes.Text = frmSettings_lblMinutes
|
lblMinutes.Text = frmSettings_lblMinutes
|
||||||
chkSupressBackup.Text = frmSettings_chkSupressBackup
|
chkSupressBackup.Text = frmSettings_chkSupressBackup
|
||||||
chkCheckSum.Text = frmSettings_chkCheckSum
|
chkCheckSum.Text = frmSettings_chkCheckSum
|
||||||
@@ -153,24 +286,37 @@ Public Class frmSettings
|
|||||||
chkBackupConfirm.Text = frmSettings_chkBackupConfirm
|
chkBackupConfirm.Text = frmSettings_chkBackupConfirm
|
||||||
btnCancel.Text = frmSettings_btnCancel
|
btnCancel.Text = frmSettings_btnCancel
|
||||||
btnSave.Text = frmSettings_btnSave
|
btnSave.Text = frmSettings_btnSave
|
||||||
grpPaths.Text = frmSettings_grpPaths
|
grpFolderOptions.Text = frmSettings_grpFolderOptions
|
||||||
btnBackupFolder.Text = frmSettings_btnBackupFolder
|
btnBackupFolder.Text = frmSettings_btnBackupFolder
|
||||||
lblBackupFolder.Text = frmSettings_lblBackupFolder
|
lblBackupFolder.Text = frmSettings_lblBackupFolder
|
||||||
grpGeneral.Text = frmSettings_grpGeneral
|
grpStartup.Text = frmSettings_grpStartup
|
||||||
|
grpGameData.Text = frmSettings_grpGameData
|
||||||
chkTimeTracking.Text = frmSettings_chkTimeTracking
|
chkTimeTracking.Text = frmSettings_chkTimeTracking
|
||||||
chkStartWindows.Text = frmSettings_chkStartWindows
|
chkStartWindows.Text = frmSettings_chkStartWindows
|
||||||
chkSync.Text = frmSettings_chkSync
|
chkSync.Text = frmSettings_chkSync
|
||||||
chkShowDetectionTips.Text = frmSettings_chkShowDetectionTips
|
chkShowDetectionTips.Text = frmSettings_chkShowDetectionTips
|
||||||
|
chkAutoSaveLog.Text = frmSettings_chkAutoSaveLog
|
||||||
chkStartToTray.Text = frmSettings_chkStartToTray
|
chkStartToTray.Text = frmSettings_chkStartToTray
|
||||||
chkMonitorOnStartup.Text = frmSettings_chkMonitorOnStartup
|
chkMonitorOnStartup.Text = frmSettings_chkMonitorOnStartup
|
||||||
grp7z.Text = frmSettings_grp7z
|
grp7zGeneral.Text = frmSettings_grp7zGeneral
|
||||||
|
grp7zAdvanced.Text = frmSettings_grp7zAdvanced
|
||||||
|
grp7zInformation.Text = frmSettings_grp7zInformation
|
||||||
lblCompression.Text = frmSettings_lblCompression
|
lblCompression.Text = frmSettings_lblCompression
|
||||||
|
btnDefaults.Text = frmSettings_btnDefaults
|
||||||
|
lblArguments.Text = frmSettings_lblArguments
|
||||||
|
lblLocation.Text = frmSettings_lblLocation
|
||||||
|
btnOptionalFields.Text = frmSettings_btnOptionalFields
|
||||||
|
|
||||||
'Unix Handler
|
'Unix Handler
|
||||||
If mgrCommon.IsUnix Then
|
If mgrCommon.IsUnix Then
|
||||||
chkStartToTray.Enabled = False
|
chkStartToTray.Enabled = False
|
||||||
chkStartWindows.Enabled = False
|
chkStartWindows.Enabled = False
|
||||||
End If
|
End If
|
||||||
|
|
||||||
|
'Handle Panels
|
||||||
|
pnlGeneral.Visible = False
|
||||||
|
pnlBackup.Visible = False
|
||||||
|
pnl7z.Visible = False
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
Private Sub btnSave_Click(sender As System.Object, e As System.EventArgs) Handles btnSave.Click
|
Private Sub btnSave_Click(sender As System.Object, e As System.EventArgs) Handles btnSave.Click
|
||||||
@@ -185,12 +331,6 @@ Public Class frmSettings
|
|||||||
Me.Close()
|
Me.Close()
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
Private Sub frmSettings_FormClosing(sender As System.Object, e As System.Windows.Forms.FormClosingEventArgs) Handles MyBase.FormClosing
|
|
||||||
If bShutdown = False Then
|
|
||||||
e.Cancel = True
|
|
||||||
End If
|
|
||||||
End Sub
|
|
||||||
|
|
||||||
Private Sub frmSettings_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
|
Private Sub frmSettings_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
|
||||||
SetForm()
|
SetForm()
|
||||||
LoadCombos()
|
LoadCombos()
|
||||||
@@ -203,7 +343,36 @@ Public Class frmSettings
|
|||||||
If sNewFolder <> String.Empty Then txtBackupFolder.Text = sNewFolder
|
If sNewFolder <> String.Empty Then txtBackupFolder.Text = sNewFolder
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
|
Private Sub btn7zLocation_Click(sender As Object, e As EventArgs) Handles btn7zLocation.Click
|
||||||
|
Dim sNewLocation As String
|
||||||
|
sNewLocation = mgrCommon.OpenFileBrowser(frmSettings_Browse7za, "exe", frmSettings_7zaFileType, Environment.GetFolderPath(Environment.SpecialFolder.MyDocuments), False)
|
||||||
|
If sNewLocation <> String.Empty Then
|
||||||
|
txt7zLocation.Text = sNewLocation
|
||||||
|
GetUtilityInfo(txt7zLocation.Text)
|
||||||
|
End If
|
||||||
|
End Sub
|
||||||
|
|
||||||
Private Sub chkSupressBackup_CheckedChanged(sender As Object, e As EventArgs) Handles chkSupressBackup.CheckedChanged
|
Private Sub chkSupressBackup_CheckedChanged(sender As Object, e As EventArgs) Handles chkSupressBackup.CheckedChanged
|
||||||
nudSupressBackupThreshold.Enabled = chkSupressBackup.Checked
|
nudSupressBackupThreshold.Enabled = chkSupressBackup.Checked
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
|
Private Sub txt7zLocation_Leave(sender As Object, e As EventArgs) Handles txt7zLocation.Leave
|
||||||
|
GetUtilityInfo(txt7zLocation.Text.Trim)
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Sub btnDefaults_Click(sender As Object, e As EventArgs) Handles btnDefaults.Click
|
||||||
|
SetDefaults()
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Sub btnOptionalFields_Click(sender As Object, e As EventArgs) Handles btnOptionalFields.Click
|
||||||
|
OpenOptionalFields()
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Sub chkSync_CheckedChanged(sender As Object, e As EventArgs) Handles chkSync.CheckedChanged
|
||||||
|
ToggleSyncButton()
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Sub lstSettings_SelectedValueChanged(sender As Object, e As EventArgs) Handles lstSettings.SelectedValueChanged
|
||||||
|
ChangePanel()
|
||||||
|
End Sub
|
||||||
End Class
|
End Class
|
||||||
@@ -66,7 +66,7 @@ Public Class frmStartUpWizard
|
|||||||
If oDatabase.CheckDB() Then
|
If oDatabase.CheckDB() Then
|
||||||
'Make sure database is the latest version
|
'Make sure database is the latest version
|
||||||
oDatabase.DatabaseUpgrade()
|
oDatabase.DatabaseUpgrade()
|
||||||
mgrMonitorList.SyncMonitorLists(False)
|
mgrMonitorList.SyncMonitorLists(oSettings.SyncFields, False)
|
||||||
mgrCommon.ShowMessage(frmStartUpWizard_ExistingData, MsgBoxStyle.Information)
|
mgrCommon.ShowMessage(frmStartUpWizard_ExistingData, MsgBoxStyle.Information)
|
||||||
End If
|
End If
|
||||||
End Sub
|
End Sub
|
||||||
@@ -98,16 +98,18 @@ Public Class frmStartUpWizard
|
|||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
Private Sub DownloadSettings()
|
Private Sub DownloadSettings()
|
||||||
|
Dim sImportURL As String
|
||||||
|
|
||||||
If mgrCommon.IsUnix Then
|
If mgrCommon.IsUnix Then
|
||||||
If mgrCommon.ShowMessage(frmGameManager_ConfirmUnixImportWarning, MsgBoxStyle.YesNo) = MsgBoxResult.No Then
|
sImportURL = App_URLImportLinux
|
||||||
Exit Sub
|
Else
|
||||||
End If
|
sImportURL = App_URLImport
|
||||||
End If
|
End If
|
||||||
|
|
||||||
If mgrCommon.ShowMessage(frmStartUpWizard_ConfirmOfficialImport, MsgBoxStyle.YesNo) = MsgBoxResult.Yes Then
|
If mgrCommon.ShowMessage(frmStartUpWizard_ConfirmOfficialImport, MsgBoxStyle.YesNo) = MsgBoxResult.Yes Then
|
||||||
If mgrMonitorList.DoImport(App_URLImport) Then
|
If mgrMonitorList.DoImport(sImportURL) Then
|
||||||
oGameData = mgrMonitorList.ReadList(mgrMonitorList.eListTypes.FullList)
|
oGameData = mgrMonitorList.ReadList(mgrMonitorList.eListTypes.FullList)
|
||||||
If oSettings.Sync Then mgrMonitorList.SyncMonitorLists()
|
If oSettings.Sync Then mgrMonitorList.SyncMonitorLists(oSettings.SyncFields)
|
||||||
End If
|
End If
|
||||||
End If
|
End If
|
||||||
End Sub
|
End Sub
|
||||||
@@ -122,7 +124,7 @@ Public Class frmStartUpWizard
|
|||||||
frm.GameData = oGameData
|
frm.GameData = oGameData
|
||||||
frm.ShowDialog()
|
frm.ShowDialog()
|
||||||
LoadGameSettings()
|
LoadGameSettings()
|
||||||
If oSettings.Sync Then mgrMonitorList.SyncMonitorLists()
|
If oSettings.Sync Then mgrMonitorList.SyncMonitorLists(oSettings.SyncFields)
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
Private Sub OpenMonitorList()
|
Private Sub OpenMonitorList()
|
||||||
@@ -131,7 +133,7 @@ Public Class frmStartUpWizard
|
|||||||
frm.DisableExternalFunctions = True
|
frm.DisableExternalFunctions = True
|
||||||
frm.ShowDialog()
|
frm.ShowDialog()
|
||||||
LoadGameSettings()
|
LoadGameSettings()
|
||||||
If oSettings.Sync Then mgrMonitorList.SyncMonitorLists()
|
If oSettings.Sync Then mgrMonitorList.SyncMonitorLists(oSettings.SyncFields)
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
Private Function ValidateBackupPath(ByVal strPath As String, ByRef sErrorMessage As String) As Boolean
|
Private Function ValidateBackupPath(ByVal strPath As String, ByRef sErrorMessage As String) As Boolean
|
||||||
|
|||||||
Generated
+163
@@ -0,0 +1,163 @@
|
|||||||
|
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||||
|
Partial Class frmSyncFields
|
||||||
|
Inherits System.Windows.Forms.Form
|
||||||
|
|
||||||
|
'Form overrides dispose to clean up the component list.
|
||||||
|
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||||
|
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||||
|
Try
|
||||||
|
If disposing AndAlso components IsNot Nothing Then
|
||||||
|
components.Dispose()
|
||||||
|
End If
|
||||||
|
Finally
|
||||||
|
MyBase.Dispose(disposing)
|
||||||
|
End Try
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
'Required by the Windows Form Designer
|
||||||
|
Private components As System.ComponentModel.IContainer
|
||||||
|
|
||||||
|
'NOTE: The following procedure is required by the Windows Form Designer
|
||||||
|
'It can be modified using the Windows Form Designer.
|
||||||
|
'Do not modify it using the code editor.
|
||||||
|
<System.Diagnostics.DebuggerStepThrough()> _
|
||||||
|
Private Sub InitializeComponent()
|
||||||
|
Me.grpFields = New System.Windows.Forms.GroupBox()
|
||||||
|
Me.chkMonitorGame = New System.Windows.Forms.CheckBox()
|
||||||
|
Me.chkIcon = New System.Windows.Forms.CheckBox()
|
||||||
|
Me.chkVersion = New System.Windows.Forms.CheckBox()
|
||||||
|
Me.chkCompany = New System.Windows.Forms.CheckBox()
|
||||||
|
Me.chkGamePath = New System.Windows.Forms.CheckBox()
|
||||||
|
Me.chkTimeStamp = New System.Windows.Forms.CheckBox()
|
||||||
|
Me.btnCancel = New System.Windows.Forms.Button()
|
||||||
|
Me.btnSave = New System.Windows.Forms.Button()
|
||||||
|
Me.grpFields.SuspendLayout()
|
||||||
|
Me.SuspendLayout()
|
||||||
|
'
|
||||||
|
'grpFields
|
||||||
|
'
|
||||||
|
Me.grpFields.Controls.Add(Me.chkMonitorGame)
|
||||||
|
Me.grpFields.Controls.Add(Me.chkIcon)
|
||||||
|
Me.grpFields.Controls.Add(Me.chkVersion)
|
||||||
|
Me.grpFields.Controls.Add(Me.chkCompany)
|
||||||
|
Me.grpFields.Controls.Add(Me.chkGamePath)
|
||||||
|
Me.grpFields.Controls.Add(Me.chkTimeStamp)
|
||||||
|
Me.grpFields.Location = New System.Drawing.Point(12, 12)
|
||||||
|
Me.grpFields.Name = "grpFields"
|
||||||
|
Me.grpFields.Size = New System.Drawing.Size(195, 162)
|
||||||
|
Me.grpFields.TabIndex = 0
|
||||||
|
Me.grpFields.TabStop = False
|
||||||
|
Me.grpFields.Text = "Available Fields"
|
||||||
|
'
|
||||||
|
'chkMonitorGame
|
||||||
|
'
|
||||||
|
Me.chkMonitorGame.AutoSize = True
|
||||||
|
Me.chkMonitorGame.Location = New System.Drawing.Point(6, 134)
|
||||||
|
Me.chkMonitorGame.Name = "chkMonitorGame"
|
||||||
|
Me.chkMonitorGame.Size = New System.Drawing.Size(109, 17)
|
||||||
|
Me.chkMonitorGame.TabIndex = 5
|
||||||
|
Me.chkMonitorGame.Text = "Monitor this game"
|
||||||
|
Me.chkMonitorGame.UseVisualStyleBackColor = True
|
||||||
|
'
|
||||||
|
'chkIcon
|
||||||
|
'
|
||||||
|
Me.chkIcon.AutoSize = True
|
||||||
|
Me.chkIcon.Location = New System.Drawing.Point(6, 111)
|
||||||
|
Me.chkIcon.Name = "chkIcon"
|
||||||
|
Me.chkIcon.Size = New System.Drawing.Size(148, 17)
|
||||||
|
Me.chkIcon.TabIndex = 4
|
||||||
|
Me.chkIcon.Text = "Icon (Not Recommended)"
|
||||||
|
Me.chkIcon.UseVisualStyleBackColor = True
|
||||||
|
'
|
||||||
|
'chkVersion
|
||||||
|
'
|
||||||
|
Me.chkVersion.AutoSize = True
|
||||||
|
Me.chkVersion.Location = New System.Drawing.Point(6, 88)
|
||||||
|
Me.chkVersion.Name = "chkVersion"
|
||||||
|
Me.chkVersion.Size = New System.Drawing.Size(61, 17)
|
||||||
|
Me.chkVersion.TabIndex = 3
|
||||||
|
Me.chkVersion.Text = "Version"
|
||||||
|
Me.chkVersion.UseVisualStyleBackColor = True
|
||||||
|
'
|
||||||
|
'chkCompany
|
||||||
|
'
|
||||||
|
Me.chkCompany.AutoSize = True
|
||||||
|
Me.chkCompany.Location = New System.Drawing.Point(6, 65)
|
||||||
|
Me.chkCompany.Name = "chkCompany"
|
||||||
|
Me.chkCompany.Size = New System.Drawing.Size(70, 17)
|
||||||
|
Me.chkCompany.TabIndex = 2
|
||||||
|
Me.chkCompany.Text = "Company"
|
||||||
|
Me.chkCompany.UseVisualStyleBackColor = True
|
||||||
|
'
|
||||||
|
'chkGamePath
|
||||||
|
'
|
||||||
|
Me.chkGamePath.AutoSize = True
|
||||||
|
Me.chkGamePath.Location = New System.Drawing.Point(6, 42)
|
||||||
|
Me.chkGamePath.Name = "chkGamePath"
|
||||||
|
Me.chkGamePath.Size = New System.Drawing.Size(180, 17)
|
||||||
|
Me.chkGamePath.TabIndex = 1
|
||||||
|
Me.chkGamePath.Text = "Game Path (Not Recommended)"
|
||||||
|
Me.chkGamePath.UseVisualStyleBackColor = True
|
||||||
|
'
|
||||||
|
'chkTimeStamp
|
||||||
|
'
|
||||||
|
Me.chkTimeStamp.AutoSize = True
|
||||||
|
Me.chkTimeStamp.Location = New System.Drawing.Point(6, 19)
|
||||||
|
Me.chkTimeStamp.Name = "chkTimeStamp"
|
||||||
|
Me.chkTimeStamp.Size = New System.Drawing.Size(133, 17)
|
||||||
|
Me.chkTimeStamp.TabIndex = 0
|
||||||
|
Me.chkTimeStamp.Text = "Save multiple backups"
|
||||||
|
Me.chkTimeStamp.UseVisualStyleBackColor = True
|
||||||
|
'
|
||||||
|
'btnCancel
|
||||||
|
'
|
||||||
|
Me.btnCancel.DialogResult = System.Windows.Forms.DialogResult.Cancel
|
||||||
|
Me.btnCancel.Location = New System.Drawing.Point(132, 180)
|
||||||
|
Me.btnCancel.Name = "btnCancel"
|
||||||
|
Me.btnCancel.Size = New System.Drawing.Size(75, 23)
|
||||||
|
Me.btnCancel.TabIndex = 2
|
||||||
|
Me.btnCancel.Text = "&Cancel"
|
||||||
|
Me.btnCancel.UseVisualStyleBackColor = True
|
||||||
|
'
|
||||||
|
'btnSave
|
||||||
|
'
|
||||||
|
Me.btnSave.DialogResult = System.Windows.Forms.DialogResult.OK
|
||||||
|
Me.btnSave.Location = New System.Drawing.Point(52, 180)
|
||||||
|
Me.btnSave.Name = "btnSave"
|
||||||
|
Me.btnSave.Size = New System.Drawing.Size(75, 23)
|
||||||
|
Me.btnSave.TabIndex = 1
|
||||||
|
Me.btnSave.Text = "&Save"
|
||||||
|
Me.btnSave.UseVisualStyleBackColor = True
|
||||||
|
'
|
||||||
|
'frmSyncFields
|
||||||
|
'
|
||||||
|
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||||
|
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||||
|
Me.ClientSize = New System.Drawing.Size(219, 211)
|
||||||
|
Me.Controls.Add(Me.btnCancel)
|
||||||
|
Me.Controls.Add(Me.btnSave)
|
||||||
|
Me.Controls.Add(Me.grpFields)
|
||||||
|
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
|
||||||
|
Me.MaximizeBox = False
|
||||||
|
Me.MinimizeBox = False
|
||||||
|
Me.Name = "frmSyncFields"
|
||||||
|
Me.ShowIcon = False
|
||||||
|
Me.ShowInTaskbar = False
|
||||||
|
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterParent
|
||||||
|
Me.Text = "Optional Sync Fields"
|
||||||
|
Me.grpFields.ResumeLayout(False)
|
||||||
|
Me.grpFields.PerformLayout()
|
||||||
|
Me.ResumeLayout(False)
|
||||||
|
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Friend WithEvents grpFields As GroupBox
|
||||||
|
Friend WithEvents chkMonitorGame As CheckBox
|
||||||
|
Friend WithEvents chkIcon As CheckBox
|
||||||
|
Friend WithEvents chkVersion As CheckBox
|
||||||
|
Friend WithEvents chkCompany As CheckBox
|
||||||
|
Friend WithEvents chkGamePath As CheckBox
|
||||||
|
Friend WithEvents chkTimeStamp As CheckBox
|
||||||
|
Friend WithEvents btnCancel As Button
|
||||||
|
Friend WithEvents btnSave As Button
|
||||||
|
End Class
|
||||||
@@ -0,0 +1,120 @@
|
|||||||
|
<?xml version="1.0" encoding="utf-8"?>
|
||||||
|
<root>
|
||||||
|
<!--
|
||||||
|
Microsoft ResX Schema
|
||||||
|
|
||||||
|
Version 2.0
|
||||||
|
|
||||||
|
The primary goals of this format is to allow a simple XML format
|
||||||
|
that is mostly human readable. The generation and parsing of the
|
||||||
|
various data types are done through the TypeConverter classes
|
||||||
|
associated with the data types.
|
||||||
|
|
||||||
|
Example:
|
||||||
|
|
||||||
|
... ado.net/XML headers & schema ...
|
||||||
|
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||||
|
<resheader name="version">2.0</resheader>
|
||||||
|
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||||
|
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||||
|
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||||
|
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||||
|
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||||
|
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||||
|
</data>
|
||||||
|
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||||
|
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||||
|
<comment>This is a comment</comment>
|
||||||
|
</data>
|
||||||
|
|
||||||
|
There are any number of "resheader" rows that contain simple
|
||||||
|
name/value pairs.
|
||||||
|
|
||||||
|
Each data row contains a name, and value. The row also contains a
|
||||||
|
type or mimetype. Type corresponds to a .NET class that support
|
||||||
|
text/value conversion through the TypeConverter architecture.
|
||||||
|
Classes that don't support this are serialized and stored with the
|
||||||
|
mimetype set.
|
||||||
|
|
||||||
|
The mimetype is used for serialized objects, and tells the
|
||||||
|
ResXResourceReader how to depersist the object. This is currently not
|
||||||
|
extensible. For a given mimetype the value must be set accordingly:
|
||||||
|
|
||||||
|
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||||
|
that the ResXResourceWriter will generate, however the reader can
|
||||||
|
read any of the formats listed below.
|
||||||
|
|
||||||
|
mimetype: application/x-microsoft.net.object.binary.base64
|
||||||
|
value : The object must be serialized with
|
||||||
|
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||||
|
: and then encoded with base64 encoding.
|
||||||
|
|
||||||
|
mimetype: application/x-microsoft.net.object.soap.base64
|
||||||
|
value : The object must be serialized with
|
||||||
|
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||||
|
: and then encoded with base64 encoding.
|
||||||
|
|
||||||
|
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||||
|
value : The object must be serialized into a byte array
|
||||||
|
: using a System.ComponentModel.TypeConverter
|
||||||
|
: and then encoded with base64 encoding.
|
||||||
|
-->
|
||||||
|
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||||
|
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||||
|
<xsd:element name="root" msdata:IsDataSet="true">
|
||||||
|
<xsd:complexType>
|
||||||
|
<xsd:choice maxOccurs="unbounded">
|
||||||
|
<xsd:element name="metadata">
|
||||||
|
<xsd:complexType>
|
||||||
|
<xsd:sequence>
|
||||||
|
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||||
|
</xsd:sequence>
|
||||||
|
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||||
|
<xsd:attribute name="type" type="xsd:string" />
|
||||||
|
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||||
|
<xsd:attribute ref="xml:space" />
|
||||||
|
</xsd:complexType>
|
||||||
|
</xsd:element>
|
||||||
|
<xsd:element name="assembly">
|
||||||
|
<xsd:complexType>
|
||||||
|
<xsd:attribute name="alias" type="xsd:string" />
|
||||||
|
<xsd:attribute name="name" type="xsd:string" />
|
||||||
|
</xsd:complexType>
|
||||||
|
</xsd:element>
|
||||||
|
<xsd:element name="data">
|
||||||
|
<xsd:complexType>
|
||||||
|
<xsd:sequence>
|
||||||
|
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||||
|
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||||
|
</xsd:sequence>
|
||||||
|
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||||
|
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||||
|
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||||
|
<xsd:attribute ref="xml:space" />
|
||||||
|
</xsd:complexType>
|
||||||
|
</xsd:element>
|
||||||
|
<xsd:element name="resheader">
|
||||||
|
<xsd:complexType>
|
||||||
|
<xsd:sequence>
|
||||||
|
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||||
|
</xsd:sequence>
|
||||||
|
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||||
|
</xsd:complexType>
|
||||||
|
</xsd:element>
|
||||||
|
</xsd:choice>
|
||||||
|
</xsd:complexType>
|
||||||
|
</xsd:element>
|
||||||
|
</xsd:schema>
|
||||||
|
<resheader name="resmimetype">
|
||||||
|
<value>text/microsoft-resx</value>
|
||||||
|
</resheader>
|
||||||
|
<resheader name="version">
|
||||||
|
<value>2.0</value>
|
||||||
|
</resheader>
|
||||||
|
<resheader name="reader">
|
||||||
|
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||||
|
</resheader>
|
||||||
|
<resheader name="writer">
|
||||||
|
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||||
|
</resheader>
|
||||||
|
</root>
|
||||||
@@ -0,0 +1,115 @@
|
|||||||
|
Imports GBM.My.Resources
|
||||||
|
|
||||||
|
Public Class frmSyncFields
|
||||||
|
Private eSyncFields As clsGame.eOptionalSyncFields
|
||||||
|
|
||||||
|
Public Property SyncFields As clsGame.eOptionalSyncFields
|
||||||
|
Get
|
||||||
|
Return eSyncFields
|
||||||
|
End Get
|
||||||
|
Set(value As clsGame.eOptionalSyncFields)
|
||||||
|
eSyncFields = value
|
||||||
|
End Set
|
||||||
|
End Property
|
||||||
|
|
||||||
|
Private Sub LoadForm()
|
||||||
|
'Load fields
|
||||||
|
If (eSyncFields And clsGame.eOptionalSyncFields.Company) = clsGame.eOptionalSyncFields.Company Then
|
||||||
|
chkCompany.Checked = True
|
||||||
|
End If
|
||||||
|
If (eSyncFields And clsGame.eOptionalSyncFields.GamePath) = clsGame.eOptionalSyncFields.GamePath Then
|
||||||
|
chkGamePath.Checked = True
|
||||||
|
End If
|
||||||
|
If (eSyncFields And clsGame.eOptionalSyncFields.Icon) = clsGame.eOptionalSyncFields.Icon Then
|
||||||
|
chkIcon.Checked = True
|
||||||
|
End If
|
||||||
|
If (eSyncFields And clsGame.eOptionalSyncFields.MonitorGame) = clsGame.eOptionalSyncFields.MonitorGame Then
|
||||||
|
chkMonitorGame.Checked = True
|
||||||
|
End If
|
||||||
|
If (eSyncFields And clsGame.eOptionalSyncFields.TimeStamp) = clsGame.eOptionalSyncFields.TimeStamp Then
|
||||||
|
chkTimeStamp.Checked = True
|
||||||
|
End If
|
||||||
|
If (eSyncFields And clsGame.eOptionalSyncFields.Version) = clsGame.eOptionalSyncFields.Version Then
|
||||||
|
chkVersion.Checked = True
|
||||||
|
End If
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Sub SetForm()
|
||||||
|
'Set Form Name
|
||||||
|
Me.Text = frmSyncFields_FormName
|
||||||
|
|
||||||
|
'Set Form Text
|
||||||
|
btnCancel.Text = frmSyncFields_btnCancel
|
||||||
|
btnSave.Text = frmSyncFields_btnSave
|
||||||
|
grpFields.Text = frmSyncFields_grpFields
|
||||||
|
chkMonitorGame.Text = frmSyncFields_chkMonitorGame
|
||||||
|
chkIcon.Text = frmSyncFields_chkIcon
|
||||||
|
chkVersion.Text = frmSyncFields_chkVersion
|
||||||
|
chkCompany.Text = frmSyncFields_chkCompany
|
||||||
|
chkGamePath.Text = frmSyncFields_chkGamePath
|
||||||
|
chkTimeStamp.Text = frmSyncFields_chkTimeStamp
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Sub frmSyncFields_Load(sender As Object, e As EventArgs) Handles MyBase.Load
|
||||||
|
SetForm()
|
||||||
|
LoadForm()
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Sub btnSave_Click(sender As Object, e As EventArgs) Handles btnSave.Click
|
||||||
|
Me.DialogResult = DialogResult.OK
|
||||||
|
Me.Close()
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Sub btnCancel_Click(sender As Object, e As EventArgs) Handles btnCancel.Click
|
||||||
|
Me.DialogResult = DialogResult.Cancel
|
||||||
|
Me.Close()
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Sub chkTimeStamp_CheckedChanged(sender As Object, e As EventArgs) Handles chkTimeStamp.CheckedChanged
|
||||||
|
If chkTimeStamp.Checked Then
|
||||||
|
SyncFields = mgrCommon.SetSyncField(SyncFields, clsGame.eOptionalSyncFields.TimeStamp)
|
||||||
|
Else
|
||||||
|
SyncFields = mgrCommon.RemoveSyncField(SyncFields, clsGame.eOptionalSyncFields.TimeStamp)
|
||||||
|
End If
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Sub chkGamePath_CheckedChanged(sender As Object, e As EventArgs) Handles chkGamePath.CheckedChanged
|
||||||
|
If chkGamePath.Checked Then
|
||||||
|
SyncFields = mgrCommon.SetSyncField(SyncFields, clsGame.eOptionalSyncFields.GamePath)
|
||||||
|
Else
|
||||||
|
SyncFields = mgrCommon.RemoveSyncField(SyncFields, clsGame.eOptionalSyncFields.GamePath)
|
||||||
|
End If
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Sub chkCompany_CheckedChanged(sender As Object, e As EventArgs) Handles chkCompany.CheckedChanged
|
||||||
|
If chkCompany.Checked Then
|
||||||
|
SyncFields = mgrCommon.SetSyncField(SyncFields, clsGame.eOptionalSyncFields.Company)
|
||||||
|
Else
|
||||||
|
SyncFields = mgrCommon.RemoveSyncField(SyncFields, clsGame.eOptionalSyncFields.Company)
|
||||||
|
End If
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Sub chkVersion_CheckedChanged(sender As Object, e As EventArgs) Handles chkVersion.CheckedChanged
|
||||||
|
If chkVersion.Checked Then
|
||||||
|
SyncFields = mgrCommon.SetSyncField(SyncFields, clsGame.eOptionalSyncFields.Version)
|
||||||
|
Else
|
||||||
|
SyncFields = mgrCommon.RemoveSyncField(SyncFields, clsGame.eOptionalSyncFields.Version)
|
||||||
|
End If
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Sub chkIcon_CheckedChanged(sender As Object, e As EventArgs) Handles chkIcon.CheckedChanged
|
||||||
|
If chkIcon.Checked Then
|
||||||
|
SyncFields = mgrCommon.SetSyncField(SyncFields, clsGame.eOptionalSyncFields.Icon)
|
||||||
|
Else
|
||||||
|
SyncFields = mgrCommon.RemoveSyncField(SyncFields, clsGame.eOptionalSyncFields.Icon)
|
||||||
|
End If
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Sub chkMonitorGame_CheckedChanged(sender As Object, e As EventArgs) Handles chkMonitorGame.CheckedChanged
|
||||||
|
If chkMonitorGame.Checked Then
|
||||||
|
SyncFields = mgrCommon.SetSyncField(SyncFields, clsGame.eOptionalSyncFields.MonitorGame)
|
||||||
|
Else
|
||||||
|
SyncFields = mgrCommon.RemoveSyncField(SyncFields, clsGame.eOptionalSyncFields.MonitorGame)
|
||||||
|
End If
|
||||||
|
End Sub
|
||||||
|
End Class
|
||||||
@@ -1,4 +1,4 @@
|
|||||||
<?xml version="1.0" encoding="utf-8"?>
|
<?xml version="1.0" encoding="utf-8"?>
|
||||||
<Project ToolsVersion="4.0" DefaultTargets="Build" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
|
<Project ToolsVersion="4.0" DefaultTargets="Build" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
|
||||||
<PropertyGroup>
|
<PropertyGroup>
|
||||||
<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
|
<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
|
||||||
@@ -195,6 +195,12 @@
|
|||||||
<DependentUpon>frmMain.vb</DependentUpon>
|
<DependentUpon>frmMain.vb</DependentUpon>
|
||||||
<SubType>Form</SubType>
|
<SubType>Form</SubType>
|
||||||
</Compile>
|
</Compile>
|
||||||
|
<Compile Include="Forms\frmSyncFields.Designer.vb">
|
||||||
|
<DependentUpon>frmSyncFields.vb</DependentUpon>
|
||||||
|
</Compile>
|
||||||
|
<Compile Include="Forms\frmSyncFields.vb">
|
||||||
|
<SubType>Form</SubType>
|
||||||
|
</Compile>
|
||||||
<Compile Include="Forms\frmTags.Designer.vb">
|
<Compile Include="Forms\frmTags.Designer.vb">
|
||||||
<DependentUpon>frmTags.vb</DependentUpon>
|
<DependentUpon>frmTags.vb</DependentUpon>
|
||||||
</Compile>
|
</Compile>
|
||||||
@@ -273,6 +279,9 @@
|
|||||||
<DependentUpon>frmMain.vb</DependentUpon>
|
<DependentUpon>frmMain.vb</DependentUpon>
|
||||||
<SubType>Designer</SubType>
|
<SubType>Designer</SubType>
|
||||||
</EmbeddedResource>
|
</EmbeddedResource>
|
||||||
|
<EmbeddedResource Include="Forms\frmSyncFields.resx">
|
||||||
|
<DependentUpon>frmSyncFields.vb</DependentUpon>
|
||||||
|
</EmbeddedResource>
|
||||||
<EmbeddedResource Include="Forms\frmTags.resx">
|
<EmbeddedResource Include="Forms\frmTags.resx">
|
||||||
<DependentUpon>frmTags.vb</DependentUpon>
|
<DependentUpon>frmTags.vb</DependentUpon>
|
||||||
</EmbeddedResource>
|
</EmbeddedResource>
|
||||||
@@ -329,6 +338,12 @@
|
|||||||
<CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
|
<CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
|
||||||
</Content>
|
</Content>
|
||||||
<Content Include="References\Mono.Data.Sqlite.dll" />
|
<Content Include="References\Mono.Data.Sqlite.dll" />
|
||||||
|
<Content Include="Utilities\x64\7za.exe">
|
||||||
|
<CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
|
||||||
|
</Content>
|
||||||
|
<Content Include="Utilities\x86\7za.exe">
|
||||||
|
<CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
|
||||||
|
</Content>
|
||||||
<Content Include="x86\sqlite3.dll" />
|
<Content Include="x86\sqlite3.dll" />
|
||||||
<None Include="Resources\gbm.ico" />
|
<None Include="Resources\gbm.ico" />
|
||||||
<Content Include="Resources\Admin.png" />
|
<Content Include="Resources\Admin.png" />
|
||||||
@@ -342,24 +357,6 @@
|
|||||||
<Content Include="Resources\type.ico" />
|
<Content Include="Resources\type.ico" />
|
||||||
<Content Include="Resources\User.png" />
|
<Content Include="Resources\User.png" />
|
||||||
<Content Include="x64\sqlite3.dll" />
|
<Content Include="x64\sqlite3.dll" />
|
||||||
<Content Include="Utilities\x64\7za.dll">
|
|
||||||
<CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
|
|
||||||
</Content>
|
|
||||||
<Content Include="Utilities\x64\7za.exe">
|
|
||||||
<CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
|
|
||||||
</Content>
|
|
||||||
<Content Include="Utilities\x64\7zxa.dll">
|
|
||||||
<CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
|
|
||||||
</Content>
|
|
||||||
<Content Include="Utilities\x86\7za.dll">
|
|
||||||
<CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
|
|
||||||
</Content>
|
|
||||||
<Content Include="Utilities\x86\7za.exe">
|
|
||||||
<CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
|
|
||||||
</Content>
|
|
||||||
<Content Include="Utilities\x86\7zxa.dll">
|
|
||||||
<CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
|
|
||||||
</Content>
|
|
||||||
<None Include="Resources\Stopped.png" />
|
<None Include="Resources\Stopped.png" />
|
||||||
<None Include="Resources\Detected.png" />
|
<None Include="Resources\Detected.png" />
|
||||||
<None Include="Resources\Ready.png" />
|
<None Include="Resources\Ready.png" />
|
||||||
|
|||||||
@@ -3,7 +3,7 @@
|
|||||||
License for use and distribution
|
License for use and distribution
|
||||||
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
|
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
|
||||||
|
|
||||||
Copyright (C) 1999-2015 Igor Pavlov.
|
Copyright (C) 1999-2016 Igor Pavlov.
|
||||||
|
|
||||||
7-Zip Extra files are under the GNU LGPL license.
|
7-Zip Extra files are under the GNU LGPL license.
|
||||||
|
|
||||||
|
|||||||
@@ -1,5 +1,5 @@
|
|||||||
GBM - Game Backup Monitor
|
GBM - Game Backup Monitor
|
||||||
Copyright (C) 2015 Michael J. Seiferling
|
Copyright (C) 2016 Michael J. Seiferling
|
||||||
|
|
||||||
This program is free software: you can redistribute it and/or modify
|
This program is free software: you can redistribute it and/or modify
|
||||||
it under the terms of the GNU General Public License as published by
|
it under the terms of the GNU General Public License as published by
|
||||||
@@ -16,4 +16,4 @@ along with this program. If not, see <http://www.gnu.org/licenses/>.
|
|||||||
|
|
||||||
Contact Information:
|
Contact Information:
|
||||||
|
|
||||||
mseiferling@gmail.com
|
gamebackupmonitor@gmail.com
|
||||||
+67
-39
@@ -50,15 +50,15 @@ Public Class mgrBackup
|
|||||||
oItem.CheckSum = sCheckSum
|
oItem.CheckSum = sCheckSum
|
||||||
|
|
||||||
'Save Remote Manifest
|
'Save Remote Manifest
|
||||||
If mgrManifest.DoManifestCheck(oItem.Name, mgrSQLite.Database.Remote) Then
|
If mgrManifest.DoSpecificManifestCheck(oItem, mgrSQLite.Database.Remote) Then
|
||||||
mgrManifest.DoManifestUpdate(oItem, mgrSQLite.Database.Remote)
|
mgrManifest.DoManifestUpdateByID(oItem, mgrSQLite.Database.Remote)
|
||||||
Else
|
Else
|
||||||
mgrManifest.DoManifestAdd(oItem, mgrSQLite.Database.Remote)
|
mgrManifest.DoManifestAdd(oItem, mgrSQLite.Database.Remote)
|
||||||
End If
|
End If
|
||||||
|
|
||||||
'Save Local Manifest
|
'Save Local Manifest
|
||||||
If mgrManifest.DoManifestCheck(oItem.Name, mgrSQLite.Database.Local) Then
|
If mgrManifest.DoGlobalManifestCheck(oItem.Name, mgrSQLite.Database.Local) Then
|
||||||
mgrManifest.DoManifestUpdate(oItem, mgrSQLite.Database.Local)
|
mgrManifest.DoManifestUpdateByName(oItem, mgrSQLite.Database.Local)
|
||||||
Else
|
Else
|
||||||
mgrManifest.DoManifestAdd(oItem, mgrSQLite.Database.Local)
|
mgrManifest.DoManifestAdd(oItem, mgrSQLite.Database.Local)
|
||||||
End If
|
End If
|
||||||
@@ -107,6 +107,33 @@ Public Class mgrBackup
|
|||||||
Return True
|
Return True
|
||||||
End Function
|
End Function
|
||||||
|
|
||||||
|
Private Sub CheckOldBackups(ByVal oGame As clsGame)
|
||||||
|
Dim oGameBackups As List(Of clsBackup) = mgrManifest.DoManifestGetByName(oGame.Name, mgrSQLite.Database.Remote)
|
||||||
|
Dim oGameBackup As clsBackup
|
||||||
|
Dim sOldBackup As String
|
||||||
|
Dim iBackupCount As Integer = oGameBackups.Count
|
||||||
|
Dim iDelCount As Integer
|
||||||
|
|
||||||
|
'If we've hit or exceeded the maximum backup limit
|
||||||
|
If oGameBackups.Count >= oGame.BackupLimit Then
|
||||||
|
'How many do we need to delete
|
||||||
|
iDelCount = (oGameBackups.Count - oGame.BackupLimit) + 1
|
||||||
|
|
||||||
|
'Delete the oldest backup(s) (Manifest entry and backup file)
|
||||||
|
For i = 1 To iDelCount
|
||||||
|
oGameBackup = oGameBackups(oGameBackups.Count - i)
|
||||||
|
sOldBackup = Settings.BackupFolder & Path.DirectorySeparatorChar & oGameBackup.FileName
|
||||||
|
|
||||||
|
mgrManifest.DoManifestDeletebyID(oGameBackup, mgrSQLite.Database.Remote)
|
||||||
|
mgrManifest.DoManifestDeletebyID(oGameBackup, mgrSQLite.Database.Local)
|
||||||
|
mgrCommon.DeleteFile(sOldBackup)
|
||||||
|
mgrCommon.DeleteDirectoryByBackup(Settings.BackupFolder & Path.DirectorySeparatorChar, oGameBackup)
|
||||||
|
|
||||||
|
RaiseEvent UpdateLog(mgrCommon.FormatString(mgrBackup_BackupLimitExceeded, Path.GetFileName(sOldBackup)), False, ToolTipIcon.Info, True)
|
||||||
|
Next
|
||||||
|
End If
|
||||||
|
End Sub
|
||||||
|
|
||||||
Public Sub DoBackup(ByVal oBackupList As List(Of clsGame))
|
Public Sub DoBackup(ByVal oBackupList As List(Of clsGame))
|
||||||
Dim oGame As clsGame
|
Dim oGame As clsGame
|
||||||
Dim bDoBackup As Boolean
|
Dim bDoBackup As Boolean
|
||||||
@@ -144,6 +171,7 @@ Public Class mgrBackup
|
|||||||
End If
|
End If
|
||||||
|
|
||||||
If oGame.AppendTimeStamp Then
|
If oGame.AppendTimeStamp Then
|
||||||
|
CheckOldBackups(oGame)
|
||||||
sBackupFile = sBackupFile & Path.DirectorySeparatorChar & oGame.Name & sTimeStamp & ".7z"
|
sBackupFile = sBackupFile & Path.DirectorySeparatorChar & oGame.Name & sTimeStamp & ".7z"
|
||||||
Else
|
Else
|
||||||
sBackupFile = sBackupFile & Path.DirectorySeparatorChar & oGame.Name & ".7z"
|
sBackupFile = sBackupFile & Path.DirectorySeparatorChar & oGame.Name & ".7z"
|
||||||
@@ -169,44 +197,44 @@ Public Class mgrBackup
|
|||||||
BuildFileList(sSavePath, oGame.ExcludeList, mgrPath.ExcludeFileLocation)
|
BuildFileList(sSavePath, oGame.ExcludeList, mgrPath.ExcludeFileLocation)
|
||||||
|
|
||||||
Try
|
Try
|
||||||
'Need to delete any prior archive if it exists, the 7za utility does not support overwriting or deleting existing archives.
|
|
||||||
'If we let 7za update existing archives it will lead to excessive bloat with games that routinely add and remove files with many different file names.
|
|
||||||
If File.Exists(sBackupFile) Then
|
|
||||||
File.Delete(sBackupFile)
|
|
||||||
End If
|
|
||||||
|
|
||||||
If Directory.Exists(sSavePath) Then
|
If Directory.Exists(sSavePath) Then
|
||||||
'The Linux version of 7za doesn't support the new verbose parameters and fails out. Just split this up for now until we have a better solution.
|
If Settings.Is7zUtilityValid Then
|
||||||
If mgrCommon.IsUnix Then
|
'Need to delete any prior archive if it exists, the 7za utility does not support overwriting or deleting existing archives.
|
||||||
prs7z.StartInfo.Arguments = "a -t7z -mx" & oSettings.CompressionLevel & " -i@""" & mgrPath.IncludeFileLocation & """ -x@""" & mgrPath.ExcludeFileLocation & """ """ & sBackupFile & """ -r"
|
'If we let 7za update existing archives it will lead to excessive bloat with games that routinely add and remove files with many different file names.
|
||||||
|
If File.Exists(sBackupFile) Then
|
||||||
|
File.Delete(sBackupFile)
|
||||||
|
End If
|
||||||
|
|
||||||
|
prs7z.StartInfo.Arguments = "a" & oSettings.Prepared7zArguments & "-t7z -mx" & oSettings.CompressionLevel & " -i@""" & mgrPath.IncludeFileLocation & """ -x@""" & mgrPath.ExcludeFileLocation & """ """ & sBackupFile & """ -r"
|
||||||
|
prs7z.StartInfo.FileName = oSettings.Utility7zLocation
|
||||||
|
prs7z.StartInfo.UseShellExecute = False
|
||||||
|
prs7z.StartInfo.RedirectStandardOutput = True
|
||||||
|
prs7z.StartInfo.CreateNoWindow = True
|
||||||
|
prs7z.Start()
|
||||||
|
RaiseEvent UpdateLog(mgrCommon.FormatString(mgrBackup_BackupInProgress, sSavePath), False, ToolTipIcon.Info, True)
|
||||||
|
While Not prs7z.StandardOutput.EndOfStream
|
||||||
|
If CancelOperation Then
|
||||||
|
prs7z.Kill()
|
||||||
|
RaiseEvent UpdateLog(mgrCommon.FormatString(mgrBackup_ErrorFullAbort, oGame.Name), True, ToolTipIcon.Error, True)
|
||||||
|
Exit While
|
||||||
|
End If
|
||||||
|
RaiseEvent UpdateLog(prs7z.StandardOutput.ReadLine, False, ToolTipIcon.Info, False)
|
||||||
|
End While
|
||||||
|
prs7z.WaitForExit()
|
||||||
|
If Not CancelOperation Then
|
||||||
|
If prs7z.ExitCode = 0 Then
|
||||||
|
RaiseEvent UpdateLog(mgrCommon.FormatString(mgrBackup_BackupComplete, New String() {oGame.Name, mgrCommon.GetFileSize(sBackupFile)}), False, ToolTipIcon.Info, True)
|
||||||
|
bBackupCompleted = True
|
||||||
|
Else
|
||||||
|
RaiseEvent UpdateLog(mgrCommon.FormatString(mgrBackup_BackupWarnings, oGame.Name), True, ToolTipIcon.Warning, True)
|
||||||
|
bBackupCompleted = False
|
||||||
|
End If
|
||||||
|
End If
|
||||||
|
prs7z.Dispose()
|
||||||
Else
|
Else
|
||||||
prs7z.StartInfo.Arguments = "a -bb1 -bt -t7z -mx" & oSettings.CompressionLevel & " -i@""" & mgrPath.IncludeFileLocation & """ -x@""" & mgrPath.ExcludeFileLocation & """ """ & sBackupFile & """ -r"
|
RaiseEvent UpdateLog(App_Invalid7zDetected, True, ToolTipIcon.Error, True)
|
||||||
|
bBackupCompleted = False
|
||||||
End If
|
End If
|
||||||
prs7z.StartInfo.FileName = mgrPath.Utility7zLocation
|
|
||||||
prs7z.StartInfo.UseShellExecute = False
|
|
||||||
prs7z.StartInfo.RedirectStandardOutput = True
|
|
||||||
prs7z.StartInfo.CreateNoWindow = True
|
|
||||||
prs7z.Start()
|
|
||||||
RaiseEvent UpdateLog(mgrCommon.FormatString(mgrBackup_BackupInProgress, sSavePath), False, ToolTipIcon.Info, True)
|
|
||||||
While Not prs7z.StandardOutput.EndOfStream
|
|
||||||
If CancelOperation Then
|
|
||||||
prs7z.Kill()
|
|
||||||
RaiseEvent UpdateLog(mgrCommon.FormatString(mgrBackup_ErrorFullAbort, oGame.Name), True, ToolTipIcon.Error, True)
|
|
||||||
Exit While
|
|
||||||
End If
|
|
||||||
RaiseEvent UpdateLog(prs7z.StandardOutput.ReadLine, False, ToolTipIcon.Info, False)
|
|
||||||
End While
|
|
||||||
prs7z.WaitForExit()
|
|
||||||
If Not CancelOperation Then
|
|
||||||
If prs7z.ExitCode = 0 Then
|
|
||||||
RaiseEvent UpdateLog(mgrCommon.FormatString(mgrBackup_BackupComplete, New String() {oGame.Name, mgrCommon.GetFileSize(sBackupFile)}), False, ToolTipIcon.Info, True)
|
|
||||||
bBackupCompleted = True
|
|
||||||
Else
|
|
||||||
RaiseEvent UpdateLog(mgrCommon.FormatString(mgrBackup_BackupWarnings, oGame.Name), True, ToolTipIcon.Warning, True)
|
|
||||||
bBackupCompleted = False
|
|
||||||
End If
|
|
||||||
End If
|
|
||||||
prs7z.Dispose()
|
|
||||||
Else
|
Else
|
||||||
RaiseEvent UpdateLog(mgrCommon.FormatString(mgrBackup_ErrorNoSavePath, oGame.Name), True, ToolTipIcon.Error, True)
|
RaiseEvent UpdateLog(mgrCommon.FormatString(mgrBackup_ErrorNoSavePath, oGame.Name), True, ToolTipIcon.Error, True)
|
||||||
bBackupCompleted = False
|
bBackupCompleted = False
|
||||||
|
|||||||
@@ -5,6 +5,23 @@ Imports System.Security.Principal
|
|||||||
|
|
||||||
Public Class mgrCommon
|
Public Class mgrCommon
|
||||||
|
|
||||||
|
'These need to be updated when upgrading the packaged 7z utility
|
||||||
|
Private Shared sUtility64Hash As String = "05ACEE3BAC0C6C4E396116EF27B953F992DE8D28DD14D317977F45692304C318" 'v16.02 7za.exe x64
|
||||||
|
Private Shared sUtility32Hash As String = "7AA7056DB4348229A288EEF49027B94C0D8D1A3C3AEDC6FA89B640334C7B37E9" 'v16.02 7za.exe x86
|
||||||
|
|
||||||
|
Public Shared ReadOnly Property UtilityHash As String
|
||||||
|
Get
|
||||||
|
Select Case mgrPath.ReleaseType
|
||||||
|
Case 64
|
||||||
|
Return sUtility64Hash
|
||||||
|
Case 32
|
||||||
|
Return sUtility32Hash
|
||||||
|
Case Else
|
||||||
|
Return sUtility32Hash
|
||||||
|
End Select
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
Public Shared ReadOnly Property BuildVersion As Integer
|
Public Shared ReadOnly Property BuildVersion As Integer
|
||||||
Get
|
Get
|
||||||
Return My.Application.Info.Version.Build
|
Return My.Application.Info.Version.Build
|
||||||
@@ -140,6 +157,14 @@ Public Class mgrCommon
|
|||||||
oProcess.Start()
|
oProcess.Start()
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
|
Public Shared Function SetSyncField(ByVal eSyncFields As clsGame.eOptionalSyncFields, ByVal eSyncField As clsGame.eOptionalSyncFields) As clsGame.eOptionalSyncFields
|
||||||
|
Return eSyncFields Or eSyncField
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Public Shared Function RemoveSyncField(ByVal eSyncFields As clsGame.eOptionalSyncFields, ByVal eSyncField As clsGame.eOptionalSyncFields) As clsGame.eOptionalSyncFields
|
||||||
|
Return eSyncFields And (Not eSyncField)
|
||||||
|
End Function
|
||||||
|
|
||||||
'Delete file based on OS type
|
'Delete file based on OS type
|
||||||
Public Shared Sub DeleteFile(ByVal sPath As String, Optional ByVal bRecycle As Boolean = True)
|
Public Shared Sub DeleteFile(ByVal sPath As String, Optional ByVal bRecycle As Boolean = True)
|
||||||
If File.Exists(sPath) Then
|
If File.Exists(sPath) Then
|
||||||
@@ -166,6 +191,24 @@ Public Class mgrCommon
|
|||||||
End If
|
End If
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
|
'Delete a sub-folder based on the provided backup information
|
||||||
|
Public Shared Sub DeleteDirectoryByBackup(ByVal sBackupFolder As String, ByVal oBackup As clsBackup)
|
||||||
|
Dim oDir As DirectoryInfo
|
||||||
|
Dim sDir As String = sBackupFolder & oBackup.Name
|
||||||
|
|
||||||
|
'Delete sub directory if it's empty
|
||||||
|
If oBackup.FileName.StartsWith(oBackup.Name & Path.DirectorySeparatorChar) Then
|
||||||
|
If Directory.Exists(sDir) Then
|
||||||
|
'Check if there's any sub-directories or files remaining
|
||||||
|
oDir = New DirectoryInfo(sDir)
|
||||||
|
If oDir.GetDirectories.Length = 0 And oDir.GetFiles.Length = 0 Then
|
||||||
|
'Folder is empty, delete the empty sub-folder
|
||||||
|
If Directory.Exists(sDir) Then DeleteDirectory(sDir)
|
||||||
|
End If
|
||||||
|
End If
|
||||||
|
End If
|
||||||
|
End Sub
|
||||||
|
|
||||||
'Save string as text file
|
'Save string as text file
|
||||||
Public Shared Sub SaveText(ByVal sText As String, ByVal sPath As String)
|
Public Shared Sub SaveText(ByVal sText As String, ByVal sPath As String)
|
||||||
Dim oStream As StreamWriter
|
Dim oStream As StreamWriter
|
||||||
|
|||||||
+157
-57
@@ -1,6 +1,37 @@
|
|||||||
Public Class mgrManifest
|
Public Class mgrManifest
|
||||||
|
|
||||||
Public Shared Function ReadManifest(ByVal iSelectDB As mgrSQLite.Database) As SortedList
|
Private Shared Function MapToObject(ByVal dr As DataRow) As clsBackup
|
||||||
|
Dim oBackupItem As clsBackup
|
||||||
|
|
||||||
|
oBackupItem = New clsBackup
|
||||||
|
oBackupItem.ID = CStr(dr("ManifestID"))
|
||||||
|
oBackupItem.Name = CStr(dr("Name"))
|
||||||
|
oBackupItem.FileName = CStr(dr("FileName"))
|
||||||
|
oBackupItem.RestorePath = CStr(dr("RestorePath"))
|
||||||
|
oBackupItem.AbsolutePath = CBool(dr("AbsolutePath"))
|
||||||
|
oBackupItem.DateUpdated = mgrCommon.UnixToDate(dr("DateUpdated"))
|
||||||
|
oBackupItem.UpdatedBy = CStr(dr("UpdatedBy"))
|
||||||
|
If Not IsDBNull(dr("CheckSum")) Then oBackupItem.CheckSum = CStr(dr("CheckSum"))
|
||||||
|
|
||||||
|
Return oBackupItem
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Private Shared Function SetCoreParameters(ByVal oBackupItem As clsBackup) As Hashtable
|
||||||
|
Dim hshParams As New Hashtable
|
||||||
|
|
||||||
|
hshParams.Add("ID", oBackupItem.ID)
|
||||||
|
hshParams.Add("Name", oBackupItem.Name)
|
||||||
|
hshParams.Add("FileName", oBackupItem.FileName)
|
||||||
|
hshParams.Add("Path", oBackupItem.TruePath)
|
||||||
|
hshParams.Add("AbsolutePath", oBackupItem.AbsolutePath)
|
||||||
|
hshParams.Add("DateUpdated", oBackupItem.DateUpdatedUnix)
|
||||||
|
hshParams.Add("UpdatedBy", oBackupItem.UpdatedBy)
|
||||||
|
hshParams.Add("CheckSum", oBackupItem.CheckSum)
|
||||||
|
|
||||||
|
Return hshParams
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Public Shared Function ReadFullManifest(ByVal iSelectDB As mgrSQLite.Database) As SortedList
|
||||||
Dim oDatabase As New mgrSQLite(iSelectDB)
|
Dim oDatabase As New mgrSQLite(iSelectDB)
|
||||||
Dim oData As DataSet
|
Dim oData As DataSet
|
||||||
Dim sSQL As String
|
Dim sSQL As String
|
||||||
@@ -11,15 +42,26 @@
|
|||||||
oData = oDatabase.ReadParamData(sSQL, New Hashtable)
|
oData = oDatabase.ReadParamData(sSQL, New Hashtable)
|
||||||
|
|
||||||
For Each dr As DataRow In oData.Tables(0).Rows
|
For Each dr As DataRow In oData.Tables(0).Rows
|
||||||
oBackupItem = New clsBackup
|
oBackupItem = MapToObject(dr)
|
||||||
oBackupItem.ID = CStr(dr("ManifestID"))
|
slList.Add(oBackupItem.ID, oBackupItem)
|
||||||
oBackupItem.Name = CStr(dr("Name"))
|
Next
|
||||||
oBackupItem.FileName = CStr(dr("FileName"))
|
|
||||||
oBackupItem.RestorePath = CStr(dr("RestorePath"))
|
Return slList
|
||||||
oBackupItem.AbsolutePath = CBool(dr("AbsolutePath"))
|
|
||||||
oBackupItem.DateUpdated = mgrCommon.UnixToDate(dr("DateUpdated"))
|
End Function
|
||||||
oBackupItem.UpdatedBy = CStr(dr("UpdatedBy"))
|
|
||||||
If Not IsDBNull(dr("CheckSum")) Then oBackupItem.CheckSum = CStr(dr("CheckSum"))
|
Public Shared Function ReadLatestManifest(ByVal iSelectDB As mgrSQLite.Database) As SortedList
|
||||||
|
Dim oDatabase As New mgrSQLite(iSelectDB)
|
||||||
|
Dim oData As DataSet
|
||||||
|
Dim sSQL As String
|
||||||
|
Dim oBackupItem As clsBackup
|
||||||
|
Dim slList As New SortedList
|
||||||
|
|
||||||
|
sSQL = "SELECT ManifestID, Name, FileName, RestorePath, AbsolutePath, Max(DateUpdated) As DateUpdated, UpdatedBy, CheckSum FROM manifest GROUP BY Name ORDER By Name ASC"
|
||||||
|
oData = oDatabase.ReadParamData(sSQL, New Hashtable)
|
||||||
|
|
||||||
|
For Each dr As DataRow In oData.Tables(0).Rows
|
||||||
|
oBackupItem = MapToObject(dr)
|
||||||
slList.Add(oBackupItem.Name, oBackupItem)
|
slList.Add(oBackupItem.Name, oBackupItem)
|
||||||
Next
|
Next
|
||||||
|
|
||||||
@@ -27,7 +69,80 @@
|
|||||||
|
|
||||||
End Function
|
End Function
|
||||||
|
|
||||||
Public Shared Function DoManifestCheck(ByVal sName As String, ByVal iSelectDB As mgrSQLite.Database) As Boolean
|
Public Shared Function DoManifestGetByName(ByVal sName As String, ByVal iSelectDB As mgrSQLite.Database) As List(Of clsBackup)
|
||||||
|
Dim oDatabase As New mgrSQLite(iSelectDB)
|
||||||
|
Dim oData As DataSet
|
||||||
|
Dim sSQL As String
|
||||||
|
Dim hshParams As New Hashtable
|
||||||
|
Dim oBackupItem As New clsBackup
|
||||||
|
Dim oList As New List(Of clsBackup)
|
||||||
|
|
||||||
|
|
||||||
|
sSQL = "SELECT * from manifest "
|
||||||
|
sSQL &= "WHERE Name = @Name ORDER BY DateUpdated Desc"
|
||||||
|
|
||||||
|
hshParams.Add("Name", sName)
|
||||||
|
|
||||||
|
oData = oDatabase.ReadParamData(sSQL, hshParams)
|
||||||
|
|
||||||
|
For Each dr As DataRow In oData.Tables(0).Rows
|
||||||
|
oBackupItem = MapToObject(dr)
|
||||||
|
oList.Add(oBackupItem)
|
||||||
|
Next
|
||||||
|
|
||||||
|
Return oList
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Public Shared Function DoManifestGetByID(ByVal sID As String, ByVal iSelectDB As mgrSQLite.Database) As clsBackup
|
||||||
|
Dim oDatabase As New mgrSQLite(iSelectDB)
|
||||||
|
Dim oData As DataSet
|
||||||
|
Dim sSQL As String
|
||||||
|
Dim hshParams As New Hashtable
|
||||||
|
Dim oBackupItem As New clsBackup
|
||||||
|
Dim oList As New List(Of clsBackup)
|
||||||
|
|
||||||
|
sSQL = "SELECT * from manifest "
|
||||||
|
sSQL &= "WHERE ManifestID = @ID ORDER BY DateUpdated Desc"
|
||||||
|
|
||||||
|
hshParams.Add("ID", sID)
|
||||||
|
|
||||||
|
oData = oDatabase.ReadParamData(sSQL, hshParams)
|
||||||
|
|
||||||
|
For Each dr As DataRow In oData.Tables(0).Rows
|
||||||
|
oBackupItem = MapToObject(dr)
|
||||||
|
Next
|
||||||
|
|
||||||
|
Return oBackupItem
|
||||||
|
End Function
|
||||||
|
|
||||||
|
'This should only be used to update specific entries in the remote manifest
|
||||||
|
Public Shared Function DoSpecificManifestCheck(ByRef oItem As clsBackup, ByVal iSelectDB As mgrSQLite.Database) As Boolean
|
||||||
|
Dim oDatabase As New mgrSQLite(iSelectDB)
|
||||||
|
Dim oData As DataSet
|
||||||
|
Dim sSQL As String
|
||||||
|
Dim hshParams As New Hashtable
|
||||||
|
|
||||||
|
sSQL = "SELECT * from manifest "
|
||||||
|
sSQL &= "WHERE Name = @Name AND FileName = @FileName"
|
||||||
|
|
||||||
|
hshParams.Add("Name", oItem.Name)
|
||||||
|
hshParams.Add("FileName", oItem.FileName)
|
||||||
|
|
||||||
|
oData = oDatabase.ReadParamData(sSQL, hshParams)
|
||||||
|
|
||||||
|
If oData.Tables(0).Rows.Count > 0 Then
|
||||||
|
For Each dr As DataRow In oData.Tables(0).Rows
|
||||||
|
oItem.ID = CStr(dr("ManifestID"))
|
||||||
|
Next
|
||||||
|
Return True
|
||||||
|
Else
|
||||||
|
Return False
|
||||||
|
End If
|
||||||
|
|
||||||
|
End Function
|
||||||
|
|
||||||
|
'This should only be used to update entries in the local manifest
|
||||||
|
Public Shared Function DoGlobalManifestCheck(ByVal sName As String, ByVal iSelectDB As mgrSQLite.Database) As Boolean
|
||||||
Dim oDatabase As New mgrSQLite(iSelectDB)
|
Dim oDatabase As New mgrSQLite(iSelectDB)
|
||||||
Dim oData As DataSet
|
Dim oData As DataSet
|
||||||
Dim sSQL As String
|
Dim sSQL As String
|
||||||
@@ -48,12 +163,11 @@
|
|||||||
|
|
||||||
End Function
|
End Function
|
||||||
|
|
||||||
Public Shared Function DoManifestGetByName(ByVal sName As String, ByVal iSelectDB As mgrSQLite.Database) As clsBackup
|
Public Shared Function DoManifestNameCheck(ByVal sName As String, ByVal iSelectDB As mgrSQLite.Database) As Boolean
|
||||||
Dim oDatabase As New mgrSQLite(iSelectDB)
|
Dim oDatabase As New mgrSQLite(iSelectDB)
|
||||||
Dim oData As DataSet
|
Dim oData As DataSet
|
||||||
Dim sSQL As String
|
Dim sSQL As String
|
||||||
Dim hshParams As New Hashtable
|
Dim hshParams As New Hashtable
|
||||||
Dim oBackupItem As New clsBackup
|
|
||||||
|
|
||||||
sSQL = "SELECT * from manifest "
|
sSQL = "SELECT * from manifest "
|
||||||
sSQL &= "WHERE Name = @Name"
|
sSQL &= "WHERE Name = @Name"
|
||||||
@@ -62,82 +176,55 @@
|
|||||||
|
|
||||||
oData = oDatabase.ReadParamData(sSQL, hshParams)
|
oData = oDatabase.ReadParamData(sSQL, hshParams)
|
||||||
|
|
||||||
For Each dr As DataRow In oData.Tables(0).Rows
|
If oData.Tables(0).Rows.Count > 0 Then
|
||||||
oBackupItem = New clsBackup
|
Return True
|
||||||
oBackupItem.ID = CStr(dr("ManifestID"))
|
Else
|
||||||
oBackupItem.Name = CStr(dr("Name"))
|
Return False
|
||||||
oBackupItem.FileName = CStr(dr("FileName"))
|
End If
|
||||||
oBackupItem.RestorePath = CStr(dr("RestorePath"))
|
|
||||||
oBackupItem.AbsolutePath = CBool(dr("AbsolutePath"))
|
|
||||||
oBackupItem.DateUpdated = mgrCommon.UnixToDate(dr("DateUpdated"))
|
|
||||||
oBackupItem.UpdatedBy = CStr(dr("UpdatedBy"))
|
|
||||||
If Not IsDBNull(dr("CheckSum")) Then oBackupItem.CheckSum = CStr(dr("CheckSum"))
|
|
||||||
Next
|
|
||||||
|
|
||||||
Return oBackupItem
|
|
||||||
End Function
|
End Function
|
||||||
|
|
||||||
Public Shared Sub DoManifestAdd(ByVal oBackupItem As clsBackup, ByVal iSelectDB As mgrSQLite.Database)
|
Public Shared Sub DoManifestAdd(ByVal oBackupItem As clsBackup, ByVal iSelectDB As mgrSQLite.Database)
|
||||||
Dim oDatabase As New mgrSQLite(iSelectDB)
|
Dim oDatabase As New mgrSQLite(iSelectDB)
|
||||||
Dim sSQL As String
|
Dim sSQL As String
|
||||||
Dim hshParams As New Hashtable
|
Dim hshParams As Hashtable
|
||||||
|
|
||||||
sSQL = "INSERT OR REPLACE INTO manifest VALUES (@ID, @Name, @FileName, @Path, @AbsolutePath, @DateUpdated, @UpdatedBy, @CheckSum)"
|
sSQL = "INSERT INTO manifest VALUES (@ID, @Name, @FileName, @Path, @AbsolutePath, @DateUpdated, @UpdatedBy, @CheckSum)"
|
||||||
|
|
||||||
hshParams.Add("ID", oBackupItem.ID)
|
hshParams = SetCoreParameters(oBackupItem)
|
||||||
hshParams.Add("Name", oBackupItem.Name)
|
|
||||||
hshParams.Add("FileName", oBackupItem.FileName)
|
|
||||||
hshParams.Add("Path", oBackupItem.TruePath)
|
|
||||||
hshParams.Add("AbsolutePath", oBackupItem.AbsolutePath)
|
|
||||||
hshParams.Add("DateUpdated", oBackupItem.DateUpdatedUnix)
|
|
||||||
hshParams.Add("UpdatedBy", oBackupItem.UpdatedBy)
|
|
||||||
hshParams.Add("CheckSum", oBackupItem.CheckSum)
|
|
||||||
|
|
||||||
oDatabase.RunParamQuery(sSQL, hshParams)
|
oDatabase.RunParamQuery(sSQL, hshParams)
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
Public Shared Sub DoManifestUpdate(ByVal oBackupItem As clsBackup, ByVal iSelectDB As mgrSQLite.Database)
|
Public Shared Sub DoManifestUpdateByName(ByVal oBackupItem As clsBackup, ByVal iSelectDB As mgrSQLite.Database)
|
||||||
Dim oDatabase As New mgrSQLite(iSelectDB)
|
Dim oDatabase As New mgrSQLite(iSelectDB)
|
||||||
Dim sSQL As String
|
Dim sSQL As String
|
||||||
Dim hshParams As New Hashtable
|
Dim hshParams As Hashtable
|
||||||
|
|
||||||
sSQL = "UPDATE manifest SET Name = @Name, FileName = @FileName, RestorePath = @Path, AbsolutePath = @AbsolutePath, "
|
sSQL = "UPDATE manifest SET Name = @Name, FileName = @FileName, RestorePath = @Path, AbsolutePath = @AbsolutePath, "
|
||||||
sSQL &= "DateUpdated = @DateUpdated, UpdatedBy = @UpdatedBy, CheckSum = @CheckSum WHERE Name = @QueryName"
|
sSQL &= "DateUpdated = @DateUpdated, UpdatedBy = @UpdatedBy, CheckSum = @CheckSum WHERE Name = @QueryName"
|
||||||
|
|
||||||
hshParams.Add("Name", oBackupItem.Name)
|
hshParams = SetCoreParameters(oBackupItem)
|
||||||
hshParams.Add("FileName", oBackupItem.FileName)
|
|
||||||
hshParams.Add("Path", oBackupItem.TruePath)
|
|
||||||
hshParams.Add("AbsolutePath", oBackupItem.AbsolutePath)
|
|
||||||
hshParams.Add("DateUpdated", oBackupItem.DateUpdatedUnix)
|
|
||||||
hshParams.Add("UpdatedBy", oBackupItem.UpdatedBy)
|
|
||||||
hshParams.Add("CheckSum", oBackupItem.CheckSum)
|
|
||||||
hshParams.Add("QueryName", oBackupItem.Name)
|
hshParams.Add("QueryName", oBackupItem.Name)
|
||||||
|
|
||||||
oDatabase.RunParamQuery(sSQL, hshParams)
|
oDatabase.RunParamQuery(sSQL, hshParams)
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
Public Shared Sub DoManifestNameUpdate(ByVal sOriginalName As String, ByVal oBackupItem As clsBackup, ByVal iSelectDB As mgrSQLite.Database)
|
Public Shared Sub DoManifestUpdateByID(ByVal oBackupItem As clsBackup, ByVal iSelectDB As mgrSQLite.Database)
|
||||||
Dim oDatabase As New mgrSQLite(iSelectDB)
|
Dim oDatabase As New mgrSQLite(iSelectDB)
|
||||||
Dim sSQL As String
|
Dim sSQL As String
|
||||||
Dim hshParams As New Hashtable
|
Dim hshParams As Hashtable
|
||||||
|
|
||||||
sSQL = "UPDATE manifest SET Name = @Name, FileName = @FileName, RestorePath = @Path, AbsolutePath = @AbsolutePath, "
|
sSQL = "UPDATE manifest SET Name = @Name, FileName = @FileName, RestorePath = @Path, AbsolutePath = @AbsolutePath, "
|
||||||
sSQL &= "DateUpdated = @DateUpdated, UpdatedBy = @UpdatedBy, CheckSum = @CheckSum WHERE Name = @QueryName"
|
sSQL &= "DateUpdated = @DateUpdated, UpdatedBy = @UpdatedBy, CheckSum = @CheckSum WHERE ManifestID = @QueryID"
|
||||||
|
|
||||||
hshParams.Add("Name", oBackupItem.Name)
|
hshParams = SetCoreParameters(oBackupItem)
|
||||||
hshParams.Add("FileName", oBackupItem.FileName)
|
hshParams.Add("QueryID", oBackupItem.ID)
|
||||||
hshParams.Add("Path", oBackupItem.TruePath)
|
|
||||||
hshParams.Add("AbsolutePath", oBackupItem.AbsolutePath)
|
|
||||||
hshParams.Add("DateUpdated", oBackupItem.DateUpdatedUnix)
|
|
||||||
hshParams.Add("UpdatedBy", oBackupItem.UpdatedBy)
|
|
||||||
hshParams.Add("CheckSum", oBackupItem.CheckSum)
|
|
||||||
hshParams.Add("QueryName", sOriginalName)
|
|
||||||
|
|
||||||
oDatabase.RunParamQuery(sSQL, hshParams)
|
oDatabase.RunParamQuery(sSQL, hshParams)
|
||||||
|
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
Public Shared Sub DoManifestDelete(ByVal oBackupItem As clsBackup, ByVal iSelectDB As mgrSQLite.Database)
|
Public Shared Sub DoManifestDeletebyName(ByVal oBackupItem As clsBackup, ByVal iSelectDB As mgrSQLite.Database)
|
||||||
Dim oDatabase As New mgrSQLite(iSelectDB)
|
Dim oDatabase As New mgrSQLite(iSelectDB)
|
||||||
Dim sSQL As String
|
Dim sSQL As String
|
||||||
Dim hshParams As New Hashtable
|
Dim hshParams As New Hashtable
|
||||||
@@ -150,6 +237,19 @@
|
|||||||
oDatabase.RunParamQuery(sSQL, hshParams)
|
oDatabase.RunParamQuery(sSQL, hshParams)
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
|
Public Shared Sub DoManifestDeletebyID(ByVal oBackupItem As clsBackup, ByVal iSelectDB As mgrSQLite.Database)
|
||||||
|
Dim oDatabase As New mgrSQLite(iSelectDB)
|
||||||
|
Dim sSQL As String
|
||||||
|
Dim hshParams As New Hashtable
|
||||||
|
|
||||||
|
sSQL = "DELETE FROM manifest "
|
||||||
|
sSQL &= "WHERE ManifestID = @ID"
|
||||||
|
|
||||||
|
hshParams.Add("ID", oBackupItem.ID)
|
||||||
|
|
||||||
|
oDatabase.RunParamQuery(sSQL, hshParams)
|
||||||
|
End Sub
|
||||||
|
|
||||||
Public Shared Sub DoManifestHashWipe()
|
Public Shared Sub DoManifestHashWipe()
|
||||||
Dim oLocalDatabase As New mgrSQLite(mgrSQLite.Database.Local)
|
Dim oLocalDatabase As New mgrSQLite(mgrSQLite.Database.Local)
|
||||||
Dim oRemoteDatabase As New mgrSQLite(mgrSQLite.Database.Remote)
|
Dim oRemoteDatabase As New mgrSQLite(mgrSQLite.Database.Remote)
|
||||||
|
|||||||
+483
-462
File diff suppressed because it is too large
Load Diff
+14
-14
@@ -5,11 +5,11 @@ Imports System.Reflection
|
|||||||
|
|
||||||
Public Class mgrPath
|
Public Class mgrPath
|
||||||
'Important Note: Any changes to sSettingsRoot & sDBLocation need to be mirrored in frmMain.vb -> VerifyGameDataPath
|
'Important Note: Any changes to sSettingsRoot & sDBLocation need to be mirrored in frmMain.vb -> VerifyGameDataPath
|
||||||
Private Shared sSettingsRoot As String = Environment.GetFolderPath(Environment.SpecialFolder.LocalApplicationData) & "/gbm"
|
Private Shared sSettingsRoot As String = Environment.GetFolderPath(Environment.SpecialFolder.LocalApplicationData) & Path.DirectorySeparatorChar & "gbm"
|
||||||
Private Shared sDBLocation As String = sSettingsRoot & "/gbm.s3db"
|
Private Shared sDBLocation As String = sSettingsRoot & Path.DirectorySeparatorChar & "gbm.s3db"
|
||||||
Private Shared sIncludeFile As String = sSettingsRoot & "/gbm_include.txt"
|
Private Shared sIncludeFile As String = sSettingsRoot & Path.DirectorySeparatorChar & "gbm_include.txt"
|
||||||
Private Shared sExcludeFile As String = sSettingsRoot & "/gbm_exclude.txt"
|
Private Shared sExcludeFile As String = sSettingsRoot & Path.DirectorySeparatorChar & "gbm_exclude.txt"
|
||||||
Private Shared sLogFile As String = sSettingsRoot & "/gbm_log_" & Date.Now.ToString("dd-MM-yyyy-HH-mm-ss") & ".txt"
|
Private Shared sLogFile As String = sSettingsRoot & Path.DirectorySeparatorChar & "gbm_log_" & Date.Now.ToString("dd-MM-yyyy-HH-mm-ss") & ".txt"
|
||||||
Private Shared sRemoteDatabaseLocation As String
|
Private Shared sRemoteDatabaseLocation As String
|
||||||
Private Shared hshCustomVariables As Hashtable
|
Private Shared hshCustomVariables As Hashtable
|
||||||
Private Shared oReleaseType As ProcessorArchitecture = AssemblyName.GetAssemblyName(Application.ExecutablePath()).ProcessorArchitecture
|
Private Shared oReleaseType As ProcessorArchitecture = AssemblyName.GetAssemblyName(Application.ExecutablePath()).ProcessorArchitecture
|
||||||
@@ -37,7 +37,7 @@ Public Class mgrPath
|
|||||||
End Get
|
End Get
|
||||||
End Property
|
End Property
|
||||||
|
|
||||||
Shared ReadOnly Property Utility7zLocation As String
|
Shared ReadOnly Property Default7zLocation As String
|
||||||
Get
|
Get
|
||||||
If mgrCommon.IsUnix Then
|
If mgrCommon.IsUnix Then
|
||||||
Return "/usr/bin/7za"
|
Return "/usr/bin/7za"
|
||||||
@@ -45,18 +45,18 @@ Public Class mgrPath
|
|||||||
|
|
||||||
Select Case oReleaseType
|
Select Case oReleaseType
|
||||||
Case ProcessorArchitecture.Amd64
|
Case ProcessorArchitecture.Amd64
|
||||||
Return Application.StartupPath & "/Utilities/x64/7za.exe"
|
Return Application.StartupPath & "\Utilities\x64\7za.exe"
|
||||||
Case ProcessorArchitecture.IA64
|
Case ProcessorArchitecture.IA64
|
||||||
Return Application.StartupPath & "/Utilities/x64/7za.exe"
|
Return Application.StartupPath & "\Utilities\x64\7za.exe"
|
||||||
Case ProcessorArchitecture.MSIL
|
Case ProcessorArchitecture.MSIL
|
||||||
Return Application.StartupPath & "/Utilities/x86/7za.exe"
|
Return Application.StartupPath & "\Utilities\x86\7za.exe"
|
||||||
Case ProcessorArchitecture.X86
|
Case ProcessorArchitecture.X86
|
||||||
Return Application.StartupPath & "/Utilities/x86/7za.exe"
|
Return Application.StartupPath & "\Utilities\x86\7za.exe"
|
||||||
Case ProcessorArchitecture.None
|
Case ProcessorArchitecture.None
|
||||||
Return Application.StartupPath & "/Utilities/x86/7za.exe"
|
Return Application.StartupPath & "\Utilities\x86\7za.exe"
|
||||||
End Select
|
End Select
|
||||||
|
|
||||||
Return Application.StartupPath & "/Utilities/x86/7za.exe"
|
Return Application.StartupPath & "\Utilities\x86\7za.exe"
|
||||||
End Get
|
End Get
|
||||||
End Property
|
End Property
|
||||||
|
|
||||||
@@ -95,7 +95,7 @@ Public Class mgrPath
|
|||||||
Return sRemoteDatabaseLocation
|
Return sRemoteDatabaseLocation
|
||||||
End Get
|
End Get
|
||||||
Set(value As String)
|
Set(value As String)
|
||||||
sRemoteDatabaseLocation = value & "/gbm.s3db"
|
sRemoteDatabaseLocation = value & Path.DirectorySeparatorChar & "gbm.s3db"
|
||||||
End Set
|
End Set
|
||||||
End Property
|
End Property
|
||||||
|
|
||||||
@@ -283,10 +283,10 @@ Public Class mgrPath
|
|||||||
|
|
||||||
hshFolders.Add(Guid.NewGuid.ToString, Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData))
|
hshFolders.Add(Guid.NewGuid.ToString, Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData))
|
||||||
hshFolders.Add(Guid.NewGuid.ToString, Environment.GetFolderPath(Environment.SpecialFolder.LocalApplicationData))
|
hshFolders.Add(Guid.NewGuid.ToString, Environment.GetFolderPath(Environment.SpecialFolder.LocalApplicationData))
|
||||||
|
hshFolders.Add(Guid.NewGuid.ToString, Environment.GetFolderPath(Environment.SpecialFolder.MyDocuments))
|
||||||
|
|
||||||
'Don't use these in Unix
|
'Don't use these in Unix
|
||||||
If Not mgrCommon.IsUnix Then
|
If Not mgrCommon.IsUnix Then
|
||||||
hshFolders.Add(Guid.NewGuid.ToString, Environment.GetFolderPath(Environment.SpecialFolder.MyDocuments))
|
|
||||||
hshFolders.Add(Guid.NewGuid.ToString, Environment.GetFolderPath(Environment.SpecialFolder.CommonDocuments))
|
hshFolders.Add(Guid.NewGuid.ToString, Environment.GetFolderPath(Environment.SpecialFolder.CommonDocuments))
|
||||||
hshFolders.Add(Guid.NewGuid.ToString, Environment.GetFolderPath(Environment.SpecialFolder.UserProfile))
|
hshFolders.Add(Guid.NewGuid.ToString, Environment.GetFolderPath(Environment.SpecialFolder.UserProfile))
|
||||||
End If
|
End If
|
||||||
|
|||||||
@@ -130,9 +130,9 @@ Public Class mgrProcesses
|
|||||||
|
|
||||||
'Unix Handler
|
'Unix Handler
|
||||||
'We need some special handling for Wine processes
|
'We need some special handling for Wine processes
|
||||||
If mgrCommon.IsUnix And sProcessCheck.ToLower = "wine-preloader" Then
|
If mgrCommon.IsUnix And (sProcessCheck.ToLower = "wine-preloader" Or sProcessCheck.ToLower = "wine64-preloader") Then
|
||||||
Dim sWinePath As String()
|
Dim sWinePath As String()
|
||||||
'We can't use Path.GetFileName here, Wine uses the Windows seperator in arguments and the Unix version of the function expects a different one.
|
'We can't use Path.GetFileName here, Wine uses the Windows seperator in arguments and Mono expects a different one in Unix.
|
||||||
sWinePath = GetUnixProcessArguments(prsCurrent)(0).Split("\")
|
sWinePath = GetUnixProcessArguments(prsCurrent)(0).Split("\")
|
||||||
sProcessCheck = sWinePath(sWinePath.Length - 1).Replace(".exe", "")
|
sProcessCheck = sWinePath(sWinePath.Length - 1).Replace(".exe", "")
|
||||||
bWineProcess = True
|
bWineProcess = True
|
||||||
|
|||||||
+38
-37
@@ -80,8 +80,8 @@ Public Class mgrRestore
|
|||||||
Dim bLocal As Boolean = False
|
Dim bLocal As Boolean = False
|
||||||
Dim bRemote As Boolean = False
|
Dim bRemote As Boolean = False
|
||||||
|
|
||||||
slLocalManifest = mgrManifest.ReadManifest(mgrSQLite.Database.Local)
|
slLocalManifest = mgrManifest.ReadLatestManifest(mgrSQLite.Database.Local)
|
||||||
slRemoteManifest = mgrManifest.ReadManifest(mgrSQLite.Database.Remote)
|
slRemoteManifest = mgrManifest.ReadLatestManifest(mgrSQLite.Database.Remote)
|
||||||
|
|
||||||
If slLocalManifest.Contains(sAppName) Then
|
If slLocalManifest.Contains(sAppName) Then
|
||||||
oLocalItem = DirectCast(slLocalManifest(sAppName), clsBackup)
|
oLocalItem = DirectCast(slLocalManifest(sAppName), clsBackup)
|
||||||
@@ -117,8 +117,8 @@ Public Class mgrRestore
|
|||||||
Dim bLocal As Boolean = False
|
Dim bLocal As Boolean = False
|
||||||
Dim bRemote As Boolean = False
|
Dim bRemote As Boolean = False
|
||||||
|
|
||||||
slLocalManifest = mgrManifest.ReadManifest(mgrSQLite.Database.Local)
|
slLocalManifest = mgrManifest.ReadLatestManifest(mgrSQLite.Database.Local)
|
||||||
slRemoteManifest = mgrManifest.ReadManifest(mgrSQLite.Database.Remote)
|
slRemoteManifest = mgrManifest.ReadLatestManifest(mgrSQLite.Database.Remote)
|
||||||
|
|
||||||
For Each oItem As clsBackup In slRemoteManifest.Values
|
For Each oItem As clsBackup In slRemoteManifest.Values
|
||||||
If slLocalManifest.Contains(oItem.Name) Then
|
If slLocalManifest.Contains(oItem.Name) Then
|
||||||
@@ -148,13 +148,13 @@ Public Class mgrRestore
|
|||||||
Dim slRemoteManifest As SortedList
|
Dim slRemoteManifest As SortedList
|
||||||
Dim slRemovedItems As New SortedList
|
Dim slRemovedItems As New SortedList
|
||||||
|
|
||||||
slLocalManifest = mgrManifest.ReadManifest(mgrSQLite.Database.Local)
|
slLocalManifest = mgrManifest.ReadLatestManifest(mgrSQLite.Database.Local)
|
||||||
slRemoteManifest = mgrManifest.ReadManifest(mgrSQLite.Database.Remote)
|
slRemoteManifest = mgrManifest.ReadLatestManifest(mgrSQLite.Database.Remote)
|
||||||
|
|
||||||
For Each oItem As clsBackup In slLocalManifest.Values
|
For Each oItem As clsBackup In slLocalManifest.Values
|
||||||
If Not slRemoteManifest.Contains(oItem.Name) Then
|
If Not slRemoteManifest.Contains(oItem.Name) Then
|
||||||
slRemovedItems.Add(oItem.Name, oItem)
|
slRemovedItems.Add(oItem.Name, oItem)
|
||||||
mgrManifest.DoManifestDelete(oItem, mgrSQLite.Database.Local)
|
mgrManifest.DoManifestDeletebyName(oItem, mgrSQLite.Database.Local)
|
||||||
End If
|
End If
|
||||||
Next
|
Next
|
||||||
|
|
||||||
@@ -231,44 +231,45 @@ Public Class mgrRestore
|
|||||||
|
|
||||||
Try
|
Try
|
||||||
If File.Exists(sBackupFile) Then
|
If File.Exists(sBackupFile) Then
|
||||||
If mgrCommon.IsUnix Then
|
If Settings.Is7zUtilityValid Then
|
||||||
prs7z.StartInfo.Arguments = "x """ & sBackupFile & """ -o""" & sExtractPath & Path.DirectorySeparatorChar & """ -aoa -r"
|
prs7z.StartInfo.Arguments = "x" & oSettings.Prepared7zArguments & """" & sBackupFile & """ -o""" & sExtractPath & Path.DirectorySeparatorChar & """ -aoa -r"
|
||||||
|
prs7z.StartInfo.FileName = oSettings.Utility7zLocation
|
||||||
|
prs7z.StartInfo.UseShellExecute = False
|
||||||
|
prs7z.StartInfo.RedirectStandardOutput = True
|
||||||
|
prs7z.StartInfo.CreateNoWindow = True
|
||||||
|
prs7z.Start()
|
||||||
|
RaiseEvent UpdateLog(mgrCommon.FormatString(mgrRestore_RestoreInProgress, sExtractPath), False, ToolTipIcon.Info, True)
|
||||||
|
While Not prs7z.StandardOutput.EndOfStream
|
||||||
|
If CancelOperation Then
|
||||||
|
prs7z.Kill()
|
||||||
|
RaiseEvent UpdateLog(mgrCommon.FormatString(mgrRestore_ErrorFullAbort, oBackupInfo.Name), True, ToolTipIcon.Error, True)
|
||||||
|
Exit While
|
||||||
|
End If
|
||||||
|
RaiseEvent UpdateLog(prs7z.StandardOutput.ReadLine, False, ToolTipIcon.Info, False)
|
||||||
|
End While
|
||||||
|
prs7z.WaitForExit()
|
||||||
|
If Not CancelOperation Then
|
||||||
|
If prs7z.ExitCode = 0 Then
|
||||||
|
RaiseEvent UpdateLog(mgrCommon.FormatString(mgrRestore_RestoreComplete, oBackupInfo.Name), False, ToolTipIcon.Info, True)
|
||||||
|
bRestoreCompleted = True
|
||||||
|
Else
|
||||||
|
RaiseEvent UpdateLog(mgrCommon.FormatString(mgrRestore_RestoreWarnings, oBackupInfo.Name), True, ToolTipIcon.Warning, True)
|
||||||
|
bRestoreCompleted = False
|
||||||
|
End If
|
||||||
|
End If
|
||||||
|
prs7z.Dispose()
|
||||||
Else
|
Else
|
||||||
prs7z.StartInfo.Arguments = "x -bb1 -bt """ & sBackupFile & """ -o""" & sExtractPath & Path.DirectorySeparatorChar & """ -aoa -r"
|
RaiseEvent UpdateLog(App_Invalid7zDetected, True, ToolTipIcon.Error, True)
|
||||||
|
bRestoreCompleted = False
|
||||||
End If
|
End If
|
||||||
prs7z.StartInfo.FileName = mgrPath.Utility7zLocation
|
|
||||||
prs7z.StartInfo.UseShellExecute = False
|
|
||||||
prs7z.StartInfo.RedirectStandardOutput = True
|
|
||||||
prs7z.StartInfo.CreateNoWindow = True
|
|
||||||
prs7z.Start()
|
|
||||||
RaiseEvent UpdateLog(mgrCommon.FormatString(mgrRestore_RestoreInProgress, sExtractPath), False, ToolTipIcon.Info, True)
|
|
||||||
While Not prs7z.StandardOutput.EndOfStream
|
|
||||||
If CancelOperation Then
|
|
||||||
prs7z.Kill()
|
|
||||||
RaiseEvent UpdateLog(mgrCommon.FormatString(mgrRestore_ErrorFullAbort, oBackupInfo.Name), True, ToolTipIcon.Error, True)
|
|
||||||
Exit While
|
|
||||||
End If
|
|
||||||
RaiseEvent UpdateLog(prs7z.StandardOutput.ReadLine, False, ToolTipIcon.Info, False)
|
|
||||||
End While
|
|
||||||
prs7z.WaitForExit()
|
|
||||||
If Not CancelOperation Then
|
|
||||||
If prs7z.ExitCode = 0 Then
|
|
||||||
RaiseEvent UpdateLog(mgrCommon.FormatString(mgrRestore_RestoreComplete, oBackupInfo.Name), False, ToolTipIcon.Info, True)
|
|
||||||
bRestoreCompleted = True
|
|
||||||
Else
|
|
||||||
RaiseEvent UpdateLog(mgrCommon.FormatString(mgrRestore_RestoreWarnings, oBackupInfo.Name), True, ToolTipIcon.Warning, True)
|
|
||||||
bRestoreCompleted = False
|
|
||||||
End If
|
|
||||||
End If
|
|
||||||
prs7z.Dispose()
|
|
||||||
Else
|
Else
|
||||||
RaiseEvent UpdateLog(mgrRestore_ErrorNoBackup, True, ToolTipIcon.Error, True)
|
RaiseEvent UpdateLog(mgrRestore_ErrorNoBackup, True, ToolTipIcon.Error, True)
|
||||||
End If
|
End If
|
||||||
|
|
||||||
If bRestoreCompleted Then
|
If bRestoreCompleted Then
|
||||||
'Save Local Manifest
|
'Save Local Manifest
|
||||||
If mgrManifest.DoManifestCheck(oBackupInfo.Name, mgrSQLite.Database.Local) Then
|
If mgrManifest.DoGlobalManifestCheck(oBackupInfo.Name, mgrSQLite.Database.Local) Then
|
||||||
mgrManifest.DoManifestUpdate(oBackupInfo, mgrSQLite.Database.Local)
|
mgrManifest.DoManifestUpdateByName(oBackupInfo, mgrSQLite.Database.Local)
|
||||||
Else
|
Else
|
||||||
mgrManifest.DoManifestAdd(oBackupInfo, mgrSQLite.Database.Local)
|
mgrManifest.DoManifestAdd(oBackupInfo, mgrSQLite.Database.Local)
|
||||||
End If
|
End If
|
||||||
|
|||||||
+87
-17
@@ -73,13 +73,14 @@ Public Class mgrSQLite
|
|||||||
sSql = "CREATE TABLE settings (SettingsID INTEGER NOT NULL PRIMARY KEY, MonitorOnStartup BOOLEAN NOT NULL, StartToTray BOOLEAN NOT NULL, ShowDetectionToolTips BOOLEAN NOT NULL, " &
|
sSql = "CREATE TABLE settings (SettingsID INTEGER NOT NULL PRIMARY KEY, MonitorOnStartup BOOLEAN NOT NULL, StartToTray BOOLEAN NOT NULL, ShowDetectionToolTips BOOLEAN NOT NULL, " &
|
||||||
"DisableConfirmation BOOLEAN NOT NULL, CreateSubFolder BOOLEAN NOT NULL, ShowOverwriteWarning BOOLEAN NOT NULL, RestoreOnLaunch BOOLEAN NOT NULL, " &
|
"DisableConfirmation BOOLEAN NOT NULL, CreateSubFolder BOOLEAN NOT NULL, ShowOverwriteWarning BOOLEAN NOT NULL, RestoreOnLaunch BOOLEAN NOT NULL, " &
|
||||||
"BackupFolder TEXT NOT NULL, Sync BOOLEAN NOT NULL, CheckSum BOOLEAN NOT NULL, StartWithWindows BOOLEAN NOT NULL, TimeTracking BOOLEAN NOT NULL, " &
|
"BackupFolder TEXT NOT NULL, Sync BOOLEAN NOT NULL, CheckSum BOOLEAN NOT NULL, StartWithWindows BOOLEAN NOT NULL, TimeTracking BOOLEAN NOT NULL, " &
|
||||||
"SupressBackup BOOLEAN NOT NULL, SupressBackupThreshold INTEGER NOT NULL, CompressionLevel INTEGER NOT NULL);"
|
"SupressBackup BOOLEAN NOT NULL, SupressBackupThreshold INTEGER NOT NULL, CompressionLevel INTEGER NOT NULL, Custom7zArguments TEXT, " &
|
||||||
|
"Custom7zLocation TEXT, SyncFields INTEGER NOT NULL, AutoSaveLog BOOLEAN NOT NULL);"
|
||||||
|
|
||||||
'Add Tables (Monitor List)
|
'Add Tables (Monitor List)
|
||||||
sSql &= "CREATE TABLE monitorlist (MonitorID TEXT NOT NULL UNIQUE, Name TEXT NOT NULL, Process TEXT NOT NULL, Path TEXT, " &
|
sSql &= "CREATE TABLE monitorlist (MonitorID TEXT NOT NULL UNIQUE, Name TEXT NOT NULL, Process TEXT NOT NULL, Path TEXT, " &
|
||||||
"AbsolutePath BOOLEAN NOT NULL, FolderSave BOOLEAN NOT NULL, FileType TEXT, TimeStamp BOOLEAN NOT NULL, ExcludeList TEXT NOT NULL, " &
|
"AbsolutePath BOOLEAN NOT NULL, FolderSave BOOLEAN NOT NULL, FileType TEXT, TimeStamp BOOLEAN NOT NULL, ExcludeList TEXT NOT NULL, " &
|
||||||
"ProcessPath TEXT, Icon TEXT, Hours REAL, Version TEXT, Company TEXT, Enabled BOOLEAN NOT NULL, MonitorOnly BOOLEAN NOT NULL, " &
|
"ProcessPath TEXT, Icon TEXT, Hours REAL, Version TEXT, Company TEXT, Enabled BOOLEAN NOT NULL, MonitorOnly BOOLEAN NOT NULL, " &
|
||||||
"PRIMARY KEY(Name, Process));"
|
"BackupLimit INTEGER NOT NULL, PRIMARY KEY(Name, Process));"
|
||||||
|
|
||||||
'Add Tables (Tags)
|
'Add Tables (Tags)
|
||||||
sSql &= "CREATE TABLE tags (TagID TEXT NOT NULL UNIQUE, Name TEXT NOT NULL PRIMARY KEY); "
|
sSql &= "CREATE TABLE tags (TagID TEXT NOT NULL UNIQUE, Name TEXT NOT NULL PRIMARY KEY); "
|
||||||
@@ -91,7 +92,7 @@ Public Class mgrSQLite
|
|||||||
sSql &= "CREATE TABLE variables (VariableID TEXT NOT NULL UNIQUE, Name TEXT NOT NULL PRIMARY KEY, Path TEXT NOT NULL);"
|
sSql &= "CREATE TABLE variables (VariableID TEXT NOT NULL UNIQUE, Name TEXT NOT NULL PRIMARY KEY, Path TEXT NOT NULL);"
|
||||||
|
|
||||||
'Add Tables (Local Manifest)
|
'Add Tables (Local Manifest)
|
||||||
sSql &= "CREATE TABLE manifest (ManifestID TEXT NOT NULL UNIQUE, Name TEXT NOT NULL PRIMARY KEY, FileName TEXT NOT NULL, RestorePath TEXT NOT NULL, " &
|
sSql &= "CREATE TABLE manifest (ManifestID TEXT NOT NULL PRIMARY KEY, Name TEXT NOT NULL, FileName TEXT NOT NULL, RestorePath TEXT NOT NULL, " &
|
||||||
"AbsolutePath BOOLEAN NOT NULL, DateUpdated TEXT NOT NULL, UpdatedBy TEXT NOT NULL, CheckSum TEXT);"
|
"AbsolutePath BOOLEAN NOT NULL, DateUpdated TEXT NOT NULL, UpdatedBy TEXT NOT NULL, CheckSum TEXT);"
|
||||||
|
|
||||||
'Set Version
|
'Set Version
|
||||||
@@ -110,16 +111,16 @@ Public Class mgrSQLite
|
|||||||
|
|
||||||
Try
|
Try
|
||||||
'Create the DB
|
'Create the DB
|
||||||
SQLiteConnection.CreateFile(sDatabaseLocation)
|
SqliteConnection.CreateFile(sDatabaseLocation)
|
||||||
|
|
||||||
'Add Tables (Remote Monitor List)
|
'Add Tables (Remote Monitor List)
|
||||||
sSql = "CREATE TABLE monitorlist (MonitorID TEXT NOT NULL UNIQUE, Name TEXT NOT NULL, Process TEXT NOT NULL, Path TEXT, " &
|
sSql = "CREATE TABLE monitorlist (MonitorID TEXT NOT NULL UNIQUE, Name TEXT NOT NULL, Process TEXT NOT NULL, Path TEXT, " &
|
||||||
"AbsolutePath BOOLEAN NOT NULL, FolderSave BOOLEAN NOT NULL, FileType TEXT, TimeStamp BOOLEAN NOT NULL, ExcludeList TEXT NOT NULL, " &
|
"AbsolutePath BOOLEAN NOT NULL, FolderSave BOOLEAN NOT NULL, FileType TEXT, TimeStamp BOOLEAN NOT NULL, ExcludeList TEXT NOT NULL, " &
|
||||||
"ProcessPath TEXT, Icon TEXT, Hours REAL, Version TEXT, Company TEXT, Enabled BOOLEAN NOT NULL, MonitorOnly BOOLEAN NOT NULL, " &
|
"ProcessPath TEXT, Icon TEXT, Hours REAL, Version TEXT, Company TEXT, Enabled BOOLEAN NOT NULL, MonitorOnly BOOLEAN NOT NULL, " &
|
||||||
"PRIMARY KEY(Name, Process));"
|
"BackupLimit INTEGER NOT NULL, PRIMARY KEY(Name, Process));"
|
||||||
|
|
||||||
'Add Tables (Remote Manifest)
|
'Add Tables (Remote Manifest)
|
||||||
sSql &= "CREATE TABLE manifest (ManifestID TEXT NOT NULL UNIQUE, Name TEXT NOT NULL PRIMARY KEY, FileName TEXT NOT NULL, RestorePath TEXT NOT NULL, " &
|
sSql &= "CREATE TABLE manifest (ManifestID TEXT NOT NULL PRIMARY KEY, Name TEXT NOT NULL, FileName TEXT NOT NULL, RestorePath TEXT NOT NULL, " &
|
||||||
"AbsolutePath BOOLEAN NOT NULL, DateUpdated TEXT NOT NULL, UpdatedBy TEXT NOT NULL, CheckSum TEXT);"
|
"AbsolutePath BOOLEAN NOT NULL, DateUpdated TEXT NOT NULL, UpdatedBy TEXT NOT NULL, CheckSum TEXT);"
|
||||||
|
|
||||||
'Add Tables (Remote Tags)
|
'Add Tables (Remote Tags)
|
||||||
@@ -154,7 +155,7 @@ Public Class mgrSQLite
|
|||||||
|
|
||||||
Public Sub Connect()
|
Public Sub Connect()
|
||||||
If CheckDB() Then
|
If CheckDB() Then
|
||||||
db = New SQLiteConnection(sConnectString)
|
db = New SqliteConnection(sConnectString)
|
||||||
db.Open()
|
db.Open()
|
||||||
Else
|
Else
|
||||||
CreateDB()
|
CreateDB()
|
||||||
@@ -166,18 +167,18 @@ Public Class mgrSQLite
|
|||||||
db.Close()
|
db.Close()
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
Private Sub BuildParams(ByRef command As SQLiteCommand, ByRef hshParams As Hashtable)
|
Private Sub BuildParams(ByRef command As SqliteCommand, ByRef hshParams As Hashtable)
|
||||||
For Each de As DictionaryEntry In hshParams
|
For Each de As DictionaryEntry In hshParams
|
||||||
command.Parameters.AddWithValue(de.Key, de.Value)
|
command.Parameters.AddWithValue(de.Key, de.Value)
|
||||||
Next
|
Next
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
Public Function RunParamQuery(ByVal sSQL As String, ByVal hshParams As Hashtable) As Boolean
|
Public Function RunParamQuery(ByVal sSQL As String, ByVal hshParams As Hashtable) As Boolean
|
||||||
Dim trans As SQLiteTransaction
|
Dim trans As SqliteTransaction
|
||||||
Dim command As SQLiteCommand
|
Dim command As SqliteCommand
|
||||||
|
|
||||||
Connect()
|
Connect()
|
||||||
command = New SQLiteCommand(sSQL, db)
|
command = New SqliteCommand(sSQL, db)
|
||||||
BuildParams(command, hshParams)
|
BuildParams(command, hshParams)
|
||||||
trans = db.BeginTransaction()
|
trans = db.BeginTransaction()
|
||||||
|
|
||||||
@@ -197,11 +198,11 @@ Public Class mgrSQLite
|
|||||||
End Function
|
End Function
|
||||||
|
|
||||||
Public Function RunMassParamQuery(ByVal sSQL As String, ByVal oParamList As List(Of Hashtable)) As Boolean
|
Public Function RunMassParamQuery(ByVal sSQL As String, ByVal oParamList As List(Of Hashtable)) As Boolean
|
||||||
Dim trans As SQLiteTransaction
|
Dim trans As SqliteTransaction
|
||||||
Dim command As SQLiteCommand
|
Dim command As SqliteCommand
|
||||||
|
|
||||||
Connect()
|
Connect()
|
||||||
command = New SQLiteCommand(sSQL, db)
|
command = New SqliteCommand(sSQL, db)
|
||||||
trans = db.BeginTransaction()
|
trans = db.BeginTransaction()
|
||||||
|
|
||||||
Try
|
Try
|
||||||
@@ -223,12 +224,12 @@ Public Class mgrSQLite
|
|||||||
End Function
|
End Function
|
||||||
|
|
||||||
Public Function ReadParamData(ByVal sSQL As String, ByVal hshParams As Hashtable) As DataSet
|
Public Function ReadParamData(ByVal sSQL As String, ByVal hshParams As Hashtable) As DataSet
|
||||||
Dim adapter As SQLiteDataAdapter
|
Dim adapter As SqliteDataAdapter
|
||||||
Dim command As SQLiteCommand
|
Dim command As SqliteCommand
|
||||||
Dim oData As New DataSet
|
Dim oData As New DataSet
|
||||||
|
|
||||||
Connect()
|
Connect()
|
||||||
command = New SQLiteCommand(sSQL, db)
|
command = New SqliteCommand(sSQL, db)
|
||||||
BuildParams(command, hshParams)
|
BuildParams(command, hshParams)
|
||||||
|
|
||||||
Try
|
Try
|
||||||
@@ -530,6 +531,75 @@ Public Class mgrSQLite
|
|||||||
End If
|
End If
|
||||||
End If
|
End If
|
||||||
|
|
||||||
|
'0.97 Upgrade
|
||||||
|
If GetDatabaseVersion() < 97 Then
|
||||||
|
If eDatabase = Database.Local Then
|
||||||
|
'Backup DB before starting
|
||||||
|
BackupDB("v96")
|
||||||
|
|
||||||
|
'Add new settings
|
||||||
|
sSQL = "ALTER TABLE settings ADD COLUMN Custom7zArguments TEXT;"
|
||||||
|
sSQL &= "ALTER TABLE settings ADD COLUMN Custom7zLocation TEXT;"
|
||||||
|
sSQL &= "ALTER TABLE settings ADD COLUMN SyncFields INTEGER NOT NULL DEFAULT 32;"
|
||||||
|
sSQL &= "ALTER TABLE settings ADD COLUMN AutoSaveLog BOOLEAN NOT NULL DEFAULT 0;"
|
||||||
|
sSQL &= "PRAGMA user_version=97"
|
||||||
|
|
||||||
|
RunParamQuery(sSQL, New Hashtable)
|
||||||
|
End If
|
||||||
|
If eDatabase = Database.Remote Then
|
||||||
|
'Backup DB before starting
|
||||||
|
BackupDB("v96")
|
||||||
|
|
||||||
|
sSQL = "PRAGMA user_version=97"
|
||||||
|
|
||||||
|
RunParamQuery(sSQL, New Hashtable)
|
||||||
|
End If
|
||||||
|
End If
|
||||||
|
|
||||||
|
'0.98 Upgrade
|
||||||
|
If GetDatabaseVersion() < 98 Then
|
||||||
|
If eDatabase = Database.Local Then
|
||||||
|
'Backup DB before starting
|
||||||
|
BackupDB("v97")
|
||||||
|
|
||||||
|
'Overhaul Manifest Table
|
||||||
|
sSQL = "CREATE TABLE manifest_new (ManifestID TEXT NOT NULL PRIMARY KEY, Name TEXT NOT NULL, FileName TEXT NOT NULL, RestorePath TEXT NOT NULL, AbsolutePath BOOLEAN NOT NULL, DateUpdated TEXT NOT NULL, UpdatedBy TEXT NOT NULL, CheckSum TEXT);"
|
||||||
|
sSQL &= "INSERT INTO manifest_new (ManifestID, Name, FileName, RestorePath, AbsolutePath, DateUpdated, UpdatedBy) "
|
||||||
|
sSQL &= "SELECT ManifestID, Name, FileName, RestorePath, AbsolutePath, DateUpdated, UpdatedBy FROM manifest;"
|
||||||
|
sSQL &= "DROP TABLE manifest; ALTER TABLE manifest_new RENAME TO manifest;"
|
||||||
|
|
||||||
|
'Add backup limit field
|
||||||
|
sSQL &= "ALTER TABLE monitorlist ADD COLUMN BackupLimit INTEGER NOT NULL DEFAULT 5;"
|
||||||
|
|
||||||
|
sSQL &= "PRAGMA user_version=98"
|
||||||
|
|
||||||
|
RunParamQuery(sSQL, New Hashtable)
|
||||||
|
|
||||||
|
'Run a compact
|
||||||
|
CompactDatabase()
|
||||||
|
End If
|
||||||
|
If eDatabase = Database.Remote Then
|
||||||
|
'Backup DB before starting
|
||||||
|
BackupDB("v97")
|
||||||
|
|
||||||
|
'Overhaul Manifest Table
|
||||||
|
sSQL = "CREATE TABLE manifest_new (ManifestID TEXT NOT NULL PRIMARY KEY, Name TEXT NOT NULL, FileName TEXT NOT NULL, RestorePath TEXT NOT NULL, AbsolutePath BOOLEAN NOT NULL, DateUpdated TEXT NOT NULL, UpdatedBy TEXT NOT NULL, CheckSum TEXT);"
|
||||||
|
sSQL &= "INSERT INTO manifest_new (ManifestID, Name, FileName, RestorePath, AbsolutePath, DateUpdated, UpdatedBy) "
|
||||||
|
sSQL &= "SELECT ManifestID, Name, FileName, RestorePath, AbsolutePath, DateUpdated, UpdatedBy FROM manifest;"
|
||||||
|
sSQL &= "DROP TABLE manifest; ALTER TABLE manifest_new RENAME TO manifest;"
|
||||||
|
|
||||||
|
'Add backup limit field
|
||||||
|
sSQL &= "ALTER TABLE monitorlist ADD COLUMN BackupLimit INTEGER NOT NULL DEFAULT 5;"
|
||||||
|
|
||||||
|
sSQL &= "PRAGMA user_version=98"
|
||||||
|
|
||||||
|
RunParamQuery(sSQL, New Hashtable)
|
||||||
|
|
||||||
|
'Run a compact
|
||||||
|
CompactDatabase()
|
||||||
|
End If
|
||||||
|
End If
|
||||||
|
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
Public Function GetDBSize() As Long
|
Public Function GetDBSize() As Long
|
||||||
|
|||||||
@@ -15,7 +15,11 @@ Public Class mgrSettings
|
|||||||
Private bSupressBackup As Boolean = False
|
Private bSupressBackup As Boolean = False
|
||||||
Private iSupressBackupThreshold As Integer = 10
|
Private iSupressBackupThreshold As Integer = 10
|
||||||
Private iCompressionLevel As Integer = 5
|
Private iCompressionLevel As Integer = 5
|
||||||
|
Private s7zArguments As String = String.Empty
|
||||||
|
Private s7zLocation As String = String.Empty
|
||||||
Private sBackupFolder As String = Environment.GetFolderPath(Environment.SpecialFolder.MyDocuments).TrimEnd(New Char() {"\", "/"})
|
Private sBackupFolder As String = Environment.GetFolderPath(Environment.SpecialFolder.MyDocuments).TrimEnd(New Char() {"\", "/"})
|
||||||
|
Private eSyncFields As clsGame.eOptionalSyncFields = clsGame.eOptionalSyncFields.None Or clsGame.eOptionalSyncFields.TimeStamp
|
||||||
|
Private bAutoSaveLog As Boolean = False
|
||||||
|
|
||||||
Property StartWithWindows As Boolean
|
Property StartWithWindows As Boolean
|
||||||
Get
|
Get
|
||||||
@@ -143,6 +147,72 @@ Public Class mgrSettings
|
|||||||
End Set
|
End Set
|
||||||
End Property
|
End Property
|
||||||
|
|
||||||
|
Property Custom7zArguments As String
|
||||||
|
Get
|
||||||
|
Return s7zArguments
|
||||||
|
End Get
|
||||||
|
Set(value As String)
|
||||||
|
s7zArguments = value
|
||||||
|
End Set
|
||||||
|
End Property
|
||||||
|
|
||||||
|
ReadOnly Property Prepared7zArguments As String
|
||||||
|
Get
|
||||||
|
'Prepare custom 7z arguments
|
||||||
|
Dim sPreparedArguments As String
|
||||||
|
If s7zArguments <> String.Empty Then
|
||||||
|
'Surround the arguments with spaces to be inserted into command
|
||||||
|
sPreparedArguments = " " & s7zArguments & " "
|
||||||
|
Else
|
||||||
|
'The command always needs at least one space inserted
|
||||||
|
sPreparedArguments = " "
|
||||||
|
End If
|
||||||
|
Return sPreparedArguments
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
|
Property Custom7zLocation As String
|
||||||
|
Get
|
||||||
|
Return s7zLocation
|
||||||
|
End Get
|
||||||
|
Set(value As String)
|
||||||
|
s7zLocation = value
|
||||||
|
End Set
|
||||||
|
End Property
|
||||||
|
|
||||||
|
ReadOnly Property Is7zUtilityValid As Boolean
|
||||||
|
Get
|
||||||
|
'We don't use a packaged 7za on Unix, assume valid.
|
||||||
|
If mgrCommon.IsUnix Then
|
||||||
|
Return True
|
||||||
|
End If
|
||||||
|
|
||||||
|
If s7zLocation = String.Empty Then
|
||||||
|
'Verify stored hash of the default utility if we're using it
|
||||||
|
Return mgrCommon.UtilityHash = mgrHash.Generate_SHA256_Hash(mgrPath.Default7zLocation)
|
||||||
|
Else
|
||||||
|
'When using a custom utility assume it's valid, we have no way to be sure.
|
||||||
|
Return True
|
||||||
|
End If
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
|
ReadOnly Property Utility7zLocation As String
|
||||||
|
Get
|
||||||
|
'Return default utility when custom setting is not used
|
||||||
|
If s7zLocation = String.Empty Then
|
||||||
|
Return mgrPath.Default7zLocation
|
||||||
|
Else
|
||||||
|
'Check if custom utility is available, if not use the default utility
|
||||||
|
If File.Exists(s7zLocation) Then
|
||||||
|
Return s7zLocation
|
||||||
|
Else
|
||||||
|
Return mgrPath.Default7zLocation
|
||||||
|
End If
|
||||||
|
End If
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
Property BackupFolder As String
|
Property BackupFolder As String
|
||||||
Get
|
Get
|
||||||
Return sBackupFolder
|
Return sBackupFolder
|
||||||
@@ -152,6 +222,24 @@ Public Class mgrSettings
|
|||||||
End Set
|
End Set
|
||||||
End Property
|
End Property
|
||||||
|
|
||||||
|
Property SyncFields As clsGame.eOptionalSyncFields
|
||||||
|
Get
|
||||||
|
Return eSyncFields
|
||||||
|
End Get
|
||||||
|
Set(value As clsGame.eOptionalSyncFields)
|
||||||
|
eSyncFields = value
|
||||||
|
End Set
|
||||||
|
End Property
|
||||||
|
|
||||||
|
Property AutoSaveLog As Boolean
|
||||||
|
Get
|
||||||
|
Return bAutoSaveLog
|
||||||
|
End Get
|
||||||
|
Set(value As Boolean)
|
||||||
|
bAutoSaveLog = value
|
||||||
|
End Set
|
||||||
|
End Property
|
||||||
|
|
||||||
Private Sub SaveFromClass()
|
Private Sub SaveFromClass()
|
||||||
Dim oDatabase As New mgrSQLite(mgrSQLite.Database.Local)
|
Dim oDatabase As New mgrSQLite(mgrSQLite.Database.Local)
|
||||||
Dim sSQL As String
|
Dim sSQL As String
|
||||||
@@ -162,7 +250,8 @@ Public Class mgrSettings
|
|||||||
|
|
||||||
sSQL = "INSERT INTO settings VALUES (1, @MonitorOnStartup, @StartToTray, @ShowDetectionToolTips, @DisableConfirmation, "
|
sSQL = "INSERT INTO settings VALUES (1, @MonitorOnStartup, @StartToTray, @ShowDetectionToolTips, @DisableConfirmation, "
|
||||||
sSQL &= "@CreateSubFolder, @ShowOverwriteWarning, @RestoreOnLaunch, @BackupFolder, @Sync, @CheckSum, @StartWithWindows, "
|
sSQL &= "@CreateSubFolder, @ShowOverwriteWarning, @RestoreOnLaunch, @BackupFolder, @Sync, @CheckSum, @StartWithWindows, "
|
||||||
sSQL &= "@TimeTracking, @SupressBackup, @SupressBackupThreshold, @CompressionLevel)"
|
sSQL &= "@TimeTracking, @SupressBackup, @SupressBackupThreshold, @CompressionLevel, @Custom7zArguments, @Custom7zLocation, "
|
||||||
|
sSQL &= "@SyncFields,@AutoSaveLog)"
|
||||||
|
|
||||||
hshParams.Add("MonitorOnStartup", MonitorOnStartup)
|
hshParams.Add("MonitorOnStartup", MonitorOnStartup)
|
||||||
hshParams.Add("StartToTray", StartToTray)
|
hshParams.Add("StartToTray", StartToTray)
|
||||||
@@ -179,7 +268,10 @@ Public Class mgrSettings
|
|||||||
hshParams.Add("SupressBackup", SupressBackup)
|
hshParams.Add("SupressBackup", SupressBackup)
|
||||||
hshParams.Add("SupressBackupThreshold", SupressBackupThreshold)
|
hshParams.Add("SupressBackupThreshold", SupressBackupThreshold)
|
||||||
hshParams.Add("CompressionLevel", CompressionLevel)
|
hshParams.Add("CompressionLevel", CompressionLevel)
|
||||||
|
hshParams.Add("Custom7zArguments", Custom7zArguments)
|
||||||
|
hshParams.Add("Custom7zLocation", Custom7zLocation)
|
||||||
|
hshParams.Add("SyncFields", SyncFields)
|
||||||
|
hshParams.Add("AutoSaveLog", AutoSaveLog)
|
||||||
oDatabase.RunParamQuery(sSQL, hshParams)
|
oDatabase.RunParamQuery(sSQL, hshParams)
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
@@ -209,6 +301,10 @@ Public Class mgrSettings
|
|||||||
SupressBackup = CBool(dr("SupressBackup"))
|
SupressBackup = CBool(dr("SupressBackup"))
|
||||||
SupressBackupThreshold = CInt(dr("SupressBackupThreshold"))
|
SupressBackupThreshold = CInt(dr("SupressBackupThreshold"))
|
||||||
CompressionLevel = CInt(dr("CompressionLevel"))
|
CompressionLevel = CInt(dr("CompressionLevel"))
|
||||||
|
If Not IsDBNull(dr("Custom7zArguments")) Then Custom7zArguments = CStr(dr("Custom7zArguments"))
|
||||||
|
If Not IsDBNull(dr("Custom7zLocation")) Then Custom7zLocation = CStr(dr("Custom7zLocation"))
|
||||||
|
SyncFields = CInt(dr("SyncFields"))
|
||||||
|
AutoSaveLog = CBool(dr("AutoSaveLog"))
|
||||||
Next
|
Next
|
||||||
|
|
||||||
oDatabase.Disconnect()
|
oDatabase.Disconnect()
|
||||||
|
|||||||
+27
-15
@@ -1,26 +1,44 @@
|
|||||||
Public Class mgrTags
|
Public Class mgrTags
|
||||||
|
|
||||||
|
Private Shared Function MapToObject(ByVal dr As DataRow) As clsTag
|
||||||
|
Dim oTag As New clsTag
|
||||||
|
|
||||||
|
oTag.ID = CStr(dr("TagID"))
|
||||||
|
oTag.Name = CStr(dr("Name"))
|
||||||
|
|
||||||
|
Return oTag
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Private Shared Function SetCoreParameters(ByVal oTag As clsTag) As Hashtable
|
||||||
|
Dim hshParams As New Hashtable
|
||||||
|
|
||||||
|
hshParams.Add("ID", oTag.ID)
|
||||||
|
hshParams.Add("Name", oTag.Name)
|
||||||
|
|
||||||
|
Return hshParams
|
||||||
|
End Function
|
||||||
|
|
||||||
Public Shared Sub DoTagAdd(ByVal oTag As clsTag, Optional ByVal iSelectDB As mgrSQLite.Database = mgrSQLite.Database.Local)
|
Public Shared Sub DoTagAdd(ByVal oTag As clsTag, Optional ByVal iSelectDB As mgrSQLite.Database = mgrSQLite.Database.Local)
|
||||||
Dim oDatabase As New mgrSQLite(iSelectDB)
|
Dim oDatabase As New mgrSQLite(iSelectDB)
|
||||||
Dim sSQL As String
|
Dim sSQL As String
|
||||||
Dim hshParams As New Hashtable
|
Dim hshParams As Hashtable
|
||||||
|
|
||||||
sSQL = "INSERT INTO tags VALUES (@ID, @Name)"
|
sSQL = "INSERT INTO tags VALUES (@ID, @Name)"
|
||||||
hshParams.Add("ID", oTag.ID)
|
|
||||||
hshParams.Add("Name", oTag.Name)
|
hshParams = SetCoreParameters(oTag)
|
||||||
|
|
||||||
oDatabase.RunParamQuery(sSQL, hshParams)
|
oDatabase.RunParamQuery(sSQL, hshParams)
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
Public Shared Sub DoTagUpdate(ByVal oTag As clsTag, Optional ByVal iSelectDB As mgrSQLite.Database = mgrSQLite.Database.Local)
|
Public Shared Sub DoTagUpdate(ByVal oTag As clsTag, Optional ByVal iSelectDB As mgrSQLite.Database = mgrSQLite.Database.Local)
|
||||||
Dim oDatabase As New mgrSQLite(iSelectDB)
|
Dim oDatabase As New mgrSQLite(iSelectDB)
|
||||||
Dim sSQL As String
|
Dim sSQL As String
|
||||||
Dim hshParams As New Hashtable
|
Dim hshParams As Hashtable
|
||||||
|
|
||||||
sSQL = "UPDATE tags SET Name=@Name "
|
sSQL = "UPDATE tags SET Name=@Name "
|
||||||
sSQL &= "WHERE TagID = @ID"
|
sSQL &= "WHERE TagID = @ID"
|
||||||
|
|
||||||
hshParams.Add("Name", oTag.Name)
|
hshParams = SetCoreParameters(oTag)
|
||||||
hshParams.Add("ID", oTag.ID)
|
|
||||||
|
|
||||||
oDatabase.RunParamQuery(sSQL, hshParams)
|
oDatabase.RunParamQuery(sSQL, hshParams)
|
||||||
|
|
||||||
@@ -57,9 +75,7 @@
|
|||||||
oData = oDatabase.ReadParamData(sSQL, hshParams)
|
oData = oDatabase.ReadParamData(sSQL, hshParams)
|
||||||
|
|
||||||
For Each dr As DataRow In oData.Tables(0).Rows
|
For Each dr As DataRow In oData.Tables(0).Rows
|
||||||
oTag = New clsTag
|
oTag = MapToObject(dr)
|
||||||
oTag.ID = CStr(dr("TagID"))
|
|
||||||
oTag.Name = CStr(dr("Name"))
|
|
||||||
Next
|
Next
|
||||||
|
|
||||||
Return oTag
|
Return oTag
|
||||||
@@ -80,9 +96,7 @@
|
|||||||
oData = oDatabase.ReadParamData(sSQL, hshParams)
|
oData = oDatabase.ReadParamData(sSQL, hshParams)
|
||||||
|
|
||||||
For Each dr As DataRow In oData.Tables(0).Rows
|
For Each dr As DataRow In oData.Tables(0).Rows
|
||||||
oTag = New clsTag
|
oTag = MapToObject(dr)
|
||||||
oTag.ID = CStr(dr("TagID"))
|
|
||||||
oTag.Name = CStr(dr("Name"))
|
|
||||||
Next
|
Next
|
||||||
|
|
||||||
Return oTag
|
Return oTag
|
||||||
@@ -124,9 +138,7 @@
|
|||||||
oData = oDatabase.ReadParamData(sSQL, New Hashtable)
|
oData = oDatabase.ReadParamData(sSQL, New Hashtable)
|
||||||
|
|
||||||
For Each dr As DataRow In oData.Tables(0).Rows
|
For Each dr As DataRow In oData.Tables(0).Rows
|
||||||
oTag = New clsTag
|
oTag = MapToObject(dr)
|
||||||
oTag.ID = CStr(dr("TagID"))
|
|
||||||
oTag.Name = CStr(dr("Name"))
|
|
||||||
hshList.Add(oTag.Name, oTag)
|
hshList.Add(oTag.Name, oTag)
|
||||||
Next
|
Next
|
||||||
|
|
||||||
|
|||||||
@@ -1,5 +1,25 @@
|
|||||||
Public Class mgrVariables
|
Public Class mgrVariables
|
||||||
|
|
||||||
|
Private Shared Function MapToObject(ByVal dr As DataRow) As clsPathVariable
|
||||||
|
Dim oCustomVariable As New clsPathVariable
|
||||||
|
|
||||||
|
oCustomVariable.ID = CStr(dr("VariableID"))
|
||||||
|
oCustomVariable.Name = CStr(dr("Name"))
|
||||||
|
oCustomVariable.Path = CStr(dr("Path"))
|
||||||
|
|
||||||
|
Return oCustomVariable
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Private Shared Function SetCoreParameters(ByVal oCustomVariable As clsPathVariable) As Hashtable
|
||||||
|
Dim hshParams As New Hashtable
|
||||||
|
|
||||||
|
hshParams.Add("ID", oCustomVariable.ID)
|
||||||
|
hshParams.Add("Name", oCustomVariable.Name)
|
||||||
|
hshParams.Add("Path", oCustomVariable.Path)
|
||||||
|
|
||||||
|
Return hshParams
|
||||||
|
End Function
|
||||||
|
|
||||||
Public Shared Sub DoPathUpdate(ByVal sOld As String, ByVal sNew As String)
|
Public Shared Sub DoPathUpdate(ByVal sOld As String, ByVal sNew As String)
|
||||||
Dim oDatabase As New mgrSQLite(mgrSQLite.Database.Local)
|
Dim oDatabase As New mgrSQLite(mgrSQLite.Database.Local)
|
||||||
Dim sSQL As String
|
Dim sSQL As String
|
||||||
@@ -15,26 +35,22 @@
|
|||||||
Public Shared Sub DoVariableAdd(ByVal oCustomVariable As clsPathVariable)
|
Public Shared Sub DoVariableAdd(ByVal oCustomVariable As clsPathVariable)
|
||||||
Dim oDatabase As New mgrSQLite(mgrSQLite.Database.Local)
|
Dim oDatabase As New mgrSQLite(mgrSQLite.Database.Local)
|
||||||
Dim sSQL As String
|
Dim sSQL As String
|
||||||
Dim hshParams As New Hashtable
|
Dim hshParams As Hashtable
|
||||||
|
|
||||||
sSQL = "INSERT INTO variables VALUES (@ID, @Name, @Path)"
|
sSQL = "INSERT INTO variables VALUES (@ID, @Name, @Path)"
|
||||||
hshParams.Add("ID", oCustomVariable.ID)
|
hshParams = SetCoreParameters(oCustomVariable)
|
||||||
hshParams.Add("Name", oCustomVariable.Name)
|
|
||||||
hshParams.Add("Path", oCustomVariable.Path)
|
|
||||||
oDatabase.RunParamQuery(sSQL, hshParams)
|
oDatabase.RunParamQuery(sSQL, hshParams)
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
Public Shared Sub DoVariableUpdate(ByVal oCustomVariable As clsPathVariable)
|
Public Shared Sub DoVariableUpdate(ByVal oCustomVariable As clsPathVariable)
|
||||||
Dim oDatabase As New mgrSQLite(mgrSQLite.Database.Local)
|
Dim oDatabase As New mgrSQLite(mgrSQLite.Database.Local)
|
||||||
Dim sSQL As String
|
Dim sSQL As String
|
||||||
Dim hshParams As New Hashtable
|
Dim hshParams As Hashtable
|
||||||
|
|
||||||
sSQL = "UPDATE variables SET Name=@Name, Path = @Path "
|
sSQL = "UPDATE variables SET Name=@Name, Path = @Path "
|
||||||
sSQL &= "WHERE VariableID = @ID"
|
sSQL &= "WHERE VariableID = @ID"
|
||||||
|
|
||||||
hshParams.Add("Name", oCustomVariable.Name)
|
hshParams = SetCoreParameters(oCustomVariable)
|
||||||
hshParams.Add("Path", oCustomVariable.Path)
|
|
||||||
hshParams.Add("ID", oCustomVariable.ID)
|
|
||||||
|
|
||||||
oDatabase.RunParamQuery(sSQL, hshParams)
|
oDatabase.RunParamQuery(sSQL, hshParams)
|
||||||
|
|
||||||
@@ -69,10 +85,7 @@
|
|||||||
oData = oDatabase.ReadParamData(sSQL, hshParams)
|
oData = oDatabase.ReadParamData(sSQL, hshParams)
|
||||||
|
|
||||||
For Each dr As DataRow In oData.Tables(0).Rows
|
For Each dr As DataRow In oData.Tables(0).Rows
|
||||||
oCustomVariable = New clsPathVariable
|
oCustomVariable = MapToObject(dr)
|
||||||
oCustomVariable.ID = CStr(dr("VariableID"))
|
|
||||||
oCustomVariable.Name = CStr(dr("Name"))
|
|
||||||
oCustomVariable.Path = CStr(dr("Path"))
|
|
||||||
Next
|
Next
|
||||||
|
|
||||||
Return oCustomVariable
|
Return oCustomVariable
|
||||||
@@ -93,10 +106,7 @@
|
|||||||
oData = oDatabase.ReadParamData(sSQL, hshParams)
|
oData = oDatabase.ReadParamData(sSQL, hshParams)
|
||||||
|
|
||||||
For Each dr As DataRow In oData.Tables(0).Rows
|
For Each dr As DataRow In oData.Tables(0).Rows
|
||||||
oCustomVariable = New clsPathVariable
|
oCustomVariable = MapToObject(dr)
|
||||||
oCustomVariable.ID = CStr(dr("VariableID"))
|
|
||||||
oCustomVariable.Name = CStr(dr("Name"))
|
|
||||||
oCustomVariable.Path = CStr(dr("Path"))
|
|
||||||
Next
|
Next
|
||||||
|
|
||||||
Return oCustomVariable
|
Return oCustomVariable
|
||||||
@@ -138,10 +148,7 @@
|
|||||||
oData = oDatabase.ReadParamData(sSQL, New Hashtable)
|
oData = oDatabase.ReadParamData(sSQL, New Hashtable)
|
||||||
|
|
||||||
For Each dr As DataRow In oData.Tables(0).Rows
|
For Each dr As DataRow In oData.Tables(0).Rows
|
||||||
oCustomVariable = New clsPathVariable
|
oCustomVariable = MapToObject(dr)
|
||||||
oCustomVariable.ID = CStr(dr("VariableID"))
|
|
||||||
oCustomVariable.Name = CStr(dr("Name"))
|
|
||||||
oCustomVariable.Path = CStr(dr("Path"))
|
|
||||||
hshList.Add(oCustomVariable.Name, oCustomVariable)
|
hshList.Add(oCustomVariable.Name, oCustomVariable)
|
||||||
Next
|
Next
|
||||||
|
|
||||||
|
|||||||
@@ -14,7 +14,7 @@ Imports System.Runtime.InteropServices
|
|||||||
<Assembly: AssemblyDescription("Game Backup Monitor")>
|
<Assembly: AssemblyDescription("Game Backup Monitor")>
|
||||||
<Assembly: AssemblyCompany("Michael J. Seiferling")>
|
<Assembly: AssemblyCompany("Michael J. Seiferling")>
|
||||||
<Assembly: AssemblyProduct("Game Backup Monitor")>
|
<Assembly: AssemblyProduct("Game Backup Monitor")>
|
||||||
<Assembly: AssemblyCopyright("Copyright © 2015 Michael J. Seiferling")>
|
<Assembly: AssemblyCopyright("Copyright © 2016 Michael J. Seiferling")>
|
||||||
<Assembly: AssemblyTrademark("")>
|
<Assembly: AssemblyTrademark("")>
|
||||||
|
|
||||||
<Assembly: ComVisible(False)>
|
<Assembly: ComVisible(False)>
|
||||||
@@ -33,7 +33,7 @@ Imports System.Runtime.InteropServices
|
|||||||
' by using the '*' as shown below:
|
' by using the '*' as shown below:
|
||||||
' <Assembly: AssemblyVersion("1.0.*")>
|
' <Assembly: AssemblyVersion("1.0.*")>
|
||||||
|
|
||||||
<Assembly: AssemblyVersion("0.96.*")>
|
<Assembly: AssemblyVersion("0.98.*")>
|
||||||
<Assembly: AssemblyFileVersion("0.96.0.0")>
|
<Assembly: AssemblyFileVersion("0.98.0.0")>
|
||||||
|
|
||||||
<Assembly: NeutralResourcesLanguageAttribute("en")>
|
<Assembly: NeutralResourcesLanguageAttribute("en")>
|
||||||
Generated
+472
-67
@@ -87,6 +87,15 @@ Namespace My.Resources
|
|||||||
End Get
|
End Get
|
||||||
End Property
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to 7-Zip (7za.exe) is invalid and has been prevented from running..
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property App_Invalid7zDetected() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("App_Invalid7zDetected", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Looks up a localized string similar to [PARAM] KB.
|
''' Looks up a localized string similar to [PARAM] KB.
|
||||||
'''</summary>
|
'''</summary>
|
||||||
@@ -123,6 +132,15 @@ Namespace My.Resources
|
|||||||
End Get
|
End Get
|
||||||
End Property
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to N/A.
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property App_NotAvailable() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("App_NotAvailable", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Looks up a localized string similar to http://mikemaximus.github.io/gbm-web/GBM_Official.xml.
|
''' Looks up a localized string similar to http://mikemaximus.github.io/gbm-web/GBM_Official.xml.
|
||||||
'''</summary>
|
'''</summary>
|
||||||
@@ -132,6 +150,15 @@ Namespace My.Resources
|
|||||||
End Get
|
End Get
|
||||||
End Property
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to http://mikemaximus.github.io/gbm-web/GBM_Official_Linux.xml.
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property App_URLImportLinux() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("App_URLImportLinux", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Looks up a localized string similar to http://mikemaximus.github.io/gbm-web/manual.html.
|
''' Looks up a localized string similar to http://mikemaximus.github.io/gbm-web/manual.html.
|
||||||
'''</summary>
|
'''</summary>
|
||||||
@@ -232,7 +259,7 @@ Namespace My.Resources
|
|||||||
End Property
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Looks up a localized string similar to Save Entire Folder.
|
''' Looks up a localized string similar to Save entire folder.
|
||||||
'''</summary>
|
'''</summary>
|
||||||
Friend ReadOnly Property frmAddWizard_chkFolderSave() As String
|
Friend ReadOnly Property frmAddWizard_chkFolderSave() As String
|
||||||
Get
|
Get
|
||||||
@@ -241,7 +268,7 @@ Namespace My.Resources
|
|||||||
End Property
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Looks up a localized string similar to Time Stamp Backup.
|
''' Looks up a localized string similar to Save multiple backups.
|
||||||
'''</summary>
|
'''</summary>
|
||||||
Friend ReadOnly Property frmAddWizard_chkTimeStamp() As String
|
Friend ReadOnly Property frmAddWizard_chkTimeStamp() As String
|
||||||
Get
|
Get
|
||||||
@@ -474,6 +501,15 @@ Namespace My.Resources
|
|||||||
End Get
|
End Get
|
||||||
End Property
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to Backup Limit.
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property frmAddWizard_lblLimit() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("frmAddWizard_lblLimit", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Looks up a localized string similar to The name will be automatically filtered for length and invalid characters. You may drag and drop a shortcut here to complete this step, only Windows shortcuts are currently supported..
|
''' Looks up a localized string similar to The name will be automatically filtered for length and invalid characters. You may drag and drop a shortcut here to complete this step, only Windows shortcuts are currently supported..
|
||||||
'''</summary>
|
'''</summary>
|
||||||
@@ -547,7 +583,7 @@ Namespace My.Resources
|
|||||||
End Property
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Looks up a localized string similar to If you're unsure of exactly which files to backup, make sure Save Entire Folder is checked. You can also time stamp your backup files to make incremental backups..
|
''' Looks up a localized string similar to If you're unsure of exactly which files to backup, make sure Save entire folder is checked. You can also choose to save multiple backups and set a limit on how many to keep..
|
||||||
'''</summary>
|
'''</summary>
|
||||||
Friend ReadOnly Property frmAddWizard_lblStep3Instructions() As String
|
Friend ReadOnly Property frmAddWizard_lblStep3Instructions() As String
|
||||||
Get
|
Get
|
||||||
@@ -682,7 +718,7 @@ Namespace My.Resources
|
|||||||
End Property
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Looks up a localized string similar to Timestamp.
|
''' Looks up a localized string similar to Multiple Backups.
|
||||||
'''</summary>
|
'''</summary>
|
||||||
Friend ReadOnly Property frmAddWizard_Summary_Timestamp() As String
|
Friend ReadOnly Property frmAddWizard_Summary_Timestamp() As String
|
||||||
Get
|
Get
|
||||||
@@ -1042,7 +1078,7 @@ Namespace My.Resources
|
|||||||
End Property
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Looks up a localized string similar to [PARAM] by [PARAM].
|
''' Looks up a localized string similar to [PARAM] ([PARAM]).
|
||||||
'''</summary>
|
'''</summary>
|
||||||
Friend ReadOnly Property frmGameManager_BackupTimeAndName() As String
|
Friend ReadOnly Property frmGameManager_BackupTimeAndName() As String
|
||||||
Get
|
Get
|
||||||
@@ -1050,6 +1086,24 @@ Namespace My.Resources
|
|||||||
End Get
|
End Get
|
||||||
End Property
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to Choose a new [PARAM] backup file.
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property frmGameManager_BrowseBackup() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("frmGameManager_BrowseBackup", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to 7-Zip.
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property frmGameManager_BrowseBackupType() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("frmGameManager_BrowseBackupType", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Looks up a localized string similar to +.
|
''' Looks up a localized string similar to +.
|
||||||
'''</summary>
|
'''</summary>
|
||||||
@@ -1086,6 +1140,15 @@ Namespace My.Resources
|
|||||||
End Get
|
End Get
|
||||||
End Property
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to &Change Backup File.
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property frmGameManager_btnChangeBackup() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("frmGameManager_btnChangeBackup", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Looks up a localized string similar to C&lose.
|
''' Looks up a localized string similar to C&lose.
|
||||||
'''</summary>
|
'''</summary>
|
||||||
@@ -1258,7 +1321,7 @@ Namespace My.Resources
|
|||||||
End Property
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Looks up a localized string similar to Timestamp each backup.
|
''' Looks up a localized string similar to Save multiple backups.
|
||||||
'''</summary>
|
'''</summary>
|
||||||
Friend ReadOnly Property frmGameManager_chkTimeStamp() As String
|
Friend ReadOnly Property frmGameManager_chkTimeStamp() As String
|
||||||
Get
|
Get
|
||||||
@@ -1320,6 +1383,24 @@ Namespace My.Resources
|
|||||||
End Get
|
End Get
|
||||||
End Property
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to &All Files.
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property frmGameManager_cmsDeleteAll() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("frmGameManager_cmsDeleteAll", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to &Selected File.
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property frmGameManager_cmsDeleteOne() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("frmGameManager_cmsDeleteOne", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Looks up a localized string similar to &File....
|
''' Looks up a localized string similar to &File....
|
||||||
'''</summary>
|
'''</summary>
|
||||||
@@ -1348,7 +1429,25 @@ Namespace My.Resources
|
|||||||
End Property
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Looks up a localized string similar to This will delete the backup file and all records of this backup. This cannot be undone. [BR][BR]Do you want to remove the data for [PARAM]?.
|
''' Looks up a localized string similar to [PARAM] will be the new backup file for [PARAM].[BR][BR]Is this correct?.
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property frmGameManager_ConfirmBackupChange() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("frmGameManager_ConfirmBackupChange", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to Do you want to restore [PARAM] now?.
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property frmGameManager_ConfirmBackupChangeRestore() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("frmGameManager_ConfirmBackupChangeRestore", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to This will delete the selected backup file. This cannot be undone. [BR][BR]Do you want to delete [PARAM]?.
|
||||||
'''</summary>
|
'''</summary>
|
||||||
Friend ReadOnly Property frmGameManager_ConfirmBackupDelete() As String
|
Friend ReadOnly Property frmGameManager_ConfirmBackupDelete() As String
|
||||||
Get
|
Get
|
||||||
@@ -1357,11 +1456,11 @@ Namespace My.Resources
|
|||||||
End Property
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Looks up a localized string similar to The backup folder [PARAM] still contains [PARAM] directories and [PARAM] files.[BR][BR]Do you want to delete the contents and remove the sub-folder for this game?.
|
''' Looks up a localized string similar to This will delete all backup files for [PARAM]. This cannot be undone. [BR][BR]Do you want to continue?.
|
||||||
'''</summary>
|
'''</summary>
|
||||||
Friend ReadOnly Property frmGameManager_ConfirmBackupFolderDelete() As String
|
Friend ReadOnly Property frmGameManager_ConfirmBackupDeleteAll() As String
|
||||||
Get
|
Get
|
||||||
Return ResourceManager.GetString("frmGameManager_ConfirmBackupFolderDelete", resourceCulture)
|
Return ResourceManager.GetString("frmGameManager_ConfirmBackupDeleteAll", resourceCulture)
|
||||||
End Get
|
End Get
|
||||||
End Property
|
End Property
|
||||||
|
|
||||||
@@ -1455,15 +1554,6 @@ Namespace My.Resources
|
|||||||
End Get
|
End Get
|
||||||
End Property
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
|
||||||
''' Looks up a localized string similar to You appear to be using a Unix based operating system. The official list currently contains only Microsoft Windows game configurations.[BR][BR]Do you wish to continue?.
|
|
||||||
'''</summary>
|
|
||||||
Friend ReadOnly Property frmGameManager_ConfirmUnixImportWarning() As String
|
|
||||||
Get
|
|
||||||
Return ResourceManager.GetString("frmGameManager_ConfirmUnixImportWarning", resourceCulture)
|
|
||||||
End Get
|
|
||||||
End Property
|
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Looks up a localized string similar to Game Backup Monitor Export.
|
''' Looks up a localized string similar to Game Backup Monitor Export.
|
||||||
'''</summary>
|
'''</summary>
|
||||||
@@ -1473,6 +1563,24 @@ Namespace My.Resources
|
|||||||
End Get
|
End Get
|
||||||
End Property
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to [PARAM] is already the current backup file..
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property frmGameManager_ErrorBackupChangeFileName() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("frmGameManager_ErrorBackupChangeFileName", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to You cannot choose a file located outside the current [PARAM] backup folder..
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property frmGameManager_ErrorBackupChangePath() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("frmGameManager_ErrorBackupChangePath", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Looks up a localized string similar to A game with this exact name and process already exists..
|
''' Looks up a localized string similar to A game with this exact name and process already exists..
|
||||||
'''</summary>
|
'''</summary>
|
||||||
@@ -1483,7 +1591,7 @@ Namespace My.Resources
|
|||||||
End Property
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Looks up a localized string similar to The selected game(s) have no backup data..
|
''' Looks up a localized string similar to The selected game(s) have no backup data or can't be restored with their current configuration..
|
||||||
'''</summary>
|
'''</summary>
|
||||||
Friend ReadOnly Property frmGameManager_ErrorNoBackupData() As String
|
Friend ReadOnly Property frmGameManager_ErrorNoBackupData() As String
|
||||||
Get
|
Get
|
||||||
@@ -1518,6 +1626,15 @@ Namespace My.Resources
|
|||||||
End Get
|
End Get
|
||||||
End Property
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to A backup cannot be run on the selected game(s) with their current configuration..
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property frmGameManager_ErrorNoValidBackup() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("frmGameManager_ErrorNoValidBackup", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Looks up a localized string similar to [PARAM] uses a relative path and the game path has not been set..
|
''' Looks up a localized string similar to [PARAM] uses a relative path and the game path has not been set..
|
||||||
'''</summary>
|
'''</summary>
|
||||||
@@ -1662,6 +1779,15 @@ Namespace My.Resources
|
|||||||
End Get
|
End Get
|
||||||
End Property
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to Backup File:.
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property frmGameManager_lblBackupFile() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("frmGameManager_lblBackupFile", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Looks up a localized string similar to Company:.
|
''' Looks up a localized string similar to Company:.
|
||||||
'''</summary>
|
'''</summary>
|
||||||
@@ -1671,24 +1797,6 @@ Namespace My.Resources
|
|||||||
End Get
|
End Get
|
||||||
End Property
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
|
||||||
''' Looks up a localized string similar to Current Backup:.
|
|
||||||
'''</summary>
|
|
||||||
Friend ReadOnly Property frmGameManager_lblCurrentBackup() As String
|
|
||||||
Get
|
|
||||||
Return ResourceManager.GetString("frmGameManager_lblCurrentBackup", resourceCulture)
|
|
||||||
End Get
|
|
||||||
End Property
|
|
||||||
|
|
||||||
'''<summary>
|
|
||||||
''' Looks up a localized string similar to Backup Size:.
|
|
||||||
'''</summary>
|
|
||||||
Friend ReadOnly Property frmGameManager_lblFileSize() As String
|
|
||||||
Get
|
|
||||||
Return ResourceManager.GetString("frmGameManager_lblFileSize", resourceCulture)
|
|
||||||
End Get
|
|
||||||
End Property
|
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Looks up a localized string similar to Game Path:.
|
''' Looks up a localized string similar to Game Path:.
|
||||||
'''</summary>
|
'''</summary>
|
||||||
@@ -1717,11 +1825,20 @@ Namespace My.Resources
|
|||||||
End Property
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Looks up a localized string similar to Local Backup:.
|
''' Looks up a localized string similar to Backup Limit.
|
||||||
'''</summary>
|
'''</summary>
|
||||||
Friend ReadOnly Property frmGameManager_lblLastBackup() As String
|
Friend ReadOnly Property frmGameManager_lblLimit() As String
|
||||||
Get
|
Get
|
||||||
Return ResourceManager.GetString("frmGameManager_lblLastBackup", resourceCulture)
|
Return ResourceManager.GetString("frmGameManager_lblLimit", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to Local Data:.
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property frmGameManager_lblLocalData() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("frmGameManager_lblLocalData", resourceCulture)
|
||||||
End Get
|
End Get
|
||||||
End Property
|
End Property
|
||||||
|
|
||||||
@@ -1743,6 +1860,24 @@ Namespace My.Resources
|
|||||||
End Get
|
End Get
|
||||||
End Property
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to Quick Filter:.
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property frmGameManager_lblQuickFilter() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("frmGameManager_lblQuickFilter", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to Backup Data:.
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property frmGameManager_lblRemote() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("frmGameManager_lblRemote", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Looks up a localized string similar to Restore Path:.
|
''' Looks up a localized string similar to Restore Path:.
|
||||||
'''</summary>
|
'''</summary>
|
||||||
@@ -1771,11 +1906,11 @@ Namespace My.Resources
|
|||||||
End Property
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Looks up a localized string similar to Never.
|
''' Looks up a localized string similar to None.
|
||||||
'''</summary>
|
'''</summary>
|
||||||
Friend ReadOnly Property frmGameManager_Never() As String
|
Friend ReadOnly Property frmGameManager_None() As String
|
||||||
Get
|
Get
|
||||||
Return ResourceManager.GetString("frmGameManager_Never", resourceCulture)
|
Return ResourceManager.GetString("frmGameManager_None", resourceCulture)
|
||||||
End Get
|
End Get
|
||||||
End Property
|
End Property
|
||||||
|
|
||||||
@@ -1824,6 +1959,15 @@ Namespace My.Resources
|
|||||||
End Get
|
End Get
|
||||||
End Property
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to Unknown.
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property frmGameManager_Unknown() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("frmGameManager_Unknown", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Looks up a localized string similar to Up to Date!.
|
''' Looks up a localized string similar to Up to Date!.
|
||||||
'''</summary>
|
'''</summary>
|
||||||
@@ -2310,6 +2454,15 @@ Namespace My.Resources
|
|||||||
End Get
|
End Get
|
||||||
End Property
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to The custom 7-Zip utility could not be found at:[BR][BR][PARAM][BR][BR]Please check your settings, the default 7-Zip utility will be used..
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property frmMain_Error7zCustom() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("frmMain_Error7zCustom", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Looks up a localized string similar to 7-Zip was not found. The application cannot continue..
|
''' Looks up a localized string similar to 7-Zip was not found. The application cannot continue..
|
||||||
'''</summary>
|
'''</summary>
|
||||||
@@ -2320,7 +2473,7 @@ Namespace My.Resources
|
|||||||
End Property
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Looks up a localized string similar to [PARAM] is running as Administrator and GBM is not, GBM cannot detect the required information to save your backup..
|
''' Looks up a localized string similar to [PARAM] was running as Administrator and GBM is not, GBM cannot detect the required information to save your backup..
|
||||||
'''</summary>
|
'''</summary>
|
||||||
Friend ReadOnly Property frmMain_ErrorAdminBackup() As String
|
Friend ReadOnly Property frmMain_ErrorAdminBackup() As String
|
||||||
Get
|
Get
|
||||||
@@ -2446,7 +2599,7 @@ Namespace My.Resources
|
|||||||
End Property
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Looks up a localized string similar to Multiple possible 64-bit games have been detected, GBM cannot detect the path to identify your game or save your backup.[BR][BR]Please install the 64-bit version of GBM to detect and backup this game properly..
|
''' Looks up a localized string similar to Install the 64-bit version of GBM to detect the last running game..
|
||||||
'''</summary>
|
'''</summary>
|
||||||
Friend ReadOnly Property frmMain_ErrorMulti64() As String
|
Friend ReadOnly Property frmMain_ErrorMulti64() As String
|
||||||
Get
|
Get
|
||||||
@@ -2455,7 +2608,7 @@ Namespace My.Resources
|
|||||||
End Property
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Looks up a localized string similar to Multiple possible games have been detected running as Administrator and GBM is not, GBM cannot detect the path to identify your game or save your backup.[BR][BR]Please run GBM as Administrator to properly detect and backup this game..
|
''' Looks up a localized string similar to Restart GBM as Administrator to detect the last running game..
|
||||||
'''</summary>
|
'''</summary>
|
||||||
Friend ReadOnly Property frmMain_ErrorMultiAdmin() As String
|
Friend ReadOnly Property frmMain_ErrorMultiAdmin() As String
|
||||||
Get
|
Get
|
||||||
@@ -2806,7 +2959,16 @@ Namespace My.Resources
|
|||||||
End Property
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Looks up a localized string similar to The session log has been cleared due to size and auto-saved to [PARAM]..
|
''' Looks up a localized string similar to The session log reached maximum length and has been cleared..
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property frmMain_LogAutoClear() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("frmMain_LogAutoClear", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to The session log reached maximum length and has been auto-saved to [PARAM]..
|
||||||
'''</summary>
|
'''</summary>
|
||||||
Friend ReadOnly Property frmMain_LogAutoSave() As String
|
Friend ReadOnly Property frmMain_LogAutoSave() As String
|
||||||
Get
|
Get
|
||||||
@@ -3057,6 +3219,24 @@ Namespace My.Resources
|
|||||||
End Get
|
End Get
|
||||||
End Property
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to Executable.
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property frmSettings_7zaFileType() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("frmSettings_7zaFileType", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to Locate 7-Zip Console (7za).
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property frmSettings_Browse7za() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("frmSettings_Browse7za", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Looks up a localized string similar to Choose a backup folder:.
|
''' Looks up a localized string similar to Choose a backup folder:.
|
||||||
'''</summary>
|
'''</summary>
|
||||||
@@ -3084,6 +3264,24 @@ Namespace My.Resources
|
|||||||
End Get
|
End Get
|
||||||
End Property
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to Set &Defaults.
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property frmSettings_btnDefaults() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("frmSettings_btnDefaults", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to Choose &Optional Fields....
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property frmSettings_btnOptionalFields() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("frmSettings_btnOptionalFields", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Looks up a localized string similar to &Save.
|
''' Looks up a localized string similar to &Save.
|
||||||
'''</summary>
|
'''</summary>
|
||||||
@@ -3147,6 +3345,15 @@ Namespace My.Resources
|
|||||||
End Get
|
End Get
|
||||||
End Property
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to Autosave log when max length is exceeded.
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property frmSettings_chkAutoSaveLog() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("frmSettings_chkAutoSaveLog", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Looks up a localized string similar to Disable backup confirmation.
|
''' Looks up a localized string similar to Disable backup confirmation.
|
||||||
'''</summary>
|
'''</summary>
|
||||||
@@ -3238,7 +3445,7 @@ Namespace My.Resources
|
|||||||
End Property
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Looks up a localized string similar to Sync game list data with backup folder.
|
''' Looks up a localized string similar to Enable syncing.
|
||||||
'''</summary>
|
'''</summary>
|
||||||
Friend ReadOnly Property frmSettings_chkSync() As String
|
Friend ReadOnly Property frmSettings_chkSync() As String
|
||||||
Get
|
Get
|
||||||
@@ -3255,6 +3462,15 @@ Namespace My.Resources
|
|||||||
End Get
|
End Get
|
||||||
End Property
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to Do you want to revert all settings to their defaults?.
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property frmSettings_ConfirmDefaults() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("frmSettings_ConfirmDefaults", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Looks up a localized string similar to The backup folder does not exist. Please choose a valid backup folder..
|
''' Looks up a localized string similar to The backup folder does not exist. Please choose a valid backup folder..
|
||||||
'''</summary>
|
'''</summary>
|
||||||
@@ -3264,6 +3480,15 @@ Namespace My.Resources
|
|||||||
End Get
|
End Get
|
||||||
End Property
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to The custom 7-Zip location [PARAM] does not exist..
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property frmSettings_ErrorLocation() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("frmSettings_ErrorLocation", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Looks up a localized string similar to Settings.
|
''' Looks up a localized string similar to Settings.
|
||||||
'''</summary>
|
'''</summary>
|
||||||
@@ -3274,38 +3499,65 @@ Namespace My.Resources
|
|||||||
End Property
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Looks up a localized string similar to 7z Options.
|
''' Looks up a localized string similar to Advanced.
|
||||||
'''</summary>
|
'''</summary>
|
||||||
Friend ReadOnly Property frmSettings_grp7z() As String
|
Friend ReadOnly Property frmSettings_grp7zAdvanced() As String
|
||||||
Get
|
Get
|
||||||
Return ResourceManager.GetString("frmSettings_grp7z", resourceCulture)
|
Return ResourceManager.GetString("frmSettings_grp7zAdvanced", resourceCulture)
|
||||||
End Get
|
|
||||||
End Property
|
|
||||||
|
|
||||||
'''<summary>
|
|
||||||
''' Looks up a localized string similar to Backup and Restore.
|
|
||||||
'''</summary>
|
|
||||||
Friend ReadOnly Property frmSettings_grpBackup() As String
|
|
||||||
Get
|
|
||||||
Return ResourceManager.GetString("frmSettings_grpBackup", resourceCulture)
|
|
||||||
End Get
|
End Get
|
||||||
End Property
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Looks up a localized string similar to General.
|
''' Looks up a localized string similar to General.
|
||||||
'''</summary>
|
'''</summary>
|
||||||
Friend ReadOnly Property frmSettings_grpGeneral() As String
|
Friend ReadOnly Property frmSettings_grp7zGeneral() As String
|
||||||
Get
|
Get
|
||||||
Return ResourceManager.GetString("frmSettings_grpGeneral", resourceCulture)
|
Return ResourceManager.GetString("frmSettings_grp7zGeneral", resourceCulture)
|
||||||
End Get
|
End Get
|
||||||
End Property
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Looks up a localized string similar to Paths.
|
''' Looks up a localized string similar to Version Information.
|
||||||
'''</summary>
|
'''</summary>
|
||||||
Friend ReadOnly Property frmSettings_grpPaths() As String
|
Friend ReadOnly Property frmSettings_grp7zInformation() As String
|
||||||
Get
|
Get
|
||||||
Return ResourceManager.GetString("frmSettings_grpPaths", resourceCulture)
|
Return ResourceManager.GetString("frmSettings_grp7zInformation", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to Folders.
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property frmSettings_grpFolderOptions() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("frmSettings_grpFolderOptions", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to Game Data.
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property frmSettings_grpGameData() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("frmSettings_grpGameData", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to Startup.
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property frmSettings_grpStartup() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("frmSettings_grpStartup", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to Custom Arguments:.
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property frmSettings_lblArguments() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("frmSettings_lblArguments", resourceCulture)
|
||||||
End Get
|
End Get
|
||||||
End Property
|
End Property
|
||||||
|
|
||||||
@@ -3327,6 +3579,15 @@ Namespace My.Resources
|
|||||||
End Get
|
End Get
|
||||||
End Property
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to Custom Location:.
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property frmSettings_lblLocation() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("frmSettings_lblLocation", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Looks up a localized string similar to minutes.
|
''' Looks up a localized string similar to minutes.
|
||||||
'''</summary>
|
'''</summary>
|
||||||
@@ -3336,6 +3597,51 @@ Namespace My.Resources
|
|||||||
End Get
|
End Get
|
||||||
End Property
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to 7-Zip.
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property frmSettings_lstSettings_7z() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("frmSettings_lstSettings_7z", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to Backup and Restore.
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property frmSettings_lstSettings_BackupRestore() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("frmSettings_lstSettings_BackupRestore", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to General.
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property frmSettings_lstSettings_General() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("frmSettings_lstSettings_General", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to Invalid or poorly formatted 7-Zip arguments can cause backup or restore operations to fail.[BR][BR]If problems occur, clear the custom arguments and try again..
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property frmSettings_WarningArguments() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("frmSettings_WarningArguments", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to You have chosen a custom utility that does not appear to be 7-Zip. [BR][BR]GBM only supports the use of 7-Zip Console (7za)..
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property frmSettings_WarningLocation() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("frmSettings_WarningLocation", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Looks up a localized string similar to Choose a backup folder:.
|
''' Looks up a localized string similar to Choose a backup folder:.
|
||||||
'''</summary>
|
'''</summary>
|
||||||
@@ -3597,6 +3903,96 @@ Namespace My.Resources
|
|||||||
End Get
|
End Get
|
||||||
End Property
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to &Cancel.
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property frmSyncFields_btnCancel() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("frmSyncFields_btnCancel", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to &Save.
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property frmSyncFields_btnSave() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("frmSyncFields_btnSave", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to Company.
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property frmSyncFields_chkCompany() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("frmSyncFields_chkCompany", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to Game Path (Not Recommended).
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property frmSyncFields_chkGamePath() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("frmSyncFields_chkGamePath", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to Icon (Not Recommended).
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property frmSyncFields_chkIcon() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("frmSyncFields_chkIcon", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to Monitor this game.
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property frmSyncFields_chkMonitorGame() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("frmSyncFields_chkMonitorGame", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to Save multiple backups.
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property frmSyncFields_chkTimeStamp() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("frmSyncFields_chkTimeStamp", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to Version.
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property frmSyncFields_chkVersion() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("frmSyncFields_chkVersion", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to Optional Sync Fields.
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property frmSyncFields_FormName() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("frmSyncFields_FormName", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to Available Fields.
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property frmSyncFields_grpFields() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("frmSyncFields_grpFields", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Looks up a localized string similar to +.
|
''' Looks up a localized string similar to +.
|
||||||
'''</summary>
|
'''</summary>
|
||||||
@@ -4006,6 +4402,15 @@ Namespace My.Resources
|
|||||||
End Get
|
End Get
|
||||||
End Property
|
End Property
|
||||||
|
|
||||||
|
'''<summary>
|
||||||
|
''' Looks up a localized string similar to [PARAM] was automatically removed..
|
||||||
|
'''</summary>
|
||||||
|
Friend ReadOnly Property mgrBackup_BackupLimitExceeded() As String
|
||||||
|
Get
|
||||||
|
Return ResourceManager.GetString("mgrBackup_BackupLimitExceeded", resourceCulture)
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Looks up a localized string similar to [PARAM] backup finished with warnings or errors..
|
''' Looks up a localized string similar to [PARAM] backup finished with warnings or errors..
|
||||||
'''</summary>
|
'''</summary>
|
||||||
@@ -4160,7 +4565,7 @@ Namespace My.Resources
|
|||||||
End Property
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Looks up a localized string similar to GBM data already exists in the backup folder.[BR][BR]Do you want to make your local game list the new master game list in this folder? (Recommended)[BR][BR]Choosing No will sync your local game list to the current master game list in this folder..
|
''' Looks up a localized string similar to The sync settings have changed and data already exists in the backup folder.[BR][BR]Do you want to make your current game data on this PC the new master game data in this folder? (Highly Recommended)[BR][BR]Choosing No will sync your game data on this PC to the current master game data in this folder..
|
||||||
'''</summary>
|
'''</summary>
|
||||||
Friend ReadOnly Property mgrMonitorList_ConfirmExistingData() As String
|
Friend ReadOnly Property mgrMonitorList_ConfirmExistingData() As String
|
||||||
Get
|
Get
|
||||||
|
|||||||
+172
-37
@@ -197,7 +197,7 @@
|
|||||||
<value>7-Zip was not found. The application cannot continue.</value>
|
<value>7-Zip was not found. The application cannot continue.</value>
|
||||||
</data>
|
</data>
|
||||||
<data name="frmMain_ErrorAdminBackup" xml:space="preserve">
|
<data name="frmMain_ErrorAdminBackup" xml:space="preserve">
|
||||||
<value>[PARAM] is running as Administrator and GBM is not, GBM cannot detect the required information to save your backup.</value>
|
<value>[PARAM] was running as Administrator and GBM is not, GBM cannot detect the required information to save your backup.</value>
|
||||||
</data>
|
</data>
|
||||||
<data name="frmMain_ErrorAdminDetect" xml:space="preserve">
|
<data name="frmMain_ErrorAdminDetect" xml:space="preserve">
|
||||||
<value>[PARAM] is running as Administrator and GBM is not.[BR]You cannot cancel monitoring at this time.[BR][BR]Run GBM as Administrator to prevent this issue.</value>
|
<value>[PARAM] is running as Administrator and GBM is not.[BR]You cannot cancel monitoring at this time.[BR][BR]Run GBM as Administrator to prevent this issue.</value>
|
||||||
@@ -227,10 +227,10 @@
|
|||||||
<value>The GBM data (Version [PARAM]) in your backup folder is too new for your version of GBM (Version [PARAM])[BR][BR]All computers sharing a backup folder must use the same version of GBM. The application cannot proceed.</value>
|
<value>The GBM data (Version [PARAM]) in your backup folder is too new for your version of GBM (Version [PARAM])[BR][BR]All computers sharing a backup folder must use the same version of GBM. The application cannot proceed.</value>
|
||||||
</data>
|
</data>
|
||||||
<data name="frmMain_ErrorMulti64" xml:space="preserve">
|
<data name="frmMain_ErrorMulti64" xml:space="preserve">
|
||||||
<value>Multiple possible 64-bit games have been detected, GBM cannot detect the path to identify your game or save your backup.[BR][BR]Please install the 64-bit version of GBM to detect and backup this game properly.</value>
|
<value>Install the 64-bit version of GBM to detect the last running game.</value>
|
||||||
</data>
|
</data>
|
||||||
<data name="frmMain_ErrorMultiAdmin" xml:space="preserve">
|
<data name="frmMain_ErrorMultiAdmin" xml:space="preserve">
|
||||||
<value>Multiple possible games have been detected running as Administrator and GBM is not, GBM cannot detect the path to identify your game or save your backup.[BR][BR]Please run GBM as Administrator to properly detect and backup this game.</value>
|
<value>Restart GBM as Administrator to detect the last running game.</value>
|
||||||
</data>
|
</data>
|
||||||
<data name="frmMain_ErrorRelativePath" xml:space="preserve">
|
<data name="frmMain_ErrorRelativePath" xml:space="preserve">
|
||||||
<value>[PARAM] uses a relative path and has never been detected on this computer.</value>
|
<value>[PARAM] uses a relative path and has never been detected on this computer.</value>
|
||||||
@@ -431,7 +431,7 @@
|
|||||||
<value>[PARAM] MB</value>
|
<value>[PARAM] MB</value>
|
||||||
</data>
|
</data>
|
||||||
<data name="frmGameManager_BackupTimeAndName" xml:space="preserve">
|
<data name="frmGameManager_BackupTimeAndName" xml:space="preserve">
|
||||||
<value>[PARAM] by [PARAM]</value>
|
<value>[PARAM] ([PARAM])</value>
|
||||||
</data>
|
</data>
|
||||||
<data name="frmGameManager_btnAdd" xml:space="preserve">
|
<data name="frmGameManager_btnAdd" xml:space="preserve">
|
||||||
<value>+</value>
|
<value>+</value>
|
||||||
@@ -503,7 +503,7 @@
|
|||||||
<value>Monitor only</value>
|
<value>Monitor only</value>
|
||||||
</data>
|
</data>
|
||||||
<data name="frmGameManager_chkTimeStamp" xml:space="preserve">
|
<data name="frmGameManager_chkTimeStamp" xml:space="preserve">
|
||||||
<value>Timestamp each backup</value>
|
<value>Save multiple backups</value>
|
||||||
</data>
|
</data>
|
||||||
<data name="frmGameManager_ChooseCustomIcon" xml:space="preserve">
|
<data name="frmGameManager_ChooseCustomIcon" xml:space="preserve">
|
||||||
<value>Choose a custom icon for the game</value>
|
<value>Choose a custom icon for the game</value>
|
||||||
@@ -527,10 +527,7 @@
|
|||||||
<value>Are you sure you want to run a backup for [PARAM]? This will close the form.</value>
|
<value>Are you sure you want to run a backup for [PARAM]? This will close the form.</value>
|
||||||
</data>
|
</data>
|
||||||
<data name="frmGameManager_ConfirmBackupDelete" xml:space="preserve">
|
<data name="frmGameManager_ConfirmBackupDelete" xml:space="preserve">
|
||||||
<value>This will delete the backup file and all records of this backup. This cannot be undone. [BR][BR]Do you want to remove the data for [PARAM]?</value>
|
<value>This will delete the selected backup file. This cannot be undone. [BR][BR]Do you want to delete [PARAM]?</value>
|
||||||
</data>
|
|
||||||
<data name="frmGameManager_ConfirmBackupFolderDelete" xml:space="preserve">
|
|
||||||
<value>The backup folder [PARAM] still contains [PARAM] directories and [PARAM] files.[BR][BR]Do you want to delete the contents and remove the sub-folder for this game?</value>
|
|
||||||
</data>
|
</data>
|
||||||
<data name="frmGameManager_ConfirmGameDelete" xml:space="preserve">
|
<data name="frmGameManager_ConfirmGameDelete" xml:space="preserve">
|
||||||
<value>Are you sure you want to delete [PARAM]? This cannot be undone.[BR][BR]This will not delete any backup files that already exist for this game.</value>
|
<value>Are you sure you want to delete [PARAM]? This cannot be undone.[BR][BR]This will not delete any backup files that already exist for this game.</value>
|
||||||
@@ -566,7 +563,7 @@
|
|||||||
<value>A game with this exact name and process already exists.</value>
|
<value>A game with this exact name and process already exists.</value>
|
||||||
</data>
|
</data>
|
||||||
<data name="frmGameManager_ErrorNoBackupData" xml:space="preserve">
|
<data name="frmGameManager_ErrorNoBackupData" xml:space="preserve">
|
||||||
<value>The selected game(s) have no backup data.</value>
|
<value>The selected game(s) have no backup data or can't be restored with their current configuration.</value>
|
||||||
</data>
|
</data>
|
||||||
<data name="frmGameManager_ErrorNoBackupExists" xml:space="preserve">
|
<data name="frmGameManager_ErrorNoBackupExists" xml:space="preserve">
|
||||||
<value>The backup file does not exist.</value>
|
<value>The backup file does not exist.</value>
|
||||||
@@ -616,11 +613,11 @@
|
|||||||
<data name="frmGameManager_lblCompany" xml:space="preserve">
|
<data name="frmGameManager_lblCompany" xml:space="preserve">
|
||||||
<value>Company:</value>
|
<value>Company:</value>
|
||||||
</data>
|
</data>
|
||||||
<data name="frmGameManager_lblCurrentBackup" xml:space="preserve">
|
<data name="frmGameManager_lblRemote" xml:space="preserve">
|
||||||
<value>Current Backup:</value>
|
<value>Backup Data:</value>
|
||||||
</data>
|
</data>
|
||||||
<data name="frmGameManager_lblFileSize" xml:space="preserve">
|
<data name="frmGameManager_lblBackupFile" xml:space="preserve">
|
||||||
<value>Backup Size:</value>
|
<value>Backup File:</value>
|
||||||
</data>
|
</data>
|
||||||
<data name="frmGameManager_lblGamePath" xml:space="preserve">
|
<data name="frmGameManager_lblGamePath" xml:space="preserve">
|
||||||
<value>Game Path:</value>
|
<value>Game Path:</value>
|
||||||
@@ -631,8 +628,8 @@
|
|||||||
<data name="frmGameManager_lblIcon" xml:space="preserve">
|
<data name="frmGameManager_lblIcon" xml:space="preserve">
|
||||||
<value>Icon:</value>
|
<value>Icon:</value>
|
||||||
</data>
|
</data>
|
||||||
<data name="frmGameManager_lblLastBackup" xml:space="preserve">
|
<data name="frmGameManager_lblLocalData" xml:space="preserve">
|
||||||
<value>Local Backup:</value>
|
<value>Local Data:</value>
|
||||||
</data>
|
</data>
|
||||||
<data name="frmGameManager_lblName" xml:space="preserve">
|
<data name="frmGameManager_lblName" xml:space="preserve">
|
||||||
<value>Name:</value>
|
<value>Name:</value>
|
||||||
@@ -649,8 +646,8 @@
|
|||||||
<data name="frmGameManager_lblVersion" xml:space="preserve">
|
<data name="frmGameManager_lblVersion" xml:space="preserve">
|
||||||
<value>Version:</value>
|
<value>Version:</value>
|
||||||
</data>
|
</data>
|
||||||
<data name="frmGameManager_Never" xml:space="preserve">
|
<data name="frmGameManager_None" xml:space="preserve">
|
||||||
<value>Never</value>
|
<value>None</value>
|
||||||
</data>
|
</data>
|
||||||
<data name="frmGameManager_optAllGames" xml:space="preserve">
|
<data name="frmGameManager_optAllGames" xml:space="preserve">
|
||||||
<value>All</value>
|
<value>All</value>
|
||||||
@@ -704,10 +701,10 @@
|
|||||||
<value>...</value>
|
<value>...</value>
|
||||||
</data>
|
</data>
|
||||||
<data name="frmAddWizard_chkFolderSave" xml:space="preserve">
|
<data name="frmAddWizard_chkFolderSave" xml:space="preserve">
|
||||||
<value>Save Entire Folder</value>
|
<value>Save entire folder</value>
|
||||||
</data>
|
</data>
|
||||||
<data name="frmAddWizard_chkTimeStamp" xml:space="preserve">
|
<data name="frmAddWizard_chkTimeStamp" xml:space="preserve">
|
||||||
<value>Time Stamp Backup</value>
|
<value>Save multiple backups</value>
|
||||||
</data>
|
</data>
|
||||||
<data name="frmAddWizard_ChooseProcess" xml:space="preserve">
|
<data name="frmAddWizard_ChooseProcess" xml:space="preserve">
|
||||||
<value>Choose exe file that starts the game</value>
|
<value>Choose exe file that starts the game</value>
|
||||||
@@ -809,7 +806,7 @@
|
|||||||
<value>Choose Files to Backup</value>
|
<value>Choose Files to Backup</value>
|
||||||
</data>
|
</data>
|
||||||
<data name="frmAddWizard_lblStep3Instructions" xml:space="preserve">
|
<data name="frmAddWizard_lblStep3Instructions" xml:space="preserve">
|
||||||
<value>If you're unsure of exactly which files to backup, make sure Save Entire Folder is checked. You can also time stamp your backup files to make incremental backups.</value>
|
<value>If you're unsure of exactly which files to backup, make sure Save entire folder is checked. You can also choose to save multiple backups and set a limit on how many to keep.</value>
|
||||||
</data>
|
</data>
|
||||||
<data name="frmAddWizard_lblStep3Intro" xml:space="preserve">
|
<data name="frmAddWizard_lblStep3Intro" xml:space="preserve">
|
||||||
<value>Choose the location of your game's save files:</value>
|
<value>Choose the location of your game's save files:</value>
|
||||||
@@ -854,7 +851,7 @@
|
|||||||
<value>Save Path</value>
|
<value>Save Path</value>
|
||||||
</data>
|
</data>
|
||||||
<data name="frmAddWizard_Summary_Timestamp" xml:space="preserve">
|
<data name="frmAddWizard_Summary_Timestamp" xml:space="preserve">
|
||||||
<value>Timestamp</value>
|
<value>Multiple Backups</value>
|
||||||
</data>
|
</data>
|
||||||
<data name="frmAdvancedImport_btnCancel" xml:space="preserve">
|
<data name="frmAdvancedImport_btnCancel" xml:space="preserve">
|
||||||
<value>&Cancel</value>
|
<value>&Cancel</value>
|
||||||
@@ -1106,7 +1103,7 @@
|
|||||||
<value>Backup only when session time exceeds</value>
|
<value>Backup only when session time exceeds</value>
|
||||||
</data>
|
</data>
|
||||||
<data name="frmSettings_chkSync" xml:space="preserve">
|
<data name="frmSettings_chkSync" xml:space="preserve">
|
||||||
<value>Sync game list data with backup folder</value>
|
<value>Enable syncing</value>
|
||||||
</data>
|
</data>
|
||||||
<data name="frmSettings_chkTimeTracking" xml:space="preserve">
|
<data name="frmSettings_chkTimeTracking" xml:space="preserve">
|
||||||
<value>Enable time tracking</value>
|
<value>Enable time tracking</value>
|
||||||
@@ -1117,14 +1114,11 @@
|
|||||||
<data name="frmSettings_FormName" xml:space="preserve">
|
<data name="frmSettings_FormName" xml:space="preserve">
|
||||||
<value>Settings</value>
|
<value>Settings</value>
|
||||||
</data>
|
</data>
|
||||||
<data name="frmSettings_grpBackup" xml:space="preserve">
|
<data name="frmSettings_grpStartup" xml:space="preserve">
|
||||||
<value>Backup and Restore</value>
|
<value>Startup</value>
|
||||||
</data>
|
</data>
|
||||||
<data name="frmSettings_grpGeneral" xml:space="preserve">
|
<data name="frmSettings_grpFolderOptions" xml:space="preserve">
|
||||||
<value>General</value>
|
<value>Folders</value>
|
||||||
</data>
|
|
||||||
<data name="frmSettings_grpPaths" xml:space="preserve">
|
|
||||||
<value>Paths</value>
|
|
||||||
</data>
|
</data>
|
||||||
<data name="frmSettings_lblBackupFolder" xml:space="preserve">
|
<data name="frmSettings_lblBackupFolder" xml:space="preserve">
|
||||||
<value>Backup Folder:</value>
|
<value>Backup Folder:</value>
|
||||||
@@ -1361,7 +1355,7 @@
|
|||||||
<value>Would you like to apply a filter to your export?</value>
|
<value>Would you like to apply a filter to your export?</value>
|
||||||
</data>
|
</data>
|
||||||
<data name="mgrMonitorList_ConfirmExistingData" xml:space="preserve">
|
<data name="mgrMonitorList_ConfirmExistingData" xml:space="preserve">
|
||||||
<value>GBM data already exists in the backup folder.[BR][BR]Do you want to make your local game list the new master game list in this folder? (Recommended)[BR][BR]Choosing No will sync your local game list to the current master game list in this folder.</value>
|
<value>The sync settings have changed and data already exists in the backup folder.[BR][BR]Do you want to make your current game data on this PC the new master game data in this folder? (Highly Recommended)[BR][BR]Choosing No will sync your game data on this PC to the current master game data in this folder.</value>
|
||||||
</data>
|
</data>
|
||||||
<data name="mgrMonitorList_ExportComplete" xml:space="preserve">
|
<data name="mgrMonitorList_ExportComplete" xml:space="preserve">
|
||||||
<value>Export Complete. [PARAM] item(s) have been exported.</value>
|
<value>Export Complete. [PARAM] item(s) have been exported.</value>
|
||||||
@@ -1499,7 +1493,7 @@
|
|||||||
<value>&Log</value>
|
<value>&Log</value>
|
||||||
</data>
|
</data>
|
||||||
<data name="frmMain_LogAutoSave" xml:space="preserve">
|
<data name="frmMain_LogAutoSave" xml:space="preserve">
|
||||||
<value>The session log has been cleared due to size and auto-saved to [PARAM].</value>
|
<value>The session log reached maximum length and has been auto-saved to [PARAM].</value>
|
||||||
</data>
|
</data>
|
||||||
<data name="frmMain_Text" xml:space="preserve">
|
<data name="frmMain_Text" xml:space="preserve">
|
||||||
<value>Text</value>
|
<value>Text</value>
|
||||||
@@ -1525,8 +1519,8 @@
|
|||||||
<data name="frmSettings_cboCompression_Ultra" xml:space="preserve">
|
<data name="frmSettings_cboCompression_Ultra" xml:space="preserve">
|
||||||
<value>Ultra</value>
|
<value>Ultra</value>
|
||||||
</data>
|
</data>
|
||||||
<data name="frmSettings_grp7z" xml:space="preserve">
|
<data name="frmSettings_grp7zGeneral" xml:space="preserve">
|
||||||
<value>7z Options</value>
|
<value>General</value>
|
||||||
</data>
|
</data>
|
||||||
<data name="frmSettings_lblCompression" xml:space="preserve">
|
<data name="frmSettings_lblCompression" xml:space="preserve">
|
||||||
<value>Compression:</value>
|
<value>Compression:</value>
|
||||||
@@ -1558,9 +1552,6 @@
|
|||||||
<data name="App_ErrorUnixNotAvailable" xml:space="preserve">
|
<data name="App_ErrorUnixNotAvailable" xml:space="preserve">
|
||||||
<value>This function is currently not available on a Unix based operating system.</value>
|
<value>This function is currently not available on a Unix based operating system.</value>
|
||||||
</data>
|
</data>
|
||||||
<data name="frmGameManager_ConfirmUnixImportWarning" xml:space="preserve">
|
|
||||||
<value>You appear to be using a Unix based operating system. The official list currently contains only Microsoft Windows game configurations.[BR][BR]Do you wish to continue?</value>
|
|
||||||
</data>
|
|
||||||
<data name="frmMain_PNGFilter" xml:space="preserve">
|
<data name="frmMain_PNGFilter" xml:space="preserve">
|
||||||
<value>PNG files (*.png)|*.png</value>
|
<value>PNG files (*.png)|*.png</value>
|
||||||
</data>
|
</data>
|
||||||
@@ -1597,4 +1588,148 @@
|
|||||||
<data name="frmFileFolderSearch_SearchCancel" xml:space="preserve">
|
<data name="frmFileFolderSearch_SearchCancel" xml:space="preserve">
|
||||||
<value>Search Aborted!</value>
|
<value>Search Aborted!</value>
|
||||||
</data>
|
</data>
|
||||||
|
<data name="frmSettings_btnDefaults" xml:space="preserve">
|
||||||
|
<value>Set &Defaults</value>
|
||||||
|
</data>
|
||||||
|
<data name="frmSettings_lblArguments" xml:space="preserve">
|
||||||
|
<value>Custom Arguments:</value>
|
||||||
|
</data>
|
||||||
|
<data name="frmSettings_lblLocation" xml:space="preserve">
|
||||||
|
<value>Custom Location:</value>
|
||||||
|
</data>
|
||||||
|
<data name="frmSettings_7zaFileType" xml:space="preserve">
|
||||||
|
<value>Executable</value>
|
||||||
|
</data>
|
||||||
|
<data name="frmSettings_Browse7za" xml:space="preserve">
|
||||||
|
<value>Locate 7-Zip Console (7za)</value>
|
||||||
|
</data>
|
||||||
|
<data name="frmSettings_WarningArguments" xml:space="preserve">
|
||||||
|
<value>Invalid or poorly formatted 7-Zip arguments can cause backup or restore operations to fail.[BR][BR]If problems occur, clear the custom arguments and try again.</value>
|
||||||
|
</data>
|
||||||
|
<data name="frmMain_Error7zCustom" xml:space="preserve">
|
||||||
|
<value>The custom 7-Zip utility could not be found at:[BR][BR][PARAM][BR][BR]Please check your settings, the default 7-Zip utility will be used.</value>
|
||||||
|
</data>
|
||||||
|
<data name="frmSettings_ConfirmDefaults" xml:space="preserve">
|
||||||
|
<value>Do you want to revert all settings to their defaults?</value>
|
||||||
|
</data>
|
||||||
|
<data name="frmSettings_ErrorLocation" xml:space="preserve">
|
||||||
|
<value>The custom 7-Zip location [PARAM] does not exist.</value>
|
||||||
|
</data>
|
||||||
|
<data name="frmSettings_WarningLocation" xml:space="preserve">
|
||||||
|
<value>You have chosen a custom utility that does not appear to be 7-Zip. [BR][BR]GBM only supports the use of 7-Zip Console (7za).</value>
|
||||||
|
</data>
|
||||||
|
<data name="App_Invalid7zDetected" xml:space="preserve">
|
||||||
|
<value>7-Zip (7za.exe) is invalid and has been prevented from running.</value>
|
||||||
|
</data>
|
||||||
|
<data name="frmGameManager_lblQuickFilter" xml:space="preserve">
|
||||||
|
<value>Quick Filter:</value>
|
||||||
|
</data>
|
||||||
|
<data name="frmGameManager_ErrorNoValidBackup" xml:space="preserve">
|
||||||
|
<value>A backup cannot be run on the selected game(s) with their current configuration.</value>
|
||||||
|
</data>
|
||||||
|
<data name="frmSettings_btnOptionalFields" xml:space="preserve">
|
||||||
|
<value>Choose &Optional Fields...</value>
|
||||||
|
</data>
|
||||||
|
<data name="frmSyncFields_btnCancel" xml:space="preserve">
|
||||||
|
<value>&Cancel</value>
|
||||||
|
</data>
|
||||||
|
<data name="frmSyncFields_btnSave" xml:space="preserve">
|
||||||
|
<value>&Save</value>
|
||||||
|
</data>
|
||||||
|
<data name="frmSyncFields_chkCompany" xml:space="preserve">
|
||||||
|
<value>Company</value>
|
||||||
|
</data>
|
||||||
|
<data name="frmSyncFields_chkGamePath" xml:space="preserve">
|
||||||
|
<value>Game Path (Not Recommended)</value>
|
||||||
|
</data>
|
||||||
|
<data name="frmSyncFields_chkIcon" xml:space="preserve">
|
||||||
|
<value>Icon (Not Recommended)</value>
|
||||||
|
</data>
|
||||||
|
<data name="frmSyncFields_chkMonitorGame" xml:space="preserve">
|
||||||
|
<value>Monitor this game</value>
|
||||||
|
</data>
|
||||||
|
<data name="frmSyncFields_chkTimeStamp" xml:space="preserve">
|
||||||
|
<value>Save multiple backups</value>
|
||||||
|
</data>
|
||||||
|
<data name="frmSyncFields_chkVersion" xml:space="preserve">
|
||||||
|
<value>Version</value>
|
||||||
|
</data>
|
||||||
|
<data name="frmSyncFields_FormName" xml:space="preserve">
|
||||||
|
<value>Optional Sync Fields</value>
|
||||||
|
</data>
|
||||||
|
<data name="frmSyncFields_grpFields" xml:space="preserve">
|
||||||
|
<value>Available Fields</value>
|
||||||
|
</data>
|
||||||
|
<data name="frmMain_LogAutoClear" xml:space="preserve">
|
||||||
|
<value>The session log reached maximum length and has been cleared.</value>
|
||||||
|
</data>
|
||||||
|
<data name="frmSettings_chkAutoSaveLog" xml:space="preserve">
|
||||||
|
<value>Autosave log when max length is exceeded</value>
|
||||||
|
</data>
|
||||||
|
<data name="frmSettings_grpGameData" xml:space="preserve">
|
||||||
|
<value>Game Data</value>
|
||||||
|
</data>
|
||||||
|
<data name="frmSettings_lstSettings_7z" xml:space="preserve">
|
||||||
|
<value>7-Zip</value>
|
||||||
|
</data>
|
||||||
|
<data name="frmSettings_lstSettings_BackupRestore" xml:space="preserve">
|
||||||
|
<value>Backup and Restore</value>
|
||||||
|
</data>
|
||||||
|
<data name="frmSettings_lstSettings_General" xml:space="preserve">
|
||||||
|
<value>General</value>
|
||||||
|
</data>
|
||||||
|
<data name="frmSettings_grp7zAdvanced" xml:space="preserve">
|
||||||
|
<value>Advanced</value>
|
||||||
|
</data>
|
||||||
|
<data name="frmSettings_grp7zInformation" xml:space="preserve">
|
||||||
|
<value>Version Information</value>
|
||||||
|
</data>
|
||||||
|
<data name="App_NotAvailable" xml:space="preserve">
|
||||||
|
<value>N/A</value>
|
||||||
|
</data>
|
||||||
|
<data name="App_URLImportLinux" xml:space="preserve">
|
||||||
|
<value>http://mikemaximus.github.io/gbm-web/GBM_Official_Linux.xml</value>
|
||||||
|
</data>
|
||||||
|
<data name="frmGameManager_BrowseBackup" xml:space="preserve">
|
||||||
|
<value>Choose a new [PARAM] backup file</value>
|
||||||
|
</data>
|
||||||
|
<data name="frmGameManager_BrowseBackupType" xml:space="preserve">
|
||||||
|
<value>7-Zip</value>
|
||||||
|
</data>
|
||||||
|
<data name="frmGameManager_btnChangeBackup" xml:space="preserve">
|
||||||
|
<value>&Change Backup File</value>
|
||||||
|
</data>
|
||||||
|
<data name="frmGameManager_ConfirmBackupChange" xml:space="preserve">
|
||||||
|
<value>[PARAM] will be the new backup file for [PARAM].[BR][BR]Is this correct?</value>
|
||||||
|
</data>
|
||||||
|
<data name="frmGameManager_ConfirmBackupChangeRestore" xml:space="preserve">
|
||||||
|
<value>Do you want to restore [PARAM] now?</value>
|
||||||
|
</data>
|
||||||
|
<data name="frmGameManager_ErrorBackupChangeFileName" xml:space="preserve">
|
||||||
|
<value>[PARAM] is already the current backup file.</value>
|
||||||
|
</data>
|
||||||
|
<data name="frmGameManager_ErrorBackupChangePath" xml:space="preserve">
|
||||||
|
<value>You cannot choose a file located outside the current [PARAM] backup folder.</value>
|
||||||
|
</data>
|
||||||
|
<data name="frmGameManager_lblLimit" xml:space="preserve">
|
||||||
|
<value>Backup Limit</value>
|
||||||
|
</data>
|
||||||
|
<data name="mgrBackup_BackupLimitExceeded" xml:space="preserve">
|
||||||
|
<value>[PARAM] was automatically removed.</value>
|
||||||
|
</data>
|
||||||
|
<data name="frmGameManager_cmsDeleteAll" xml:space="preserve">
|
||||||
|
<value>&All Files</value>
|
||||||
|
</data>
|
||||||
|
<data name="frmGameManager_cmsDeleteOne" xml:space="preserve">
|
||||||
|
<value>&Selected File</value>
|
||||||
|
</data>
|
||||||
|
<data name="frmGameManager_ConfirmBackupDeleteAll" xml:space="preserve">
|
||||||
|
<value>This will delete all backup files for [PARAM]. This cannot be undone. [BR][BR]Do you want to continue?</value>
|
||||||
|
</data>
|
||||||
|
<data name="frmAddWizard_lblLimit" xml:space="preserve">
|
||||||
|
<value>Backup Limit</value>
|
||||||
|
</data>
|
||||||
|
<data name="frmGameManager_Unknown" xml:space="preserve">
|
||||||
|
<value>Unknown</value>
|
||||||
|
</data>
|
||||||
</root>
|
</root>
|
||||||
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
+19
-35
@@ -1,49 +1,33 @@
|
|||||||
Game Backup Monitor v0.96 Readme
|
Game Backup Monitor v0.98 Readme
|
||||||
http://mikemaximus.github.io/gbm-web/
|
http://mikemaximus.github.io/gbm-web/
|
||||||
gamebackupmonitor@gmail.com
|
gamebackupmonitor@gmail.com
|
||||||
|
|
||||||
March 24, 2016
|
September 1, 2016
|
||||||
|
|
||||||
Disclaimer:
|
Disclaimer:
|
||||||
|
|
||||||
This is beta release software. You may still encounter some bugs.
|
This is beta release software. You may still encounter some bugs.
|
||||||
|
|
||||||
New in 0.96
|
New in 0.98
|
||||||
|
|
||||||
For more information regarding Linux support read the FAQ at http://mikemaximus.github.io/gbm-web/linux.html
|
- (All) Redesigned GBM's ability to manage multiple backups per game.
|
||||||
|
- The "Timestamp each backup" option has been renamed "Save multiple backups".
|
||||||
- (All) Modified backup and restore logic for better usability when doing batch operations and to fix Mono related issues.
|
- You can limit the amount of backups you keep for each game by setting a limit (2 to 100).
|
||||||
- (All) Overhauled the Search screen for better usability and to fix Mono related issues.
|
- GBM will keep your backup folder clean by automatically deleting old backups as limits are reached or modified.
|
||||||
- (All) Overhauled the Import screen for better usability. Added game tags, simple filtering, sorting and general fixes.
|
- The Game Manager now allows you to browse and manage ALL backups for each game, not just the latest backup.
|
||||||
- (Linux) Fixed some bad code causing the "Official Import" connection to time out when making multiple connections in the same session.
|
- (All) Using "Monitor Only" no longer puts anys limitations on the game configuration or available features.
|
||||||
- (Linux) Fixed cross-platform issues with opening backup files and restore locations from the Game Manager.
|
- (Windows Installer) The installer will now properly go into upgrade mode if a prior version of GBM is installed. Note: 32-bit and 64-bit qualify as different versions.
|
||||||
- (All) Backup files opened from the Game Manager will now open directly in the app they are associated with, like 7-Zip GUI or File Roller.
|
- (Windows Installer) The installer will now create an uninstall entry in Add/Remove Programs (Apps & Features).
|
||||||
- (Linux) Fixed cross-platform issues with automatic file/folder searching. It's now enabled on Linux.
|
- (Linux) 64-bit games running in Wine will now be properly detected.
|
||||||
- (All) GBM now restores saved games to the currently configured saved game path by default. The stored manfiest location is only used when there's no configuration for the game.
|
- (Linux) Add Game Wizard will no longer remove all extensions when selecting an executable.
|
||||||
- (Linux) Added Linux support via Mono!
|
- (Linux) GBM now prefers to use an absolute path when creating Linux game configurations.
|
||||||
- (All) Replaced System.Data.SQLite with the Mono.Data.Sqlite for cross-platform support.
|
|
||||||
- (Windows) Updated GBM's version of 7-Zip to 15.14 (2015-12-31)
|
|
||||||
- (All) Added the ability to set the 7-Zip compression level on the Settings screen.
|
|
||||||
- (Windows) GBM now deletes all user files to the Windows recycle bin by default.
|
|
||||||
- (All) Added the ability to clear and save the session log from the Tools menu.
|
|
||||||
- (All) GBM now auto-saves and clears the session log to %localappdata%\gbm if it reaches it's limit (2 MB).
|
|
||||||
- (All) The file size will be displayed in the session log after each backup.
|
|
||||||
|
|
||||||
The entire version history of GBM releases is available at http://mikemaximus.github.io/gbm-web/versionhistory.html
|
|
||||||
|
|
||||||
Important Upgrade Information:
|
Important Upgrade Information:
|
||||||
|
|
||||||
If you've used a pre-release of v0.96, you may experience the following error message after installing this version.
|
- The v0.98 Game Manager will not detect old backup files made using the "Timestamp each backup" setting in prior versions.
|
||||||
|
- Configurations using the "Timestamp each backup" option will have "Save multiple backups" automatically enabled with a backup limit of 5.
|
||||||
|
- If "Timestamp each backup" is currently set to sync, then "Save multiple backups" will also be set to sync after upgrading.
|
||||||
|
|
||||||
Column 'CompressionLevel' does not belong to table Table.
|
For more information regarding Linux support read the FAQ at http://mikemaximus.github.io/gbm-web/linux.html
|
||||||
|
|
||||||
If you get this error follow these steps:
|
The entire version history of GBM releases is available at http://mikemaximus.github.io/gbm-web/versionhistory.html
|
||||||
|
|
||||||
1. Start GBM and click "Yes" to continue past the error.
|
|
||||||
2. Press CTRL and ~ (Tilde) to open the Developer Console.
|
|
||||||
3. Enter the command exactly as follows (or copy & paste it) then click OK.
|
|
||||||
|
|
||||||
SQL Local PRAGMA user_version=95
|
|
||||||
|
|
||||||
4. You'll receive confirmation that the command was executed. Click OK and immediately close GBM via the File menu.
|
|
||||||
5. Restart GBM and the error will no longer appear!
|
|
||||||
Reference in New Issue
Block a user