dunestorm/GBM
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Fixed some database upgrade issues

Browse Source
This commit is contained in:
Michael J. Seiferling
2018-03-15 16:08:51 -06:00
parent 251ea3b060
commit 189976e892
1 changed files with 12 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files
GBM/Managers/mgrSQLite.vb
+12 -6
View File
@@ -808,6 +808,16 @@ Public Class mgrSQLite
sSQL &= "PRAGMA user_version=110" sSQL &= "PRAGMA user_version=110"
RunParamQuery(sSQL, New Hashtable) RunParamQuery(sSQL, New Hashtable)
CompactDatabase()
'We need to push the local game list against the remote database in case they had syncing disabled
Dim hshMonitorList As Hashtable = mgrMonitorList.ReadList(mgrMonitorList.eListTypes.FullList, mgrSQLite.Database.Local)
Dim oSettings As New mgrSettings
oSettings.LoadSettings()
mgrMonitorList.DoListAddUpdateSync(hshMonitorList, Database.Remote, oSettings.SyncFields)
mgrTags.SyncTags(True)
mgrGameTags.SyncGameTags(True)
End If End If
If eDatabase = Database.Remote Then If eDatabase = Database.Remote Then
'Backup DB before starting 'Backup DB before starting
@@ -824,12 +834,6 @@ Public Class mgrSQLite
"ProcessPath, Icon, Hours, Version, Company, Enabled, MonitorOnly, BackupLimit, CleanFolder, Parameter, Comments, IsRegEx FROM monitorlist;" & "ProcessPath, Icon, Hours, Version, Company, Enabled, MonitorOnly, BackupLimit, CleanFolder, Parameter, Comments, IsRegEx FROM monitorlist;" &
"DROP TABLE monitorlist; ALTER TABLE monitorlist_new RENAME TO monitorlist;" "DROP TABLE monitorlist; ALTER TABLE monitorlist_new RENAME TO monitorlist;"
'We need to push the local database game list against the remote database in case they had syncing disabled
Dim hshMonitorList As Hashtable = mgrMonitorList.ReadList(mgrMonitorList.eListTypes.FullList, mgrSQLite.Database.Local)
Dim oSettings As New mgrSettings
oSettings.LoadSettings()
mgrMonitorList.DoListAddUpdateSync(hshMonitorList, Database.Remote, oSettings.SyncFields)
sSQL &= "CREATE TABLE manifest_new (ManifestID TEXT NOT NULL PRIMARY KEY, MonitorID TEXT NOT NULL, FileName TEXT NOT NULL, " & sSQL &= "CREATE TABLE manifest_new (ManifestID TEXT NOT NULL PRIMARY KEY, MonitorID TEXT NOT NULL, FileName TEXT NOT NULL, " &
"DateUpdated TEXT NOT NULL, UpdatedBy TEXT NOT NULL, CheckSum TEXT);" "DateUpdated TEXT NOT NULL, UpdatedBy TEXT NOT NULL, CheckSum TEXT);"
sSQL &= "INSERT INTO manifest_new (ManifestID, MonitorID, FileName, DateUpdated, UpdatedBy, CheckSum) " & sSQL &= "INSERT INTO manifest_new (ManifestID, MonitorID, FileName, DateUpdated, UpdatedBy, CheckSum) " &
@@ -839,6 +843,8 @@ Public Class mgrSQLite
sSQL &= "PRAGMA user_version=110" sSQL &= "PRAGMA user_version=110"
RunParamQuery(sSQL, New Hashtable) RunParamQuery(sSQL, New Hashtable)
CompactDatabase()
End If End If
End If End If
End Sub End Sub