diff --git a/GBM/Classes/clsGame.vb b/GBM/Classes/clsGame.vb index d4ba291..5355877 100644 --- a/GBM/Classes/clsGame.vb +++ b/GBM/Classes/clsGame.vb @@ -228,6 +228,10 @@ If oGame Is Nothing Then Return False Else + If ID <> oGame.ID Then + Return False + End If + If Name <> oGame.Name Then Return False End If diff --git a/GBM/Managers/mgrMonitorList.vb b/GBM/Managers/mgrMonitorList.vb index bd39054..af29e14 100644 --- a/GBM/Managers/mgrMonitorList.vb +++ b/GBM/Managers/mgrMonitorList.vb @@ -60,7 +60,7 @@ Public Class mgrMonitorList Dim oParamList As New List(Of Hashtable) sSQL = "INSERT OR REPLACE INTO monitorlist (MonitorID, Name, Process, Path, AbsolutePath, FolderSave, FileType, TimeStamp, ExcludeList, Hours, Enabled, MonitorOnly) " - sSQL &= "VALUES (COALESCE((SELECT MonitorID FROM monitorlist WHERE Name = @Name AND Process = @Process), @ID), @Name, @Process, @Path, @AbsolutePath, @FolderSave, @FileType, " + sSQL &= "VALUES (@ID, @Name, @Process, @Path, @AbsolutePath, @FolderSave, @FileType, " sSQL &= "@TimeStamp, @ExcludeList, @Hours, @Enabled, @MonitorOnly);" For Each oGame As clsGame In hshGames.Values