AppStd/ClipboardWatcher
8
1
Fork 0
Code Issues Pull Requests Releases Wiki Activity

fix dataset for window assignments

Browse Source
This commit is contained in:
Jonathan Jenne
2019-09-02 11:57:25 +02:00
parent b6508ba650
commit 22f8cf121a
5 changed files with 350 additions and 126 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
app/DD_Clipboard_Searcher/ctrlApplicationAssignment.vb
View File

@@ -55,7 +55,9 @@ Public Class ctrlApplicationAssignment
If Database.ExecuteNonQuery(oSQL) = False Then
Return False
Else
oSQL = String.Format("INSERT INTO TBCW_PROF_REL_WINDOW (DESCRIPTION, REGEX, ADDED_WHO,PROCESS_ID) VALUES ('{0}', '^{1}$','{3}',{4})", oWindowTitle, oWindowTitle, Environment.UserName, CURRENT_PROCESSID)
Dim oNewProcessId = Database.GetScalarValue("SELECT MAX(GUID) FROM TBCW_PROFILE_PROCESS")
oSQL = String.Format("INSERT INTO TBCW_PROF_REL_WINDOW (DESCRIPTION, REGEX, ADDED_WHO, PROCESS_ID) VALUES ('{0}', '^{1}$', '{2}' ,{3})", oWindowTitle, oWindowTitle, Environment.UserName, oNewProcessId)
If Database.ExecuteNonQuery(oSQL) = False Then
Return False
End If
@@ -74,7 +76,7 @@ Public Class ctrlApplicationAssignment
Public Function Process_DeleteAssignment() As Boolean
Try
Dim oProcessId = GridViewProcessProfile.GetFocusedRowCellValue(GridViewProcessProfile.Columns("GUID"))
Dim oSQL = String.Format("EXEC PRCW_DELETE_PROCESS {0},{1}", oProcessId, Current_ProfileId)
Dim oSQL = String.Format("EXEC PRCW_DELETE_PROCESS {0}", oProcessId)
If Database.ExecuteNonQuery(oSQL) Then
Process_Load(Current_ProfileId)
Return True
@@ -161,8 +163,6 @@ Public Class ctrlApplicationAssignment
TBCW_PROF_REL_WINDOWTableAdapter.Update(MyDataset.TBCW_PROF_REL_WINDOW)
Return True
End If
Catch ex As Exception
Logger.Error(ex)
Return False