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

jj

Browse Source
This commit is contained in:
Jonathan Jenne
2019-08-09 17:12:34 +02:00
parent ee2cacb6cd
commit 16a6febb34
21 changed files with 531 additions and 402 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
app/DD_Clipboard_Searcher/ctrlApplicationAssignment.vb
View File

@@ -178,9 +178,12 @@ Public Class ctrlApplicationAssignment
Try
Dim oControlTitle As String = GetSQLFriendlyString(oForm.ControlName)
Dim oProcessName As String = oForm.ProcessName
Dim oAutomationId As String = oForm.AutomationId
Dim oFrameworkId As String = oForm.FrameworkId
Dim oDefaultRegex As String = "\.+"
If oControlTitle <> "" Then
Dim insert = String.Format("INSERT INTO TBCW_PROF_REL_CONTROL (PROFILE_ID, DESCRIPTION, PROCESS_NAME, REGEX, WINDOW_ID, ADDED_WHO) VALUES ({0}, '{1}', '{2}','^{3}$',{4},'{5}')", ProfileId, Current_ProcessName, Current_ProcessName, oControlTitle, Current_WindowId, Environment.UserName)
If oControlTitle <> "" Or oAutomationId <> "" Then
Dim insert = String.Format("INSERT INTO TBCW_PROF_REL_CONTROL (PROFILE_ID, DESCRIPTION, AUTOMATION_ID, FRAMEWORK_ID, PROCESS_NAME, REGEX, WINDOW_ID, ADDED_WHO) VALUES ({0}, '{1}', '{2}', '{3}', '{4}','^{5}$',{6},'{7}')", ProfileId, oControlTitle, oAutomationId, oFrameworkId, Current_ProcessName, oDefaultRegex, Current_WindowId, Environment.UserName)
If Database.ExecuteNonQuery(insert) = False Then
Return False
End If