VersionRelease
This commit is contained in:
Digital Data - Marlon Schreiber
parent
a4086de11b
commit
c7731cbb6d
@ -81,7 +81,10 @@ Public Class ClassHotkey
|
||||
|
||||
Private Function PreFilterMessage(ByRef m As Message) As Boolean Implements IMessageFilter.PreFilterMessage
|
||||
If m.Msg = WM_HOTKEY Then
|
||||
RaiseEvent HotKeyPressed(_HotkeyList(CShort(m.WParam)).HotKeyID)
|
||||
If CURRENT_CLIPBOARD_CONTENTS IsNot Nothing Then
|
||||
RaiseEvent HotKeyPressed(_HotkeyList(CShort(m.WParam)).HotKeyID)
|
||||
End If
|
||||
|
||||
End If
|
||||
End Function
|
||||
|
||||
|
||||
@ -95,7 +95,42 @@ Public Class ClassInit
|
||||
Return EncryptedConnectionString
|
||||
End If
|
||||
End Function
|
||||
Public Shared Function CheckModuleData()
|
||||
Dim sql = String.Format("SELECT * FROM [dbo].[FNDD_CHECK_USER_MODULE] ('{0}','CW',{1})", USER_USERNAME, CLIENT_SELECTED)
|
||||
Dim DT_CHECKUSER_MODULE As DataTable = Database.GetDatatable(sql)
|
||||
If DT_CHECKUSER_MODULE.Rows.Count = 0 Then
|
||||
Logger.Info("DT_CHECKUSER_MODULE.Rows.Count = 0", True)
|
||||
'ERROR_STATE = "NO USER"
|
||||
MsgBox("Sorry - Something went wrong in getting Your rights." & vbNewLine & "Please contact the system administrator!", MsgBoxStyle.Exclamation)
|
||||
Return False
|
||||
End If
|
||||
If DT_CHECKUSER_MODULE.Rows.Count = 1 Then
|
||||
Logger.Info(">> Login Username: " & USER_USERNAME, False)
|
||||
Logger.Info(">> Login time: " & Now.ToString, False)
|
||||
USER_ID = DT_CHECKUSER_MODULE.Rows(0).Item("USER_ID")
|
||||
USER_SURNAME = IIf(IsDBNull(DT_CHECKUSER_MODULE.Rows(0).Item("USER_SURNAME")), "", DT_CHECKUSER_MODULE.Rows(0).Item("USER_SURNAME"))
|
||||
USER_PRENAME = IIf(IsDBNull(DT_CHECKUSER_MODULE.Rows(0).Item("USER_PRENAME")), "", DT_CHECKUSER_MODULE.Rows(0).Item("USER_PRENAME"))
|
||||
USER_SHORTNAME = IIf(IsDBNull(DT_CHECKUSER_MODULE.Rows(0).Item("USER_SHORTNAME")), "", DT_CHECKUSER_MODULE.Rows(0).Item("USER_SHORTNAME"))
|
||||
USER_EMAIL = IIf(IsDBNull(DT_CHECKUSER_MODULE.Rows(0).Item("USER_EMAIL")), "", DT_CHECKUSER_MODULE.Rows(0).Item("USER_EMAIL"))
|
||||
USER_LANGUAGE = DT_CHECKUSER_MODULE.Rows(0).Item("USER_LANGUAGE")
|
||||
USER_DATE_FORMAT = DT_CHECKUSER_MODULE.Rows(0).Item("USER_DATE_FORMAT")
|
||||
|
||||
USER_IN_MODULE = DT_CHECKUSER_MODULE.Rows(0).Item("MODULE_ACCESS")
|
||||
USER_IS_ADMIN = DT_CHECKUSER_MODULE.Rows(0).Item("IS_ADMIN")
|
||||
|
||||
|
||||
USERCOUNT_LOGGED_IN = DT_CHECKUSER_MODULE.Rows(0).Item("USERCOUNT_LOGGED_IN")
|
||||
USERCOUNT_LOGGED_IN += 1
|
||||
Return True
|
||||
Else
|
||||
Logger.Info(" - User '" & USER_USERNAME & "' not listed in Useradministration!", False)
|
||||
'MsgBox("Achtung: Sie sind nicht in der Userverwaltung hinterlegt." & vbNewLine & "Bitte setzen Sie sich mit dem Systembetreuer in Verbindung!", MsgBoxStyle.Critical, "Achtung:")
|
||||
'Me.Close()
|
||||
Dim msg = String.Format("You are not listed in the Useradministration." & vbNewLine & "Please contact the admin.")
|
||||
MsgBox(msg, MsgBoxStyle.Exclamation)
|
||||
Return False
|
||||
End If
|
||||
End Function
|
||||
Public Shared Function InitUserLogin(Optional _User As String = "")
|
||||
Try
|
||||
If _User = "" Then
|
||||
@ -120,41 +155,10 @@ Public Class ClassInit
|
||||
CLIENT_SELECTED = 1
|
||||
End Try
|
||||
|
||||
'ClassLogger.Add(">> Username: " & USER_USERNAME, False)
|
||||
Dim sql = String.Format("SELECT * FROM [dbo].[FNDD_CHECK_USER_MODULE] ('{0}','CW',{1})", USER_USERNAME, CLIENT_SELECTED)
|
||||
Dim DT_CHECKUSER_MODULE As DataTable = Database.GetDatatable(sql)
|
||||
If DT_CHECKUSER_MODULE.Rows.Count = 0 Then
|
||||
Logger.Info("DT_CHECKUSER_MODULE.Rows.Count = 0", True)
|
||||
'ERROR_STATE = "NO USER"
|
||||
MsgBox("Sorry - Something went wrong in getting Your rights." & vbNewLine & "Please contact the system administrator!", MsgBoxStyle.Exclamation)
|
||||
If CheckModuleData() = False Then
|
||||
Return False
|
||||
End If
|
||||
If DT_CHECKUSER_MODULE.Rows.Count = 1 Then
|
||||
Logger.Info(">> Login Username: " & USER_USERNAME, False)
|
||||
Logger.Info(">> Login time: " & Now.ToString, False)
|
||||
USER_ID = DT_CHECKUSER_MODULE.Rows(0).Item("USER_ID")
|
||||
USER_SURNAME = IIf(IsDBNull(DT_CHECKUSER_MODULE.Rows(0).Item("USER_SURNAME")), "", DT_CHECKUSER_MODULE.Rows(0).Item("USER_SURNAME"))
|
||||
USER_PRENAME = IIf(IsDBNull(DT_CHECKUSER_MODULE.Rows(0).Item("USER_PRENAME")), "", DT_CHECKUSER_MODULE.Rows(0).Item("USER_PRENAME"))
|
||||
USER_SHORTNAME = IIf(IsDBNull(DT_CHECKUSER_MODULE.Rows(0).Item("USER_SHORTNAME")), "", DT_CHECKUSER_MODULE.Rows(0).Item("USER_SHORTNAME"))
|
||||
USER_EMAIL = IIf(IsDBNull(DT_CHECKUSER_MODULE.Rows(0).Item("USER_EMAIL")), "", DT_CHECKUSER_MODULE.Rows(0).Item("USER_EMAIL"))
|
||||
USER_LANGUAGE = DT_CHECKUSER_MODULE.Rows(0).Item("USER_LANGUAGE")
|
||||
USER_DATE_FORMAT = DT_CHECKUSER_MODULE.Rows(0).Item("USER_DATE_FORMAT")
|
||||
|
||||
USER_IN_MODULE = DT_CHECKUSER_MODULE.Rows(0).Item("MODULE_ACCESS")
|
||||
USER_IS_ADMIN = DT_CHECKUSER_MODULE.Rows(0).Item("IS_ADMIN")
|
||||
|
||||
|
||||
USERCOUNT_LOGGED_IN = DT_CHECKUSER_MODULE.Rows(0).Item("USERCOUNT_LOGGED_IN")
|
||||
|
||||
|
||||
Else
|
||||
Logger.Info(" - User '" & USER_USERNAME & "' not listed in Useradministration!", False)
|
||||
'MsgBox("Achtung: Sie sind nicht in der Userverwaltung hinterlegt." & vbNewLine & "Bitte setzen Sie sich mit dem Systembetreuer in Verbindung!", MsgBoxStyle.Critical, "Achtung:")
|
||||
'Me.Close()
|
||||
Dim msg = String.Format("You are not listed in the Useradministration." & vbNewLine & "Please contact the admin.")
|
||||
MsgBox(msg, MsgBoxStyle.Exclamation)
|
||||
Return False
|
||||
End If
|
||||
|
||||
If USER_IN_MODULE = False Then
|
||||
If USER_IS_ADMIN = False Then
|
||||
@ -173,11 +177,12 @@ Public Class ClassInit
|
||||
'Am System anmelden
|
||||
' sql = String.Format("UPDATE TBDD_USER SET LOGGED_IN = 1, LOGGED_WHERE = '{0}' WHERE GUID = {1}", Environment.MachineName, USER_ID)
|
||||
'Database.GetDatatable(sql)
|
||||
sql = "DELETE FROM TBDD_USER_MODULE_LOG_IN WHERE USER_ID = " & USER_ID & " AND MODULE = 'Clipboard-Watcher'"
|
||||
Database.ExecuteNonQuery(sql)
|
||||
Dim oSQL As String
|
||||
oSQL = "DELETE FROM TBDD_USER_MODULE_LOG_IN WHERE USER_ID = " & USER_ID & " AND MODULE = 'Clipboard-Watcher'"
|
||||
Database.ExecuteNonQuery(oSQL)
|
||||
|
||||
sql = String.Format("INSERT INTO TBDD_USER_MODULE_LOG_IN (USER_ID,CLIENT_ID,MODULE,VERSION_CLIENT,MACHINE_NAME) VALUES ({0},{1},'Clipboard-Watcher','{2}','{3}')", USER_ID, 0, My.Application.Info.Version.ToString, Environment.MachineName)
|
||||
Database.ExecuteNonQuery(sql)
|
||||
oSQL = String.Format("INSERT INTO TBDD_USER_MODULE_LOG_IN (USER_ID,CLIENT_ID,MODULE,VERSION_CLIENT,MACHINE_NAME) VALUES ({0},{1},'Clipboard-Watcher','{2}','{3}')", USER_ID, 0, My.Application.Info.Version.ToString, Environment.MachineName)
|
||||
Database.ExecuteNonQuery(oSQL)
|
||||
|
||||
If USER_IS_ADMIN = True Then
|
||||
If ESC_Hidden = True Then
|
||||
@ -207,8 +212,8 @@ Public Class ClassInit
|
||||
Logger.Info(" >> The number of logged Users (" & USERCOUNT_LOGGED_IN.ToString & ") exceeds the number of licenses (" & LICENSE_COUNT & ") ", False)
|
||||
If USER_IS_ADMIN = False Then
|
||||
'Anmeldung wieder herausnehmen
|
||||
sql = "DELETE FROM TBDD_USER_MODULE_LOG_IN WHERE USER_ID = " & USER_ID & " AND MODULE= 'Clipboard-Watcher'"
|
||||
Database.ExecuteNonQuery(sql)
|
||||
oSQL = "DELETE FROM TBDD_USER_MODULE_LOG_IN WHERE USER_ID = " & USER_ID & " AND MODULE= 'Clipboard-Watcher'"
|
||||
Database.ExecuteNonQuery(oSQL)
|
||||
Logger.Info(" - logged out the user", False)
|
||||
Return False
|
||||
End If
|
||||
@ -241,11 +246,14 @@ Public Class ClassInit
|
||||
|
||||
Public Shared Sub Refresh_Profile_Links()
|
||||
Try
|
||||
Dim oSql = String.Format("SELECT * FROM VWCW_USER_PROFILE WHERE ACTIVE = 1 AND USER_ID = {0} OR GROUP_ID IN (SELECT DISTINCT GUID FROM TBDD_GROUPS WHERE GUID IN (SELECT GROUP_ID FROM TBDD_GROUPS_USER WHERE USER_ID = {0}))", USER_ID)
|
||||
Dim oSql = String.Format("SELECT DISTINCT GUID, NAME,REGEX_EXPRESSION,COMMENT,PROC_NAME,PROFILE_TYPE FROM VWCW_USER_PROFILE WHERE ACTIVE = 1 AND USER_ID = {0} OR GROUP_ID IN (SELECT DISTINCT GUID FROM TBDD_GROUPS WHERE GUID IN (SELECT GROUP_ID FROM TBDD_GROUPS_USER WHERE USER_ID = {0}))", USER_ID)
|
||||
DT_USER_PROFILES = Database.GetDatatable(oSql)
|
||||
If DT_USER_PROFILES.Rows.Count = 0 Then
|
||||
MsgBox("No profiles configured for this user so far!", MsgBoxStyle.Exclamation)
|
||||
Else
|
||||
oSql = $"SELECT T.* FROM TBCW_PROFILE_PROCESS T, VWPM_PROFILE_USER T1 WHERE T.PROFILE_ID = T1.PROFIL_ID AND T1.USER_ID = {USER_ID}"
|
||||
DTPROFILE_REL_PROCESS = Database.GetDatatable(oSql)
|
||||
|
||||
oSql = $"SELECT * FROM VWCW_PROFILE_REL_WINDOW WHERE USER_ID = {USER_ID}"
|
||||
DTPROFILE_REL_WINDOW = Database.GetDatatable(oSql)
|
||||
|
||||
|
||||
@ -1,9 +1,11 @@
|
||||
Imports System.Text.RegularExpressions
|
||||
Imports DD_Clipboard_Watcher.ClassWindowAPI
|
||||
Imports DigitalData.Modules.Language.Utils
|
||||
Imports System.Windows.Automation
|
||||
|
||||
Public Class ClassProfileFilter
|
||||
Private _ProfileTable As DataTable
|
||||
Private _ProcessTable As DataTable
|
||||
Private _WindowTable As DataTable
|
||||
Private _ControlTable As DataTable
|
||||
Private _Profiles As List(Of ProfileData)
|
||||
@ -12,32 +14,47 @@ Public Class ClassProfileFilter
|
||||
Class ProfileData
|
||||
Public Guid As Integer
|
||||
Public Regex As String
|
||||
Public ProcessName As String
|
||||
Public Name As String
|
||||
Public Comment As String
|
||||
Public ProfileType As Integer
|
||||
|
||||
Public Processes As List(Of ProcessData)
|
||||
Public Windows As List(Of WindowData)
|
||||
Public Controls As List(Of ControlData)
|
||||
|
||||
Public CountDocs As Integer = 0
|
||||
Public CountData As Integer = 0
|
||||
End Class
|
||||
Public IsMatched As Boolean = False
|
||||
Public MatchedProcessID As Integer = 0
|
||||
Public MatchedWindowID As Integer = 0
|
||||
Public MatchedControlID As Integer = 0
|
||||
Public SelectCommand As String
|
||||
|
||||
End Class
|
||||
Class ProcessData
|
||||
Public Guid As Integer
|
||||
Public PROFILE_ID As Integer
|
||||
Public ProcessName As String
|
||||
Public IsMatched As Boolean = False
|
||||
End Class
|
||||
Class WindowData
|
||||
Public Guid As Integer
|
||||
Public WindowProcessID As Integer
|
||||
Public Title As String
|
||||
Public Regex As String
|
||||
Public Sequence As Integer
|
||||
Public ClipboardRegex As String
|
||||
Public IsMatched As Boolean = False
|
||||
|
||||
End Class
|
||||
|
||||
Class ControlData
|
||||
Public Guid As Integer
|
||||
Public WINDOW_ID As Integer
|
||||
Public Description As String
|
||||
Public Regex As String
|
||||
|
||||
|
||||
Public AutomationId As String
|
||||
Public ControlName As String
|
||||
Public IsMatched As Boolean = False
|
||||
End Class
|
||||
|
||||
' TODO: Fill this Class!!!! :D
|
||||
@ -54,10 +71,11 @@ Public Class ClassProfileFilter
|
||||
End Get
|
||||
End Property
|
||||
|
||||
Public Sub New(ProfileDatatable As DataTable, WindowDatatable As DataTable, ControlDatatable As DataTable)
|
||||
Public Sub New(ProfileDatatable As DataTable, ProcessTable As DataTable, WindowDatatable As DataTable, ControlDatatable As DataTable)
|
||||
Try
|
||||
_DebugData = New DebugData()
|
||||
_ProfileTable = ProfileDatatable
|
||||
_ProcessTable = ProcessTable
|
||||
_WindowTable = WindowDatatable
|
||||
_ControlTable = ControlDatatable
|
||||
_Profiles = TransformProfiles()
|
||||
@ -76,26 +94,29 @@ Public Class ClassProfileFilter
|
||||
GroupBy(Function(p) p.Guid).
|
||||
Select(Function(p) p.FirstOrDefault())
|
||||
End Function
|
||||
|
||||
Public Function FilterProfilesByProcess(Profiles As List(Of ProfileData), CurrentProcessName As String) As List(Of ProfileData)
|
||||
Dim oFilteredProfiles As New List(Of ProfileData)
|
||||
|
||||
For Each oProfile In Profiles
|
||||
Logger.Debug("Current Profile: {0}", oProfile.Name)
|
||||
|
||||
If oProfile.ProcessName.ToLower = CurrentProcessName.ToLower Then
|
||||
Logger.Debug("Processname Matched: {0}", oProfile.ProcessName.ToLower)
|
||||
'TODO: Add Debug Data
|
||||
oFilteredProfiles.Add(oProfile)
|
||||
Private Function NodeFind(ByVal n As TreeNode, searchTerm As String)
|
||||
Dim aNode As TreeNode
|
||||
For Each aNode In n.Nodes
|
||||
If aNode.Text = searchTerm Then
|
||||
Return aNode
|
||||
End If
|
||||
Next
|
||||
|
||||
Return oFilteredProfiles
|
||||
Return n
|
||||
End Function
|
||||
Private Function GetLowestNode(ByVal n As TreeNode)
|
||||
Dim aNode As TreeNode
|
||||
If n.GetNodeCount(False) = 1 Then
|
||||
For Each aNode In n.Nodes
|
||||
Return GetLowestNode(aNode)
|
||||
Next
|
||||
Else
|
||||
Return n
|
||||
End If
|
||||
|
||||
|
||||
End Function
|
||||
Public Function FilterProfilesByClipboardRegex(Profiles As List(Of ProfileData), ClipboardContents As String) As List(Of ProfileData)
|
||||
Dim oFilteredProfiles As New List(Of ProfileData)
|
||||
|
||||
For Each oProfile In Profiles
|
||||
Logger.Debug("Current Profile: {0}", oProfile.Name)
|
||||
|
||||
@ -106,6 +127,17 @@ Public Class ClassProfileFilter
|
||||
Logger.Debug("Global Clipboard Regex Matched: {0}", ClipboardContents)
|
||||
'TODO: Add Debug Data
|
||||
oFilteredProfiles.Add(oProfile)
|
||||
oProfile.IsMatched = True
|
||||
Dim oNode As New TreeNode($"Profile: {oProfile.Name}")
|
||||
oNode.ImageIndex = 0
|
||||
Dim f = New Font("Tahoma", 9, FontStyle.Bold)
|
||||
oNode.NodeFont = f
|
||||
CurrMatchTreeView.Nodes.Add(oNode)
|
||||
Dim oSubnode As New TreeNode($"MATCH on Global Clipboard Regex: {oProfile.Regex}")
|
||||
oSubnode.ImageIndex = 1
|
||||
oSubnode.Tag = oProfile.Name & "-REGEX"
|
||||
oNode.Nodes.Add(oSubnode)
|
||||
|
||||
End If
|
||||
Catch ex As Exception
|
||||
Logger.Warn("Regex '{0}' could not be processed for input '{1}'", oProfile.Regex, ClipboardContents)
|
||||
@ -115,37 +147,106 @@ Public Class ClassProfileFilter
|
||||
|
||||
Return oFilteredProfiles
|
||||
End Function
|
||||
Public Function FilterProfilesByProcess(Profiles As List(Of ProfileData), CurrentProcessName As String) As List(Of ProfileData)
|
||||
Dim oFilteredProfiles As New List(Of ProfileData)
|
||||
Try
|
||||
For Each oProfile In Profiles
|
||||
If oProfile.IsMatched = False Then Continue For
|
||||
|
||||
|
||||
Dim oProcesses As New List(Of ProcessData)
|
||||
For Each oProcessDef As ProcessData In oProfile.Processes
|
||||
|
||||
Logger.Debug($"Checking Profile: {oProfile.Name} ...")
|
||||
If oProcessDef.ProcessName.ToLower = CurrentProcessName.ToLower Then
|
||||
Logger.Debug($"Processname Matched: {oProcessDef.ProcessName}")
|
||||
'oProfile.MATCH_PROCESSNAME = $"Processname Matched: {oProfile.ProcessName}"
|
||||
'TODO: Add Debug Data
|
||||
oFilteredProfiles.Add(oProfile)
|
||||
oProfile.MatchedProcessID = oProcessDef.Guid
|
||||
oProcessDef.IsMatched = True
|
||||
oProcesses.Add(oProcessDef)
|
||||
oProfile.IsMatched = True
|
||||
oProfile.MatchedProcessID = oProcessDef.Guid
|
||||
Dim oParentNode As TreeNode
|
||||
Dim oExit = False
|
||||
For Each oTreeNode As TreeNode In CurrMatchTreeView.Nodes
|
||||
For Each oNodes As TreeNode In oTreeNode.Nodes
|
||||
If oExit = True Then Exit For
|
||||
If oNodes.Tag = oProfile.Name & "-REGEX" Then
|
||||
oParentNode = oNodes
|
||||
oExit = True
|
||||
Exit For
|
||||
End If
|
||||
Next
|
||||
Next
|
||||
|
||||
If Not IsNothing(oParentNode) Then
|
||||
Dim oNode As New TreeNode($"MATCH on Process: {oProcessDef.ProcessName}")
|
||||
oNode.ImageIndex = 4
|
||||
oNode.Tag = oProfile.Name & "-PROCESS"
|
||||
oParentNode.Nodes.Add(oNode)
|
||||
End If
|
||||
End If
|
||||
Next
|
||||
If oFilteredProfiles.Count > 0 Then
|
||||
oProfile.Processes = oProcesses
|
||||
End If
|
||||
Next
|
||||
|
||||
Return oFilteredProfiles
|
||||
Catch ex As Exception
|
||||
Logger.Warn("Unexpected error in FilterProfilesByProcess...")
|
||||
Logger.Error(ex)
|
||||
End Try
|
||||
|
||||
End Function
|
||||
Public Function FilterWindowsByWindowTitleRegex(Profiles As List(Of ProfileData), WindowTitle As String) As List(Of ProfileData)
|
||||
Dim oProfiles As New List(Of ProfileData)
|
||||
|
||||
For Each oProfile As ProfileData In Profiles
|
||||
Logger.Debug("Current Profile: {0}", oProfile.Name)
|
||||
|
||||
Logger.Debug("Checking Profile: {0} for WindowDefinition...", oProfile.Name)
|
||||
If oProfile.IsMatched = False Then Continue For
|
||||
Dim oWindows As New List(Of WindowData)
|
||||
|
||||
For Each w As WindowData In oProfile.Windows
|
||||
For Each oWindowDef As WindowData In oProfile.Windows
|
||||
If oWindowDef.WindowProcessID <> oProfile.MatchedProcessID Then Continue For
|
||||
Logger.Debug($"Checking Windowdefinition: {oWindowDef.Guid} ...")
|
||||
Try
|
||||
If w.Regex = String.Empty Then
|
||||
oWindows.Add(w)
|
||||
If oWindowDef.Regex = String.Empty Then
|
||||
oProfile.MatchedWindowID = oWindowDef.Guid
|
||||
oWindowDef.IsMatched = True
|
||||
oWindows.Add(oWindowDef)
|
||||
Exit For
|
||||
End If
|
||||
|
||||
Dim oRegex As New Regex(w.Regex)
|
||||
Dim oRegex As New Regex(oWindowDef.Regex)
|
||||
Dim oMatch = oRegex.Match(WindowTitle)
|
||||
|
||||
If oMatch.Success Then
|
||||
Logger.Debug("Window Title Regex Matched: {0}", WindowTitle)
|
||||
Logger.Debug("MATCH on WindowTitle: {0}", WindowTitle)
|
||||
'TODO: Add Debug Data
|
||||
oWindows.Add(w)
|
||||
oProfile.MatchedWindowID = oWindowDef.Guid
|
||||
oWindowDef.IsMatched = True
|
||||
oWindows.Add(oWindowDef)
|
||||
Dim olowestNode As TreeNode = Node_Get_Lowest_Node(oProfile.Name & "-REGEX")
|
||||
If Not IsNothing(olowestNode) Then
|
||||
Dim oNode As New TreeNode($"MATCH on WindowTitle: [{WindowTitle}]")
|
||||
oNode.ImageIndex = 3
|
||||
oNode.Tag = oProfile.Name & "-WINDOW"
|
||||
olowestNode.Nodes.Add(oNode)
|
||||
End If
|
||||
Exit For
|
||||
End If
|
||||
Catch ex As Exception
|
||||
Logger.Warn("Regex '{0}' could not be processed for input '{1}'", w.Regex, WindowTitle)
|
||||
Logger.Warn("Regex '{0}' could not be processed for input '{1}'", oWindowDef.Regex, WindowTitle)
|
||||
Logger.Error(ex)
|
||||
End Try
|
||||
Next
|
||||
|
||||
If oWindows.Count > 0 Then
|
||||
oProfile.Windows = oWindows
|
||||
oProfile.IsMatched = True
|
||||
oProfiles.Add(oProfile)
|
||||
End If
|
||||
Next
|
||||
@ -162,22 +263,39 @@ Public Class ClassProfileFilter
|
||||
Dim oWindows As New List(Of WindowData)
|
||||
|
||||
For Each w As WindowData In oProfile.Windows
|
||||
|
||||
Try
|
||||
If w.ClipboardRegex = String.Empty Then
|
||||
If w.Regex = String.Empty Then
|
||||
oWindows.Add(w)
|
||||
End If
|
||||
|
||||
Dim oRegex As New Regex(w.ClipboardRegex)
|
||||
Dim oRegex As New Regex(w.Regex)
|
||||
Dim oMatch = oRegex.Match(ClipboardContents)
|
||||
|
||||
If oMatch.Success Then
|
||||
Logger.Debug("Window Clipboard Regex Matched: {0}", ClipboardContents)
|
||||
'TODO: Add Debug Data
|
||||
Dim oResult As TreeNode
|
||||
For Each oTreeNode In CurrMatchTreeView.Nodes
|
||||
If Not IsNothing(oResult) Then Exit For
|
||||
If oTreeNode.Tag = oProfile.Name & "-REGEX" Then
|
||||
oResult = oTreeNode
|
||||
End If
|
||||
|
||||
|
||||
Next
|
||||
If Not IsNothing(oResult) Then
|
||||
Dim oNode As New TreeNode($"MATCH on WINDOW Clipboard Regex: [{w.Regex}]")
|
||||
oNode.ImageIndex = 2
|
||||
oNode.Tag = oProfile.Name & "-WINDOW_REGEX"
|
||||
Dim olowestNode As TreeNode = GetLowestNode(oResult)
|
||||
olowestNode.Nodes.Add(oNode)
|
||||
End If
|
||||
|
||||
oWindows.Add(w)
|
||||
|
||||
|
||||
End If
|
||||
Catch ex As Exception
|
||||
Logger.Warn("Regex '{0}' could not be processed for input '{1}'", w.ClipboardRegex, ClipboardContents)
|
||||
Logger.Warn("Regex '{0}' could not be processed for input '{1}'", w.Regex, ClipboardContents)
|
||||
Logger.Error(ex)
|
||||
End Try
|
||||
Next
|
||||
@ -191,7 +309,7 @@ Public Class ClassProfileFilter
|
||||
Return oProfiles
|
||||
End Function
|
||||
|
||||
Public Function FilterProfilesByFocusedControl(Profiles As List(Of ProfileData), ClipboardContents As String) As List(Of ProfileData)
|
||||
Public Function FilterProfilesByFocusedControl(Profiles As List(Of ProfileData), ClipboardContents As String, ControlFocusresult As String) As List(Of ProfileData)
|
||||
Dim oWindow As WindowInfo
|
||||
Dim oFocusedControl As WindowInfo
|
||||
Dim oFocusedControlName As String = String.Empty
|
||||
@ -214,74 +332,139 @@ Public Class ClassProfileFilter
|
||||
|
||||
Dim oFilteredProfiles As New List(Of ProfileData)
|
||||
|
||||
For Each oProfile In Profiles
|
||||
Logger.Debug("Current Profile: {0}", oProfile.Name)
|
||||
If oProfile.Controls.Count = 0 Then
|
||||
oFilteredProfiles.Add(oProfile)
|
||||
For Each oProfileMatchedSofar In Profiles
|
||||
If oProfileMatchedSofar.IsMatched = False Then Continue For
|
||||
Logger.Debug("Checking ControlDefiniotion on profile: {0}", oProfileMatchedSofar.Name)
|
||||
If oProfileMatchedSofar.Controls.Count = 0 Then
|
||||
oFilteredProfiles.Add(oProfileMatchedSofar)
|
||||
|
||||
Dim oNode As New TreeNode($"No Controls configured!")
|
||||
oNode.ImageIndex = 2
|
||||
oNode.ForeColor = Color.Blue
|
||||
oNode.Tag = oProfileMatchedSofar.Name & "-NOCONTROLCONFIG"
|
||||
Dim f = New Font("Tahoma", 10, FontStyle.Bold)
|
||||
oNode.NodeFont = f
|
||||
CurrMatchTreeView.Nodes.Add(oNode)
|
||||
Continue For
|
||||
End If
|
||||
|
||||
Dim oControls As New List(Of ControlData)
|
||||
|
||||
For Each oControl In oProfile.Controls
|
||||
For Each oControlDefinition In oProfileMatchedSofar.Controls
|
||||
Try
|
||||
If oControl.Regex = String.Empty Then
|
||||
oControls.Add(oControl)
|
||||
'If oControlDefinition.WINDOW_ID <> oProfile.MatchedWindowID Then Continue For
|
||||
Logger.Debug($"Working on ControlDefinition: {oControlDefinition.Guid}-{oControlDefinition.ControlName}...")
|
||||
If oControlDefinition.Regex = String.Empty Then
|
||||
oProfileMatchedSofar.MatchedControlID = oControlDefinition.Guid
|
||||
oControlDefinition.IsMatched = True
|
||||
oControls.Add(oControlDefinition)
|
||||
Exit For
|
||||
End If
|
||||
'Dim oResult As TreeNode
|
||||
'For Each oTreeNode In CurrMatchTreeView.Nodes
|
||||
' oResult = NodeFind(oTreeNode, $"Global Clipboard Regex Matched [{oProfile.Regex}]")
|
||||
'Next
|
||||
'Dim oNode As TreeNode
|
||||
Dim oNodeCaption As String
|
||||
'Dim oAddNode As Boolean = False
|
||||
Dim oRegex As New Regex(oControlDefinition.Regex)
|
||||
|
||||
Dim oRegex As New Regex(oControl.Regex)
|
||||
Dim oFocusedControlResult As String = ""
|
||||
|
||||
If oControl.AutomationId <> String.Empty And oControl.ControlName <> String.Empty Then
|
||||
If oControl.AutomationId = Automation.AutomationId And oControl.ControlName = oFocusedControlName Then
|
||||
If oRegex.Match(ClipboardContents).Success Then
|
||||
Logger.Debug("Both AutomationId and ControlName matched!")
|
||||
oControls.Add(oControl)
|
||||
If oControlDefinition.AutomationId <> String.Empty And oControlDefinition.ControlName = String.Empty Then
|
||||
Logger.Debug($"AutomationID should be used...")
|
||||
If Not IsNothing(ControlFocusresult) Then
|
||||
If ControlFocusresult <> String.Empty Then
|
||||
Logger.Debug($"AutomationID will be used...")
|
||||
oFocusedControlResult = ControlFocusresult
|
||||
End If
|
||||
End If
|
||||
ElseIf oControl.AutomationId <> String.Empty Then
|
||||
If oControl.AutomationId = Automation.AutomationId Then
|
||||
If oRegex.Match(ClipboardContents).Success Then
|
||||
Logger.Debug("Both AutomationId matched!")
|
||||
oControls.Add(oControl)
|
||||
ElseIf oControlDefinition.AutomationId = String.Empty And oControlDefinition.ControlName <> String.Empty Then
|
||||
Logger.Debug($"ControlName should be used...")
|
||||
If Not IsNothing(oFocusedControlName) Then
|
||||
If oFocusedControlName <> String.Empty Then
|
||||
Logger.Debug($"ControlName will be used...")
|
||||
oFocusedControlResult = oFocusedControlName
|
||||
End If
|
||||
End If
|
||||
ElseIf oControl.ControlName <> String.Empty Then
|
||||
If oControl.ControlName = oFocusedControlName Then
|
||||
If oRegex.Match(ClipboardContents).Success Then
|
||||
Logger.Debug("Both ControlName matched!")
|
||||
oControls.Add(oControl)
|
||||
|
||||
End If
|
||||
If oFocusedControlResult <> String.Empty Then
|
||||
Dim oControlRegex As New Regex(oControlDefinition.Regex)
|
||||
Dim oControlMatch = oRegex.Match(oFocusedControlResult)
|
||||
|
||||
If oControlMatch.Success Then
|
||||
Logger.Debug($"MATCH on Focused Control [{oFocusedControlResult}] with Regex [{oControlDefinition.Regex}]")
|
||||
oProfileMatchedSofar.IsMatched = True
|
||||
oProfileMatchedSofar.MatchedControlID = oControlDefinition.Guid
|
||||
oControlDefinition.IsMatched = True
|
||||
oControls.Add(oControlDefinition)
|
||||
Dim olowestNode As TreeNode = Node_Get_Lowest_Node(oProfileMatchedSofar.Name & "-REGEX")
|
||||
If Not IsNothing(olowestNode) Then
|
||||
Dim oNode As New TreeNode($"MATCH on Focused Control [{oFocusedControlResult}] with Regex [{oControlDefinition.Regex}]")
|
||||
oNode.ImageIndex = 2
|
||||
oNode.Tag = oProfileMatchedSofar.Name & "-WINDOW"
|
||||
olowestNode.Nodes.Add(oNode)
|
||||
End If
|
||||
Exit For
|
||||
End If
|
||||
End If
|
||||
Catch ex As Exception
|
||||
Logger.Warn("Regex '{0}' could not be processed for input '{1}'", oControl.Regex, oFocusedControlName)
|
||||
Logger.Warn("Regex '{0}' could not be processed for input '{1}'", oControlDefinition.Regex, oFocusedControlName)
|
||||
Logger.Error(ex)
|
||||
End Try
|
||||
Next
|
||||
|
||||
If oControls.Count > 0 Then
|
||||
oProfile.Controls = oControls
|
||||
oFilteredProfiles.Add(oProfile)
|
||||
oProfileMatchedSofar.Controls = oControls
|
||||
oFilteredProfiles.Add(oProfileMatchedSofar)
|
||||
End If
|
||||
Next
|
||||
|
||||
Return oFilteredProfiles
|
||||
End Function
|
||||
Private Function Node_Get_Lowest_Node(NodeTag As String) As TreeNode
|
||||
Dim oExit = False
|
||||
Dim oParentNode As TreeNode
|
||||
For Each oTreeNode As TreeNode In CurrMatchTreeView.Nodes
|
||||
For Each oNodes As TreeNode In oTreeNode.Nodes
|
||||
If oExit = True Then Exit For
|
||||
If oNodes.Tag = NodeTag Then
|
||||
oParentNode = oNodes
|
||||
oExit = True
|
||||
Exit For
|
||||
End If
|
||||
Next
|
||||
Next
|
||||
Dim olowestNode As TreeNode = GetLowestNode(oParentNode)
|
||||
|
||||
Return olowestNode
|
||||
End Function
|
||||
Public Function ClearNotMatchedProfiles(Profiles As List(Of ProfileData)) As List(Of ProfileData)
|
||||
Dim oFilteredProfiles As New List(Of ProfileData)
|
||||
For Each oProfile In Profiles
|
||||
If oProfile.IsMatched Then
|
||||
oFilteredProfiles.Add(oProfile)
|
||||
End If
|
||||
Next
|
||||
Return oFilteredProfiles
|
||||
End Function
|
||||
Private Function TransformProfiles() As List(Of ProfileData)
|
||||
Dim oList As New List(Of ProfileData)
|
||||
|
||||
For Each oRow As DataRow In _ProfileTable.Rows
|
||||
Dim oProfileId = oRow.Item("GUID")
|
||||
Dim oProcessList As List(Of ProcessData) = TransformProcesses(oProfileId, _ProcessTable)
|
||||
Dim oWindowList As List(Of WindowData) = TransformWindows(oProfileId, _WindowTable)
|
||||
Dim oControlList As List(Of ControlData) = TransformControls(oProfileId, _ControlTable)
|
||||
|
||||
oList.Add(New ProfileData() With {
|
||||
.Guid = oRow.Item("GUID"),
|
||||
.ProcessName = NotNull(oRow.Item("PROC_NAME"), String.Empty),
|
||||
.Regex = NotNull(oRow.Item("REGEX_EXPRESSION"), String.Empty),
|
||||
.Name = NotNull(oRow.Item("NAME"), String.Empty),
|
||||
.Comment = NotNull(oRow.Item("COMMENT"), String.Empty),
|
||||
.ProfileType = NotNull(oRow.Item("PROFILE_TYPE"), String.Empty),
|
||||
.Processes = oProcessList,
|
||||
.Windows = oWindowList,
|
||||
.Controls = oControlList
|
||||
})
|
||||
@ -296,28 +479,43 @@ Public Class ClassProfileFilter
|
||||
For Each oRow As DataRow In ControlDatatable.Rows
|
||||
If oRow.Item("PROFILE_ID") = ProfileId Then
|
||||
oControlList.Add(New ControlData() With {
|
||||
.Guid = oRow.Item("GUID"),
|
||||
.Description = NotNull(oRow.Item("DESCRIPTION"), String.Empty),
|
||||
.Regex = NotNull(oRow.Item("REGEX"), String.Empty),
|
||||
.AutomationId = NotNull(oRow.Item("AUTOMATION_ID"), String.Empty)
|
||||
.AutomationId = NotNull(oRow.Item("AUTOMATION_ID"), String.Empty),
|
||||
.WINDOW_ID = oRow.Item("WINDOW_ID")
|
||||
})
|
||||
End If
|
||||
Next
|
||||
|
||||
Return oControlList
|
||||
End Function
|
||||
Private Function TransformProcesses(ProfileId As Integer, ProcessDatatable As DataTable) As List(Of ProcessData)
|
||||
Dim oProcessList As New List(Of ProcessData)
|
||||
|
||||
For Each oRow As DataRow In ProcessDatatable.Rows
|
||||
oProcessList.Add(New ProcessData() With {
|
||||
.Guid = oRow.Item("GUID"),
|
||||
.PROFILE_ID = oRow.Item("PROFILE_ID"),
|
||||
.ProcessName = NotNull(oRow.Item("PROC_NAME"), String.Empty)
|
||||
})
|
||||
|
||||
Next
|
||||
|
||||
Return oProcessList
|
||||
End Function
|
||||
Private Function TransformWindows(ProfileId As Integer, WindowDatatable As DataTable) As List(Of WindowData)
|
||||
Dim oWindowList As New List(Of WindowData)
|
||||
|
||||
For Each oRow As DataRow In WindowDatatable.Rows
|
||||
If oRow.Item("PROFILE_ID") = ProfileId Then
|
||||
oWindowList.Add(New WindowData() With {
|
||||
oWindowList.Add(New WindowData() With {
|
||||
.Guid = oRow.Item("GUID"),
|
||||
.WindowProcessID = oRow.Item("PROCESS_ID"),
|
||||
.Title = NotNull(oRow.Item("DESCRIPTION"), String.Empty),
|
||||
.Regex = NotNull(oRow.Item("REGEX"), String.Empty),
|
||||
.Sequence = NotNull(oRow.Item("SEQUENCE"), 0),
|
||||
.ClipboardRegex = NotNull(oRow.Item("REGEX_CLIPBOARD"), String.Empty)
|
||||
.Sequence = NotNull(oRow.Item("SEQUENCE"), 0)
|
||||
})
|
||||
End If
|
||||
|
||||
Next
|
||||
|
||||
Return oWindowList
|
||||
|
||||
@ -231,4 +231,18 @@ Public Class ClassWindowAPI
|
||||
End Try
|
||||
|
||||
End Function
|
||||
Public Shared Function FocusedControlinActiveWindow(WindowHandle As IntPtr) As IntPtr
|
||||
Try
|
||||
Dim activewindowhandle As IntPtr = GetForegroundWindow
|
||||
Dim activewindowThread As IntPtr = GetWindowThreadProcessId(activewindowhandle, IntPtr.Zero)
|
||||
Dim thiswindowthread As IntPtr = GetWindowThreadProcessId(WindowHandle, IntPtr.Zero)
|
||||
AttachThreadInput(activewindowThread, thiswindowthread, True)
|
||||
Dim focusedControlHandle As IntPtr = GetFocus()
|
||||
AttachThreadInput(activewindowThread, thiswindowthread, False)
|
||||
Return focusedControlHandle
|
||||
Catch ex As Exception
|
||||
Return Nothing
|
||||
End Try
|
||||
|
||||
End Function
|
||||
End Class
|
||||
|
||||
@ -68,21 +68,20 @@
|
||||
<Reference Include="DevExpress.XtraLayout.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
|
||||
<Reference Include="DevExpress.XtraPrinting.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
|
||||
<Reference Include="DigitalData.Controls.RegexEditor">
|
||||
<HintPath>..\..\..\DDMonorepo\Controls.RegexEditor\bin\Debug\DigitalData.Controls.RegexEditor.dll</HintPath>
|
||||
<HintPath>P:\Projekte DIGITAL DATA\DIGITAL DATA - Entwicklung\DLL_Bibliotheken\Digital Data\Controls\DigitalData.Controls.RegexEditor.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="DigitalData.Modules.Config">
|
||||
<HintPath>..\..\..\DDMonorepo\Modules.Config\bin\Debug\DigitalData.Modules.Config.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="DigitalData.Modules.Database">
|
||||
<HintPath>..\..\..\DDMonorepo\Modules.Database\bin\Debug\DigitalData.Modules.Database.dll</HintPath>
|
||||
<HintPath>P:\Projekte DIGITAL DATA\DIGITAL DATA - Entwicklung\DLL_Bibliotheken\Digital Data\DigitalData.Modules.Database.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="DigitalData.Modules.Filesystem, Version=0.0.0.1, Culture=neutral, processorArchitecture=MSIL">
|
||||
<SpecificVersion>False</SpecificVersion>
|
||||
<HintPath>..\..\..\DDMonorepo\Filesystem\bin\Debug\DigitalData.Modules.Filesystem.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="DigitalData.Modules.Language, Version=1.0.0.0, Culture=neutral, processorArchitecture=MSIL">
|
||||
<SpecificVersion>False</SpecificVersion>
|
||||
<HintPath>..\..\..\DDMonorepo\Modules.Language\bin\Debug\DigitalData.Modules.Language.dll</HintPath>
|
||||
<Reference Include="DigitalData.Modules.Language">
|
||||
<HintPath>P:\Projekte DIGITAL DATA\DIGITAL DATA - Entwicklung\DLL_Bibliotheken\Digital Data\DigitalData.Modules.Language.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="DigitalData.Modules.Logging">
|
||||
<HintPath>..\..\..\DDMonorepo\Modules.Config\bin\Debug\DigitalData.Modules.Logging.dll</HintPath>
|
||||
@ -143,7 +142,6 @@
|
||||
<Compile Include="ClassLicense.vb" />
|
||||
<Compile Include="ClassWindowsAPINativeMethods.vb" />
|
||||
<Compile Include="clsPatterns.vb" />
|
||||
<Compile Include="clsSearch.vb" />
|
||||
<Compile Include="ClassWindowAPI.vb" />
|
||||
<Compile Include="clsWMDocGrid.vb" />
|
||||
<Compile Include="ctrlApplicationAssignment.Designer.vb">
|
||||
@ -261,6 +259,12 @@
|
||||
<Compile Include="frmSplash.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="frmTreeView.Designer.vb">
|
||||
<DependentUpon>frmTreeView.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="frmTreeView.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="IResultForm.vb" />
|
||||
<Compile Include="modCurrent.vb" />
|
||||
<Compile Include="My Project\AssemblyInfo.vb" />
|
||||
@ -351,6 +355,9 @@
|
||||
<EmbeddedResource Include="frmSplash.resx">
|
||||
<DependentUpon>frmSplash.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="frmTreeView.resx">
|
||||
<DependentUpon>frmTreeView.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="My Project\licenses.licx" />
|
||||
<EmbeddedResource Include="My Project\Resources.resx">
|
||||
<Generator>VbMyResourcesResXFileCodeGenerator</Generator>
|
||||
@ -445,6 +452,9 @@
|
||||
<None Include="Resources\ReduceSize.png" />
|
||||
<None Include="Resources\KeyOutput_8167.png" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<WCFMetadata Include="Connected Services\" />
|
||||
</ItemGroup>
|
||||
<Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
|
||||
<!-- To modify your build process, add your task inside one of the targets below and uncomment it.
|
||||
Other similar extension points exist, see Microsoft.Common.targets.
|
||||
|
||||
619
app/DD_Clipboard_Searcher/MyDataset.Designer.vb
generated
619
app/DD_Clipboard_Searcher/MyDataset.Designer.vb
generated
File diff suppressed because it is too large
Load Diff
@ -12,61 +12,47 @@
|
||||
<DbSource ConnectionRef="DD_ECMConnectionString (MySettings)" DbObjectName="DD_ECM_TEST.dbo.TBCW_PROFILES" DbObjectType="Table" FillMethodModifier="Public" FillMethodName="Fill" GenerateMethods="Both" GenerateShortCommands="true" GeneratorGetMethodName="GetData" GeneratorSourceName="Fill" GetMethodModifier="Public" GetMethodName="GetData" QueryType="Rowset" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetData" UserSourceName="Fill">
|
||||
<DeleteCommand>
|
||||
<DbCommand CommandType="Text" ModifiedByUser="false">
|
||||
<CommandText>DELETE FROM [TBCW_PROFILES] WHERE (([GUID] = @Original_GUID) AND ([NAME] = @Original_NAME) AND ((@IsNull_COMMENT = 1 AND [COMMENT] IS NULL) OR ([COMMENT] = @Original_COMMENT)) AND ([WD_SEARCH] = @Original_WD_SEARCH) AND ([REGEX_EXPRESSION] = @Original_REGEX_EXPRESSION) AND ([ADDED_WHO] = @Original_ADDED_WHO) AND ((@IsNull_ADDED_WHEN = 1 AND [ADDED_WHEN] IS NULL) OR ([ADDED_WHEN] = @Original_ADDED_WHEN)) AND ((@IsNull_CHANGED_WHO = 1 AND [CHANGED_WHO] IS NULL) OR ([CHANGED_WHO] = @Original_CHANGED_WHO)) AND ((@IsNull_CHANGED_WHEN = 1 AND [CHANGED_WHEN] IS NULL) OR ([CHANGED_WHEN] = @Original_CHANGED_WHEN)) AND ([ACTIVE] = @Original_ACTIVE) AND ([PROFILE_TYPE] = @Original_PROFILE_TYPE))</CommandText>
|
||||
<CommandText>DELETE FROM [TBCW_PROFILES] WHERE [GUID] = @Original_GUID)</CommandText>
|
||||
<Parameters>
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@Original_GUID" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="NAME" SourceColumnNullMapping="false" SourceVersion="Original" />
|
||||
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_COMMENT" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="COMMENT" SourceColumnNullMapping="true" SourceVersion="Original" />
|
||||
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_COMMENT" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="COMMENT" SourceColumnNullMapping="false" SourceVersion="Original" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_WD_SEARCH" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="WD_SEARCH" SourceColumnNullMapping="false" SourceVersion="Original" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_REGEX_EXPRESSION" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="REGEX_EXPRESSION" SourceColumnNullMapping="false" SourceVersion="Original" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_ADDED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="ADDED_WHO" SourceColumnNullMapping="false" SourceVersion="Original" />
|
||||
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_ADDED_WHEN" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="ADDED_WHEN" SourceColumnNullMapping="true" SourceVersion="Original" />
|
||||
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="DateTime" Direction="Input" ParameterName="@Original_ADDED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="0" SourceColumn="ADDED_WHEN" SourceColumnNullMapping="false" SourceVersion="Original" />
|
||||
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_CHANGED_WHO" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="CHANGED_WHO" SourceColumnNullMapping="true" SourceVersion="Original" />
|
||||
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_CHANGED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="CHANGED_WHO" SourceColumnNullMapping="false" SourceVersion="Original" />
|
||||
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_CHANGED_WHEN" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="CHANGED_WHEN" SourceColumnNullMapping="true" SourceVersion="Original" />
|
||||
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="DateTime" Direction="Input" ParameterName="@Original_CHANGED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="0" SourceColumn="CHANGED_WHEN" SourceColumnNullMapping="false" SourceVersion="Original" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@Original_ACTIVE" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="ACTIVE" SourceColumnNullMapping="false" SourceVersion="Original" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int16" Direction="Input" ParameterName="@Original_PROFILE_TYPE" Precision="0" ProviderType="SmallInt" Scale="0" Size="0" SourceColumn="PROFILE_TYPE" SourceColumnNullMapping="false" SourceVersion="Original" />
|
||||
</Parameters>
|
||||
</DbCommand>
|
||||
</DeleteCommand>
|
||||
<InsertCommand>
|
||||
<DbCommand CommandType="Text" ModifiedByUser="false">
|
||||
<CommandText>INSERT INTO [TBCW_PROFILES] ([NAME], [COMMENT], [WD_SEARCH], [REGEX_EXPRESSION], [ADDED_WHO], [ADDED_WHEN], [CHANGED_WHO], [CHANGED_WHEN], [ACTIVE], [PROFILE_TYPE]) VALUES (@NAME, @COMMENT, @WD_SEARCH, @REGEX_EXPRESSION, @ADDED_WHO, @ADDED_WHEN, @CHANGED_WHO, @CHANGED_WHEN, @ACTIVE, @PROFILE_TYPE);
|
||||
SELECT GUID, NAME, COMMENT, WD_SEARCH, REGEX_EXPRESSION, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, ACTIVE, PROFILE_TYPE FROM TBCW_PROFILES WHERE (GUID = SCOPE_IDENTITY())</CommandText>
|
||||
<DbCommand CommandType="Text" ModifiedByUser="true">
|
||||
<CommandText>INSERT INTO TBCW_PROFILES
|
||||
(NAME, COMMENT, REGEX_EXPRESSION, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, ACTIVE, PROFILE_TYPE)
|
||||
VALUES (@NAME,@COMMENT,@REGEX_EXPRESSION,@ADDED_WHO,@ADDED_WHEN,@CHANGED_WHO,@CHANGED_WHEN,@ACTIVE,@PROFILE_TYPE);
|
||||
SELECT GUID, NAME, COMMENT, REGEX_EXPRESSION, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, ACTIVE, PROFILE_TYPE FROM TBCW_PROFILES WHERE (GUID = SCOPE_IDENTITY())</CommandText>
|
||||
<Parameters>
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@COMMENT" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="COMMENT" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@WD_SEARCH" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="WD_SEARCH" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@REGEX_EXPRESSION" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="REGEX_EXPRESSION" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@ADDED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="ADDED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="DateTime" Direction="Input" ParameterName="@ADDED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="0" SourceColumn="ADDED_WHEN" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@CHANGED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="CHANGED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="DateTime" Direction="Input" ParameterName="@CHANGED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="0" SourceColumn="CHANGED_WHEN" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@ACTIVE" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="ACTIVE" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int16" Direction="Input" ParameterName="@PROFILE_TYPE" Precision="0" ProviderType="SmallInt" Scale="0" Size="0" SourceColumn="PROFILE_TYPE" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="NAME" ColumnName="NAME" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROFILES" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="true" AutogeneratedName="COMMENT" ColumnName="COMMENT" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROFILES" DataTypeServer="varchar(500)" DbType="AnsiString" Direction="Input" ParameterName="@COMMENT" Precision="0" ProviderType="VarChar" Scale="0" Size="500" SourceColumn="COMMENT" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="REGEX_EXPRESSION" ColumnName="REGEX_EXPRESSION" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROFILES" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@REGEX_EXPRESSION" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="REGEX_EXPRESSION" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="ADDED_WHO" ColumnName="ADDED_WHO" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROFILES" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@ADDED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="ADDED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="true" AutogeneratedName="ADDED_WHEN" ColumnName="ADDED_WHEN" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROFILES" DataTypeServer="datetime" DbType="DateTime" Direction="Input" ParameterName="@ADDED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="8" SourceColumn="ADDED_WHEN" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="true" AutogeneratedName="CHANGED_WHO" ColumnName="CHANGED_WHO" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROFILES" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@CHANGED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="CHANGED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="true" AutogeneratedName="CHANGED_WHEN" ColumnName="CHANGED_WHEN" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROFILES" DataTypeServer="datetime" DbType="DateTime" Direction="Input" ParameterName="@CHANGED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="8" SourceColumn="CHANGED_WHEN" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="ACTIVE" ColumnName="ACTIVE" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROFILES" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@ACTIVE" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="ACTIVE" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="PROFILE_TYPE" ColumnName="PROFILE_TYPE" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROFILES" DataTypeServer="smallint" DbType="Int16" Direction="Input" ParameterName="@PROFILE_TYPE" Precision="0" ProviderType="SmallInt" Scale="0" Size="2" SourceColumn="PROFILE_TYPE" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
</Parameters>
|
||||
</DbCommand>
|
||||
</InsertCommand>
|
||||
<SelectCommand>
|
||||
<DbCommand CommandType="Text" ModifiedByUser="false">
|
||||
<CommandText>SELECT GUID, NAME, COMMENT, WD_SEARCH, REGEX_EXPRESSION, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, ACTIVE, PROFILE_TYPE FROM TBCW_PROFILES</CommandText>
|
||||
<CommandText>SELECT GUID, NAME, COMMENT, REGEX_EXPRESSION, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, ACTIVE, PROFILE_TYPE
|
||||
FROM TBCW_PROFILES</CommandText>
|
||||
<Parameters />
|
||||
</DbCommand>
|
||||
</SelectCommand>
|
||||
<UpdateCommand>
|
||||
<DbCommand CommandType="Text" ModifiedByUser="true">
|
||||
<CommandText>UPDATE TBCW_PROFILES
|
||||
SET NAME = @NAME, COMMENT = @COMMENT, WD_SEARCH = @WD_SEARCH, REGEX_EXPRESSION = @REGEX_EXPRESSION, CHANGED_WHO = @CHANGED_WHO, ACTIVE = @ACTIVE,
|
||||
PROFILE_TYPE = @PROFILE_TYPE
|
||||
WHERE (GUID = @Original_GUID);
|
||||
SELECT GUID, NAME, COMMENT, WD_SEARCH, REGEX_EXPRESSION, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN FROM TBCW_PROFILES WHERE (GUID = @GUID)</CommandText>
|
||||
SET NAME = @NAME, COMMENT = @COMMENT, REGEX_EXPRESSION = @REGEX_EXPRESSION, CHANGED_WHO = @CHANGED_WHO, ACTIVE = @ACTIVE, PROFILE_TYPE = @PROFILE_TYPE
|
||||
WHERE (GUID = @Original_GUID);
|
||||
SELECT GUID, NAME, COMMENT, REGEX_EXPRESSION, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN FROM TBCW_PROFILES WHERE (GUID = @GUID)</CommandText>
|
||||
<Parameters>
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="NAME" ColumnName="NAME" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROFILES" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="true" AutogeneratedName="COMMENT" ColumnName="COMMENT" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROFILES" DataTypeServer="varchar(500)" DbType="AnsiString" Direction="Input" ParameterName="@COMMENT" Precision="0" ProviderType="VarChar" Scale="0" Size="500" SourceColumn="COMMENT" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="WD_SEARCH" ColumnName="WD_SEARCH" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROFILES" DataTypeServer="varchar(250)" DbType="AnsiString" Direction="Input" ParameterName="@WD_SEARCH" Precision="0" ProviderType="VarChar" Scale="0" Size="250" SourceColumn="WD_SEARCH" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="REGEX_EXPRESSION" ColumnName="REGEX_EXPRESSION" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROFILES" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@REGEX_EXPRESSION" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="REGEX_EXPRESSION" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="true" AutogeneratedName="CHANGED_WHO" ColumnName="CHANGED_WHO" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROFILES" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@CHANGED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="CHANGED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="ACTIVE" ColumnName="ACTIVE" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROFILES" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@ACTIVE" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="ACTIVE" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
@ -82,7 +68,6 @@ SELECT GUID, NAME, COMMENT, WD_SEARCH, REGEX_EXPRESSION, ADDED_WHO, ADDED_WHEN,
|
||||
<Mapping SourceColumn="GUID" DataSetColumn="GUID" />
|
||||
<Mapping SourceColumn="NAME" DataSetColumn="NAME" />
|
||||
<Mapping SourceColumn="COMMENT" DataSetColumn="COMMENT" />
|
||||
<Mapping SourceColumn="WD_SEARCH" DataSetColumn="WD_SEARCH" />
|
||||
<Mapping SourceColumn="REGEX_EXPRESSION" DataSetColumn="REGEX_EXPRESSION" />
|
||||
<Mapping SourceColumn="ADDED_WHO" DataSetColumn="ADDED_WHO" />
|
||||
<Mapping SourceColumn="ADDED_WHEN" DataSetColumn="ADDED_WHEN" />
|
||||
@ -529,60 +514,51 @@ WHERE (GUID = @GUID)</CommandText>
|
||||
<MainSource>
|
||||
<DbSource ConnectionRef="DD_ECMConnectionString (MySettings)" DbObjectName="DD_ECM_TEST.dbo.TBCW_PROF_REL_WINDOW" DbObjectType="Table" FillMethodModifier="Public" FillMethodName="Fill" GenerateMethods="Both" GenerateShortCommands="false" GeneratorGetMethodName="GetData" GeneratorSourceName="Fill" GetMethodModifier="Public" GetMethodName="GetData" QueryType="Rowset" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetData" UserSourceName="Fill">
|
||||
<DeleteCommand>
|
||||
<DbCommand CommandType="Text" ModifiedByUser="true">
|
||||
<DbCommand CommandType="Text" ModifiedByUser="false">
|
||||
<CommandText>DELETE FROM TBCW_PROF_REL_WINDOW
|
||||
WHERE (GUID = @Original_GUID)</CommandText>
|
||||
<Parameters>
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="Original_GUID" ColumnName="GUID" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_WINDOW" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@Original_GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="Original_GUID" ColumnName="GUID" DataSourceName="" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@Original_GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
|
||||
</Parameters>
|
||||
</DbCommand>
|
||||
</DeleteCommand>
|
||||
<InsertCommand>
|
||||
<DbCommand CommandType="Text" ModifiedByUser="false">
|
||||
<CommandText>INSERT INTO [TBCW_PROF_REL_WINDOW] ([PROFILE_ID], [PROCESS_NAME], [DESCRIPTION], [REGEX], [SEQUENCE], [REGEX_CLIPBOARD], [ADDED_WHO], [ADDED_WHEN], [CHANGED_WHO], [CHANGED_WHEN]) VALUES (@PROFILE_ID, @PROCESS_NAME, @DESCRIPTION, @REGEX, @SEQUENCE, @REGEX_CLIPBOARD, @ADDED_WHO, @ADDED_WHEN, @CHANGED_WHO, @CHANGED_WHEN);
|
||||
<DbCommand CommandType="Text" ModifiedByUser="true">
|
||||
<CommandText>INSERT INTO TBCW_PROF_REL_WINDOW
|
||||
(DESCRIPTION, REGEX, SEQUENCE, ADDED_WHO, PROCESS_ID)
|
||||
VALUES (@DESCRIPTION,@REGEX,@SEQUENCE,@ADDED_WHO,@PROCESS_ID);
|
||||
SELECT GUID, PROFILE_ID, PROCESS_NAME, DESCRIPTION, REGEX, SEQUENCE, REGEX_CLIPBOARD, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN FROM TBCW_PROF_REL_WINDOW WHERE (GUID = SCOPE_IDENTITY())</CommandText>
|
||||
<Parameters>
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@PROFILE_ID" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="PROFILE_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@PROCESS_NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="PROCESS_NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@DESCRIPTION" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="DESCRIPTION" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@REGEX" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="REGEX" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Byte" Direction="Input" ParameterName="@SEQUENCE" Precision="0" ProviderType="TinyInt" Scale="0" Size="0" SourceColumn="SEQUENCE" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@REGEX_CLIPBOARD" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="REGEX_CLIPBOARD" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@ADDED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="ADDED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="DateTime" Direction="Input" ParameterName="@ADDED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="0" SourceColumn="ADDED_WHEN" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@CHANGED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="CHANGED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="DateTime" Direction="Input" ParameterName="@CHANGED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="0" SourceColumn="CHANGED_WHEN" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="DESCRIPTION" ColumnName="DESCRIPTION" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_WINDOW" DataTypeServer="varchar(250)" DbType="AnsiString" Direction="Input" ParameterName="@DESCRIPTION" Precision="0" ProviderType="VarChar" Scale="0" Size="250" SourceColumn="DESCRIPTION" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="REGEX" ColumnName="REGEX" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_WINDOW" DataTypeServer="varchar(500)" DbType="AnsiString" Direction="Input" ParameterName="@REGEX" Precision="0" ProviderType="VarChar" Scale="0" Size="500" SourceColumn="REGEX" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="SEQUENCE" ColumnName="SEQUENCE" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_WINDOW" DataTypeServer="tinyint" DbType="Byte" Direction="Input" ParameterName="@SEQUENCE" Precision="0" ProviderType="TinyInt" Scale="0" Size="1" SourceColumn="SEQUENCE" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="ADDED_WHO" ColumnName="ADDED_WHO" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_WINDOW" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@ADDED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="ADDED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="PROCESS_ID" ColumnName="PROCESS_ID" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_WINDOW" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@PROCESS_ID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="PROCESS_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
</Parameters>
|
||||
</DbCommand>
|
||||
</InsertCommand>
|
||||
<SelectCommand>
|
||||
<DbCommand CommandType="Text" ModifiedByUser="true">
|
||||
<CommandText>SELECT TBCW_PROF_REL_WINDOW.*
|
||||
FROM TBCW_PROF_REL_WINDOW WHERE PROCESS_NAME = @PROCESS_NAME AND PROFILE_ID = @PROFILE_ID</CommandText>
|
||||
<DbCommand CommandType="Text" ModifiedByUser="false">
|
||||
<CommandText>SELECT GUID, DESCRIPTION, REGEX, SEQUENCE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, PROCESS_ID
|
||||
FROM TBCW_PROF_REL_WINDOW
|
||||
WHERE (PROCESS_ID = @PROCESS_ID)</CommandText>
|
||||
<Parameters>
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="PROCESS_NAME" ColumnName="PROCESS_NAME" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_WINDOW" DataTypeServer="varchar(250)" DbType="AnsiString" Direction="Input" ParameterName="@PROCESS_NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="250" SourceColumn="PROCESS_NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="PROFILE_ID" ColumnName="PROFILE_ID" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_WINDOW" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@PROFILE_ID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="PROFILE_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="PROCESS_ID" ColumnName="PROCESS_ID" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_WINDOW" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@PROCESS_ID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="PROCESS_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
</Parameters>
|
||||
</DbCommand>
|
||||
</SelectCommand>
|
||||
<UpdateCommand>
|
||||
<DbCommand CommandType="Text" ModifiedByUser="true">
|
||||
<CommandText>UPDATE TBCW_PROF_REL_WINDOW
|
||||
SET PROFILE_ID = @PROFILE_ID, PROCESS_NAME = @PROCESS_NAME, DESCRIPTION = @DESCRIPTION, REGEX = @REGEX, SEQUENCE = @SEQUENCE, REGEX_CLIPBOARD = @REGEX_CLIPBOARD,
|
||||
ADDED_WHO = @ADDED_WHO, ADDED_WHEN = @ADDED_WHEN, CHANGED_WHO = @CHANGED_WHO, CHANGED_WHEN = @CHANGED_WHEN
|
||||
WHERE (GUID = @Original_GUID);
|
||||
SET DESCRIPTION = @DESCRIPTION, REGEX = @REGEX, SEQUENCE = @SEQUENCE, CHANGED_WHO = @CHANGED_WHO, PROCESS_ID = @PROCESS_ID
|
||||
WHERE (GUID = @Original_GUID);
|
||||
SELECT GUID, PROFILE_ID, PROCESS_NAME, DESCRIPTION, REGEX, SEQUENCE, REGEX_CLIPBOARD, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN FROM TBCW_PROF_REL_WINDOW WHERE (GUID = @GUID)</CommandText>
|
||||
<Parameters>
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="PROFILE_ID" ColumnName="PROFILE_ID" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_WINDOW" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@PROFILE_ID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="PROFILE_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="PROCESS_NAME" ColumnName="PROCESS_NAME" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_WINDOW" DataTypeServer="varchar(250)" DbType="AnsiString" Direction="Input" ParameterName="@PROCESS_NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="250" SourceColumn="PROCESS_NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="DESCRIPTION" ColumnName="DESCRIPTION" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_WINDOW" DataTypeServer="varchar(250)" DbType="AnsiString" Direction="Input" ParameterName="@DESCRIPTION" Precision="0" ProviderType="VarChar" Scale="0" Size="250" SourceColumn="DESCRIPTION" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="REGEX" ColumnName="REGEX" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_WINDOW" DataTypeServer="varchar(500)" DbType="AnsiString" Direction="Input" ParameterName="@REGEX" Precision="0" ProviderType="VarChar" Scale="0" Size="500" SourceColumn="REGEX" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="SEQUENCE" ColumnName="SEQUENCE" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_WINDOW" DataTypeServer="tinyint" DbType="Byte" Direction="Input" ParameterName="@SEQUENCE" Precision="0" ProviderType="TinyInt" Scale="0" Size="1" SourceColumn="SEQUENCE" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="REGEX_CLIPBOARD" ColumnName="REGEX_CLIPBOARD" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_WINDOW" DataTypeServer="varchar(500)" DbType="AnsiString" Direction="Input" ParameterName="@REGEX_CLIPBOARD" Precision="0" ProviderType="VarChar" Scale="0" Size="500" SourceColumn="REGEX_CLIPBOARD" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="ADDED_WHO" ColumnName="ADDED_WHO" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_WINDOW" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@ADDED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="ADDED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="true" AutogeneratedName="ADDED_WHEN" ColumnName="ADDED_WHEN" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_WINDOW" DataTypeServer="datetime" DbType="DateTime" Direction="Input" ParameterName="@ADDED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="8" SourceColumn="ADDED_WHEN" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="true" AutogeneratedName="CHANGED_WHO" ColumnName="CHANGED_WHO" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_WINDOW" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@CHANGED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="CHANGED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="true" AutogeneratedName="CHANGED_WHEN" ColumnName="CHANGED_WHEN" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_WINDOW" DataTypeServer="datetime" DbType="DateTime" Direction="Input" ParameterName="@CHANGED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="8" SourceColumn="CHANGED_WHEN" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="PROCESS_ID" ColumnName="PROCESS_ID" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_WINDOW" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@PROCESS_ID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="PROCESS_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="Original_GUID" ColumnName="GUID" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_WINDOW" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@Original_GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="GUID" ColumnName="GUID" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_WINDOW" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
|
||||
</Parameters>
|
||||
@ -592,16 +568,14 @@ SELECT GUID, PROFILE_ID, PROCESS_NAME, DESCRIPTION, REGEX, SEQUENCE, REGEX_CLIPB
|
||||
</MainSource>
|
||||
<Mappings>
|
||||
<Mapping SourceColumn="GUID" DataSetColumn="GUID" />
|
||||
<Mapping SourceColumn="PROFILE_ID" DataSetColumn="PROFILE_ID" />
|
||||
<Mapping SourceColumn="PROCESS_NAME" DataSetColumn="PROCESS_NAME" />
|
||||
<Mapping SourceColumn="DESCRIPTION" DataSetColumn="DESCRIPTION" />
|
||||
<Mapping SourceColumn="REGEX" DataSetColumn="REGEX" />
|
||||
<Mapping SourceColumn="SEQUENCE" DataSetColumn="SEQUENCE" />
|
||||
<Mapping SourceColumn="REGEX_CLIPBOARD" DataSetColumn="REGEX_CLIPBOARD" />
|
||||
<Mapping SourceColumn="ADDED_WHO" DataSetColumn="ADDED_WHO" />
|
||||
<Mapping SourceColumn="ADDED_WHEN" DataSetColumn="ADDED_WHEN" />
|
||||
<Mapping SourceColumn="CHANGED_WHO" DataSetColumn="CHANGED_WHO" />
|
||||
<Mapping SourceColumn="CHANGED_WHEN" DataSetColumn="CHANGED_WHEN" />
|
||||
<Mapping SourceColumn="PROCESS_ID" DataSetColumn="PROCESS_ID" />
|
||||
</Mappings>
|
||||
<Sources />
|
||||
</TableAdapter>
|
||||
@ -720,55 +694,48 @@ WHERE (GUID = @Original_GUID)</CommandText>
|
||||
</DbCommand>
|
||||
</DeleteCommand>
|
||||
<InsertCommand>
|
||||
<DbCommand CommandType="Text" ModifiedByUser="false">
|
||||
<CommandText>INSERT INTO [TBCW_PROF_REL_CONTROL] ([PROFILE_ID], [WINDOW_ID], [PROCESS_NAME], [DESCRIPTION], [AUTOMATION_ID], [FRAMEWORK_ID], [REGEX], [SEQUENCE], [ADDED_WHO], [ADDED_WHEN], [CHANGED_WHO], [CHANGED_WHEN]) VALUES (@PROFILE_ID, @WINDOW_ID, @PROCESS_NAME, @DESCRIPTION, @AUTOMATION_ID, @FRAMEWORK_ID, @REGEX, @SEQUENCE, @ADDED_WHO, @ADDED_WHEN, @CHANGED_WHO, @CHANGED_WHEN);
|
||||
<DbCommand CommandType="Text" ModifiedByUser="true">
|
||||
<CommandText>INSERT INTO TBCW_PROF_REL_CONTROL
|
||||
(WINDOW_ID, DESCRIPTION, AUTOMATION_ID, FRAMEWORK_ID, REGEX, SEQUENCE, ADDED_WHO)
|
||||
VALUES (@WINDOW_ID,@DESCRIPTION,@AUTOMATION_ID,@FRAMEWORK_ID,@REGEX,@SEQUENCE,@ADDED_WHO);
|
||||
SELECT GUID, PROFILE_ID, WINDOW_ID, PROCESS_NAME, DESCRIPTION, AUTOMATION_ID, FRAMEWORK_ID, REGEX, SEQUENCE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN FROM TBCW_PROF_REL_CONTROL WHERE (GUID = SCOPE_IDENTITY())</CommandText>
|
||||
<Parameters>
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@PROFILE_ID" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="PROFILE_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@WINDOW_ID" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="WINDOW_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@PROCESS_NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="PROCESS_NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@DESCRIPTION" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="DESCRIPTION" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@AUTOMATION_ID" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="AUTOMATION_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@FRAMEWORK_ID" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="FRAMEWORK_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@REGEX" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="REGEX" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Byte" Direction="Input" ParameterName="@SEQUENCE" Precision="0" ProviderType="TinyInt" Scale="0" Size="0" SourceColumn="SEQUENCE" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@ADDED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="ADDED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="DateTime" Direction="Input" ParameterName="@ADDED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="0" SourceColumn="ADDED_WHEN" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@CHANGED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="CHANGED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="DateTime" Direction="Input" ParameterName="@CHANGED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="0" SourceColumn="CHANGED_WHEN" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="WINDOW_ID" ColumnName="WINDOW_ID" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_CONTROL" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@WINDOW_ID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="WINDOW_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="DESCRIPTION" ColumnName="DESCRIPTION" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_CONTROL" DataTypeServer="varchar(250)" DbType="AnsiString" Direction="Input" ParameterName="@DESCRIPTION" Precision="0" ProviderType="VarChar" Scale="0" Size="250" SourceColumn="DESCRIPTION" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="AUTOMATION_ID" ColumnName="AUTOMATION_ID" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_CONTROL" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@AUTOMATION_ID" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="AUTOMATION_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="FRAMEWORK_ID" ColumnName="FRAMEWORK_ID" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_CONTROL" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@FRAMEWORK_ID" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="FRAMEWORK_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="REGEX" ColumnName="REGEX" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_CONTROL" DataTypeServer="varchar(500)" DbType="AnsiString" Direction="Input" ParameterName="@REGEX" Precision="0" ProviderType="VarChar" Scale="0" Size="500" SourceColumn="REGEX" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="SEQUENCE" ColumnName="SEQUENCE" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_CONTROL" DataTypeServer="tinyint" DbType="Byte" Direction="Input" ParameterName="@SEQUENCE" Precision="0" ProviderType="TinyInt" Scale="0" Size="1" SourceColumn="SEQUENCE" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="ADDED_WHO" ColumnName="ADDED_WHO" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_CONTROL" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@ADDED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="ADDED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
</Parameters>
|
||||
</DbCommand>
|
||||
</InsertCommand>
|
||||
<SelectCommand>
|
||||
<DbCommand CommandType="Text" ModifiedByUser="false">
|
||||
<CommandText>SELECT GUID, PROFILE_ID, WINDOW_ID, PROCESS_NAME, DESCRIPTION, AUTOMATION_ID, FRAMEWORK_ID, REGEX, SEQUENCE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN
|
||||
<CommandText>SELECT GUID, WINDOW_ID, DESCRIPTION, AUTOMATION_ID, FRAMEWORK_ID, REGEX, SEQUENCE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN
|
||||
FROM TBCW_PROF_REL_CONTROL
|
||||
WHERE (PROCESS_NAME = @PROCESS_NAME) AND (WINDOW_ID = @WINDOW_ID) AND (PROFILE_ID = @PROFILE_ID)</CommandText>
|
||||
WHERE (WINDOW_ID = @WINDOW_ID)
|
||||
ORDER BY SEQUENCE</CommandText>
|
||||
<Parameters>
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="PROCESS_NAME" ColumnName="PROCESS_NAME" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_CONTROL" DataTypeServer="varchar(250)" DbType="AnsiString" Direction="Input" ParameterName="@PROCESS_NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="250" SourceColumn="PROCESS_NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="WINDOW_ID" ColumnName="WINDOW_ID" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_CONTROL" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@WINDOW_ID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="WINDOW_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="PROFILE_ID" ColumnName="PROFILE_ID" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_CONTROL" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@PROFILE_ID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="PROFILE_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
</Parameters>
|
||||
</DbCommand>
|
||||
</SelectCommand>
|
||||
<UpdateCommand>
|
||||
<DbCommand CommandType="Text" ModifiedByUser="false">
|
||||
<DbCommand CommandType="Text" ModifiedByUser="true">
|
||||
<CommandText>UPDATE TBCW_PROF_REL_CONTROL
|
||||
SET PROFILE_ID = @PROFILE_ID, WINDOW_ID = @WINDOW_ID, PROCESS_NAME = @PROCESS_NAME, DESCRIPTION = @DESCRIPTION, AUTOMATION_ID = @AUTOMATION_ID, FRAMEWORK_ID = @FRAMEWORK_ID,
|
||||
REGEX = @REGEX, SEQUENCE = @SEQUENCE
|
||||
WHERE (GUID = @Original_GUID);
|
||||
SET WINDOW_ID = @WINDOW_ID, DESCRIPTION = @DESCRIPTION, AUTOMATION_ID = @AUTOMATION_ID, FRAMEWORK_ID = @FRAMEWORK_ID, REGEX = @REGEX, SEQUENCE = @SEQUENCE
|
||||
WHERE (GUID = @Original_GUID);
|
||||
SELECT GUID, PROFILE_ID, WINDOW_ID, PROCESS_NAME, DESCRIPTION, AUTOMATION_ID, FRAMEWORK_ID, REGEX, SEQUENCE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN FROM TBCW_PROF_REL_CONTROL WHERE (GUID = @GUID)</CommandText>
|
||||
<Parameters>
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="PROFILE_ID" ColumnName="PROFILE_ID" DataSourceName="" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@PROFILE_ID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="PROFILE_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="WINDOW_ID" ColumnName="WINDOW_ID" DataSourceName="" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@WINDOW_ID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="WINDOW_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="PROCESS_NAME" ColumnName="PROCESS_NAME" DataSourceName="" DataTypeServer="varchar(250)" DbType="AnsiString" Direction="Input" ParameterName="@PROCESS_NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="250" SourceColumn="PROCESS_NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="DESCRIPTION" ColumnName="DESCRIPTION" DataSourceName="" DataTypeServer="varchar(250)" DbType="AnsiString" Direction="Input" ParameterName="@DESCRIPTION" Precision="0" ProviderType="VarChar" Scale="0" Size="250" SourceColumn="DESCRIPTION" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="AUTOMATION_ID" ColumnName="AUTOMATION_ID" DataSourceName="" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@AUTOMATION_ID" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="AUTOMATION_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="FRAMEWORK_ID" ColumnName="FRAMEWORK_ID" DataSourceName="" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@FRAMEWORK_ID" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="FRAMEWORK_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="REGEX" ColumnName="REGEX" DataSourceName="" DataTypeServer="varchar(500)" DbType="AnsiString" Direction="Input" ParameterName="@REGEX" Precision="0" ProviderType="VarChar" Scale="0" Size="500" SourceColumn="REGEX" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="SEQUENCE" ColumnName="SEQUENCE" DataSourceName="" DataTypeServer="tinyint" DbType="Byte" Direction="Input" ParameterName="@SEQUENCE" Precision="0" ProviderType="TinyInt" Scale="0" Size="1" SourceColumn="SEQUENCE" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="Original_GUID" ColumnName="GUID" DataSourceName="" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@Original_GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="GUID" ColumnName="GUID" DataSourceName="" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="WINDOW_ID" ColumnName="WINDOW_ID" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_CONTROL" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@WINDOW_ID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="WINDOW_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="DESCRIPTION" ColumnName="DESCRIPTION" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_CONTROL" DataTypeServer="varchar(250)" DbType="AnsiString" Direction="Input" ParameterName="@DESCRIPTION" Precision="0" ProviderType="VarChar" Scale="0" Size="250" SourceColumn="DESCRIPTION" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="AUTOMATION_ID" ColumnName="AUTOMATION_ID" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_CONTROL" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@AUTOMATION_ID" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="AUTOMATION_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="FRAMEWORK_ID" ColumnName="FRAMEWORK_ID" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_CONTROL" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@FRAMEWORK_ID" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="FRAMEWORK_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="REGEX" ColumnName="REGEX" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_CONTROL" DataTypeServer="varchar(500)" DbType="AnsiString" Direction="Input" ParameterName="@REGEX" Precision="0" ProviderType="VarChar" Scale="0" Size="500" SourceColumn="REGEX" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="SEQUENCE" ColumnName="SEQUENCE" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_CONTROL" DataTypeServer="tinyint" DbType="Byte" Direction="Input" ParameterName="@SEQUENCE" Precision="0" ProviderType="TinyInt" Scale="0" Size="1" SourceColumn="SEQUENCE" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="Original_GUID" ColumnName="GUID" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_CONTROL" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@Original_GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="GUID" ColumnName="GUID" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_CONTROL" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
|
||||
</Parameters>
|
||||
</DbCommand>
|
||||
</UpdateCommand>
|
||||
@ -776,9 +743,7 @@ SELECT GUID, PROFILE_ID, WINDOW_ID, PROCESS_NAME, DESCRIPTION, AUTOMATION_ID, FR
|
||||
</MainSource>
|
||||
<Mappings>
|
||||
<Mapping SourceColumn="GUID" DataSetColumn="GUID" />
|
||||
<Mapping SourceColumn="PROFILE_ID" DataSetColumn="PROFILE_ID" />
|
||||
<Mapping SourceColumn="WINDOW_ID" DataSetColumn="WINDOW_ID" />
|
||||
<Mapping SourceColumn="PROCESS_NAME" DataSetColumn="PROCESS_NAME" />
|
||||
<Mapping SourceColumn="DESCRIPTION" DataSetColumn="DESCRIPTION" />
|
||||
<Mapping SourceColumn="REGEX" DataSetColumn="REGEX" />
|
||||
<Mapping SourceColumn="SEQUENCE" DataSetColumn="SEQUENCE" />
|
||||
@ -817,13 +782,6 @@ SELECT GUID, PROFILE_ID, WINDOW_ID, PROCESS_NAME, DESCRIPTION, AUTOMATION_ID, FR
|
||||
</xs:restriction>
|
||||
</xs:simpleType>
|
||||
</xs:element>
|
||||
<xs:element name="WD_SEARCH" msprop:Generator_ColumnVarNameInTable="columnWD_SEARCH" msprop:Generator_ColumnPropNameInRow="WD_SEARCH" msprop:Generator_ColumnPropNameInTable="WD_SEARCHColumn" msprop:Generator_UserColumnName="WD_SEARCH">
|
||||
<xs:simpleType>
|
||||
<xs:restriction base="xs:string">
|
||||
<xs:maxLength value="250" />
|
||||
</xs:restriction>
|
||||
</xs:simpleType>
|
||||
</xs:element>
|
||||
<xs:element name="REGEX_EXPRESSION" msprop:Generator_ColumnVarNameInTable="columnREGEX_EXPRESSION" msprop:Generator_ColumnPropNameInRow="REGEX_EXPRESSION" msprop:Generator_ColumnPropNameInTable="REGEX_EXPRESSIONColumn" msprop:Generator_UserColumnName="REGEX_EXPRESSION" default="">
|
||||
<xs:simpleType>
|
||||
<xs:restriction base="xs:string">
|
||||
@ -1079,14 +1037,6 @@ SELECT GUID, PROFILE_ID, WINDOW_ID, PROCESS_NAME, DESCRIPTION, AUTOMATION_ID, FR
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
<xs:element name="PROFILE_ID" msprop:Generator_ColumnVarNameInTable="columnPROFILE_ID" msprop:Generator_ColumnPropNameInRow="PROFILE_ID" msprop:Generator_ColumnPropNameInTable="PROFILE_IDColumn" msprop:Generator_UserColumnName="PROFILE_ID" type="xs:int" />
|
||||
<xs:element name="PROCESS_NAME" msprop:Generator_ColumnVarNameInTable="columnPROCESS_NAME" msprop:Generator_ColumnPropNameInRow="PROCESS_NAME" msprop:Generator_ColumnPropNameInTable="PROCESS_NAMEColumn" msprop:Generator_UserColumnName="PROCESS_NAME">
|
||||
<xs:simpleType>
|
||||
<xs:restriction base="xs:string">
|
||||
<xs:maxLength value="250" />
|
||||
</xs:restriction>
|
||||
</xs:simpleType>
|
||||
</xs:element>
|
||||
<xs:element name="DESCRIPTION" msprop:Generator_ColumnVarNameInTable="columnDESCRIPTION" msprop:Generator_ColumnPropNameInRow="DESCRIPTION" msprop:Generator_ColumnPropNameInTable="DESCRIPTIONColumn" msprop:Generator_UserColumnName="DESCRIPTION">
|
||||
<xs:simpleType>
|
||||
<xs:restriction base="xs:string">
|
||||
@ -1102,13 +1052,6 @@ SELECT GUID, PROFILE_ID, WINDOW_ID, PROCESS_NAME, DESCRIPTION, AUTOMATION_ID, FR
|
||||
</xs:simpleType>
|
||||
</xs:element>
|
||||
<xs:element name="SEQUENCE" msprop:Generator_ColumnVarNameInTable="columnSEQUENCE" msprop:Generator_ColumnPropNameInRow="SEQUENCE" msprop:Generator_ColumnPropNameInTable="SEQUENCEColumn" msprop:Generator_UserColumnName="SEQUENCE" type="xs:unsignedByte" />
|
||||
<xs:element name="REGEX_CLIPBOARD" msprop:Generator_ColumnVarNameInTable="columnREGEX_CLIPBOARD" msprop:Generator_ColumnPropNameInRow="REGEX_CLIPBOARD" msprop:Generator_ColumnPropNameInTable="REGEX_CLIPBOARDColumn" msprop:Generator_UserColumnName="REGEX_CLIPBOARD">
|
||||
<xs:simpleType>
|
||||
<xs:restriction base="xs:string">
|
||||
<xs:maxLength value="500" />
|
||||
</xs:restriction>
|
||||
</xs:simpleType>
|
||||
</xs:element>
|
||||
<xs:element name="ADDED_WHO" msprop:Generator_ColumnVarNameInTable="columnADDED_WHO" msprop:Generator_ColumnPropNameInRow="ADDED_WHO" msprop:Generator_ColumnPropNameInTable="ADDED_WHOColumn" msprop:Generator_UserColumnName="ADDED_WHO">
|
||||
<xs:simpleType>
|
||||
<xs:restriction base="xs:string">
|
||||
@ -1125,6 +1068,7 @@ SELECT GUID, PROFILE_ID, WINDOW_ID, PROCESS_NAME, DESCRIPTION, AUTOMATION_ID, FR
|
||||
</xs:simpleType>
|
||||
</xs:element>
|
||||
<xs:element name="CHANGED_WHEN" msprop:Generator_ColumnVarNameInTable="columnCHANGED_WHEN" msprop:Generator_ColumnPropNameInRow="CHANGED_WHEN" msprop:Generator_ColumnPropNameInTable="CHANGED_WHENColumn" msprop:Generator_UserColumnName="CHANGED_WHEN" type="xs:dateTime" minOccurs="0" />
|
||||
<xs:element name="PROCESS_ID" msprop:Generator_ColumnVarNameInTable="columnPROCESS_ID" msprop:Generator_ColumnPropNameInRow="PROCESS_ID" msprop:Generator_ColumnPropNameInTable="PROCESS_IDColumn" msprop:Generator_UserColumnName="PROCESS_ID" type="xs:int" />
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
@ -1205,15 +1149,7 @@ SELECT GUID, PROFILE_ID, WINDOW_ID, PROCESS_NAME, DESCRIPTION, AUTOMATION_ID, FR
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
<xs:element name="PROFILE_ID" msprop:Generator_ColumnVarNameInTable="columnPROFILE_ID" msprop:Generator_ColumnPropNameInRow="PROFILE_ID" msprop:Generator_ColumnPropNameInTable="PROFILE_IDColumn" msprop:Generator_UserColumnName="PROFILE_ID" type="xs:int" />
|
||||
<xs:element name="WINDOW_ID" msprop:Generator_ColumnVarNameInTable="columnWINDOW_ID" msprop:Generator_ColumnPropNameInRow="WINDOW_ID" msprop:Generator_ColumnPropNameInTable="WINDOW_IDColumn" msprop:Generator_UserColumnName="WINDOW_ID" type="xs:int" />
|
||||
<xs:element name="PROCESS_NAME" msprop:Generator_ColumnVarNameInTable="columnPROCESS_NAME" msprop:Generator_ColumnPropNameInRow="PROCESS_NAME" msprop:Generator_ColumnPropNameInTable="PROCESS_NAMEColumn" msprop:Generator_UserColumnName="PROCESS_NAME">
|
||||
<xs:simpleType>
|
||||
<xs:restriction base="xs:string">
|
||||
<xs:maxLength value="250" />
|
||||
</xs:restriction>
|
||||
</xs:simpleType>
|
||||
</xs:element>
|
||||
<xs:element name="DESCRIPTION" msprop:Generator_ColumnVarNameInTable="columnDESCRIPTION" msprop:Generator_ColumnPropNameInRow="DESCRIPTION" msprop:Generator_ColumnPropNameInTable="DESCRIPTIONColumn" msprop:Generator_UserColumnName="DESCRIPTION">
|
||||
<xs:simpleType>
|
||||
<xs:restriction base="xs:string">
|
||||
@ -1313,8 +1249,6 @@ SELECT GUID, PROFILE_ID, WINDOW_ID, PROCESS_NAME, DESCRIPTION, AUTOMATION_ID, FR
|
||||
<xs:appinfo>
|
||||
<msdata:Relationship name="FK_TBCW_PROF_DATA_SEARCH_PROF_IF" msdata:parent="TBCW_PROFILES" msdata:child="TBCW_PROF_DATA_SEARCH" msdata:parentkey="GUID" msdata:childkey="PROFILE_ID" msprop:Generator_UserChildTable="TBCW_PROF_DATA_SEARCH" msprop:Generator_ChildPropName="GetTBCW_PROF_DATA_SEARCHRows" msprop:Generator_UserRelationName="FK_TBCW_PROF_DATA_SEARCH_PROF_IF" msprop:Generator_ParentPropName="TBCW_PROFILESRow" msprop:Generator_RelationVarName="relationFK_TBCW_PROF_DATA_SEARCH_PROF_IF" msprop:Generator_UserParentTable="TBCW_PROFILES" />
|
||||
<msdata:Relationship name="FK_TBCW_PROF_DOC_SEARCH_PROF_IF" msdata:parent="TBCW_PROFILES" msdata:child="TBCW_PROF_DOC_SEARCH" msdata:parentkey="GUID" msdata:childkey="PROFILE_ID" msprop:Generator_UserChildTable="TBCW_PROF_DOC_SEARCH" msprop:Generator_ChildPropName="GetTBCW_PROF_DOC_SEARCHRows" msprop:Generator_UserRelationName="FK_TBCW_PROF_DOC_SEARCH_PROF_IF" msprop:Generator_ParentPropName="TBCW_PROFILESRow" msprop:Generator_RelationVarName="relationFK_TBCW_PROF_DOC_SEARCH_PROF_IF" msprop:Generator_UserParentTable="TBCW_PROFILES" />
|
||||
<msdata:Relationship name="FK_TBCW_PROF_REL_CONTROL_PROF_ID" msdata:parent="TBCW_PROFILES" msdata:child="TBCW_PROF_REL_WINDOW" msdata:parentkey="GUID" msdata:childkey="PROFILE_ID" msprop:Generator_UserChildTable="TBCW_PROF_REL_WINDOW" msprop:Generator_ChildPropName="GetTBCW_PROF_REL_WINDOWRows" msprop:Generator_UserRelationName="FK_TBCW_PROF_REL_CONTROL_PROF_ID" msprop:Generator_RelationVarName="relationFK_TBCW_PROF_REL_CONTROL_PROF_ID" msprop:Generator_UserParentTable="TBCW_PROFILES" msprop:Generator_ParentPropName="TBCW_PROFILESRow" />
|
||||
<msdata:Relationship name="FK_TBCW_PROF_REL_CONTROL_PROF_IF" msdata:parent="TBCW_PROFILES" msdata:child="TBCW_PROF_REL_CONTROL" msdata:parentkey="GUID" msdata:childkey="PROFILE_ID" msprop:Generator_UserChildTable="TBCW_PROF_REL_CONTROL" msprop:Generator_ChildPropName="GetTBCW_PROF_REL_CONTROLRows" msprop:Generator_UserRelationName="FK_TBCW_PROF_REL_CONTROL_PROF_IF" msprop:Generator_ParentPropName="TBCW_PROFILESRow" msprop:Generator_RelationVarName="relationFK_TBCW_PROF_REL_CONTROL_PROF_IF" msprop:Generator_UserParentTable="TBCW_PROFILES" />
|
||||
</xs:appinfo>
|
||||
</xs:annotation>
|
||||
</xs:schema>
|
||||
@ -4,28 +4,28 @@
|
||||
Changes to this file may cause incorrect behavior and will be lost if
|
||||
the code is regenerated.
|
||||
</autogenerated>-->
|
||||
<DiagramLayout xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" ex:showrelationlabel="False" ViewPortX="-10" ViewPortY="-54" xmlns:ex="urn:schemas-microsoft-com:xml-msdatasource-layout-extended" xmlns="urn:schemas-microsoft-com:xml-msdatasource-layout">
|
||||
<DiagramLayout xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" ex:showrelationlabel="False" ViewPortX="-10" ViewPortY="7" xmlns:ex="urn:schemas-microsoft-com:xml-msdatasource-layout-extended" xmlns="urn:schemas-microsoft-com:xml-msdatasource-layout">
|
||||
<Shapes>
|
||||
<Shape ID="DesignTable:TBCW_PROFILES" ZOrder="18" X="13" Y="-44" Height="286" Width="240" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="235" />
|
||||
<Shape ID="DesignTable:TBCW_USER_PROFILE" ZOrder="4" X="680" Y="299" Height="172" Width="271" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="121" />
|
||||
<Shape ID="DesignTable:VWUSER_PROFILE" ZOrder="17" X="1049" Y="11" Height="250" Width="191" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="24" SplitterPosition="142" />
|
||||
<Shape ID="DesignTable:TBCW_PROFILE_PROCESS" ZOrder="15" X="20" Y="585" Height="172" Width="294" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="121" />
|
||||
<Shape ID="DesignTable:TBCW_PROF_DATA_SEARCH" ZOrder="14" X="630" Y="-32" Height="305" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
|
||||
<Shape ID="DesignTable:TBCW_PROF_DOC_SEARCH" ZOrder="12" X="321" Y="20" Height="305" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
|
||||
<Shape ID="DesignTable:TBCW_GROUP_PROFILE" ZOrder="1" X="336" Y="635" Height="172" Width="281" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="121" />
|
||||
<Shape ID="DesignTable:VWCW_GROUP_PROFILE" ZOrder="9" X="1252" Y="5" Height="248" Width="218" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="159" />
|
||||
<Shape ID="DesignTable:TBCW_PROF_REL_WINDOW" ZOrder="7" X="10" Y="270" Height="286" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="235" />
|
||||
<Shape ID="DesignTable:TBDD_CONNECTION" ZOrder="3" X="675" Y="483" Height="305" Width="264" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
|
||||
<Shape ID="DesignTable:TBCW_PROF_REL_CONTROL" ZOrder="2" X="328" Y="334" Height="305" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
|
||||
<Shape ID="DesignTable:TBWH_User" ZOrder="16" X="1221" Y="436" Height="124" Width="150" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="139" />
|
||||
<Shape ID="DesignTable:TBWH_GROUP" ZOrder="10" X="1240" Y="329" Height="67" Width="150" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="63" />
|
||||
<Shape ID="DesignTable:TBWH_PROFILE_TYPE" ZOrder="8" X="1204" Y="609" Height="67" Width="190" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="63" />
|
||||
<Shape ID="DesignTable:TBCW_PROFILES" ZOrder="16" X="14" Y="-44" Height="286" Width="240" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="235" />
|
||||
<Shape ID="DesignTable:TBCW_USER_PROFILE" ZOrder="5" X="680" Y="299" Height="172" Width="271" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="121" />
|
||||
<Shape ID="DesignTable:VWUSER_PROFILE" ZOrder="15" X="1049" Y="11" Height="250" Width="191" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="24" SplitterPosition="142" />
|
||||
<Shape ID="DesignTable:TBCW_PROFILE_PROCESS" ZOrder="13" X="20" Y="585" Height="172" Width="294" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="121" />
|
||||
<Shape ID="DesignTable:TBCW_PROF_DATA_SEARCH" ZOrder="12" X="630" Y="-32" Height="305" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
|
||||
<Shape ID="DesignTable:TBCW_PROF_DOC_SEARCH" ZOrder="10" X="321" Y="20" Height="305" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
|
||||
<Shape ID="DesignTable:TBCW_GROUP_PROFILE" ZOrder="3" X="336" Y="635" Height="172" Width="281" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="121" />
|
||||
<Shape ID="DesignTable:VWCW_GROUP_PROFILE" ZOrder="7" X="1252" Y="5" Height="248" Width="218" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="159" />
|
||||
<Shape ID="DesignTable:TBCW_PROF_REL_WINDOW" ZOrder="2" X="10" Y="259" Height="324" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="235" />
|
||||
<Shape ID="DesignTable:TBDD_CONNECTION" ZOrder="4" X="675" Y="483" Height="305" Width="264" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
|
||||
<Shape ID="DesignTable:TBCW_PROF_REL_CONTROL" ZOrder="1" X="328" Y="330" Height="305" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
|
||||
<Shape ID="DesignTable:TBWH_User" ZOrder="14" X="1221" Y="436" Height="124" Width="150" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="139" />
|
||||
<Shape ID="DesignTable:TBWH_GROUP" ZOrder="8" X="1240" Y="329" Height="67" Width="150" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="63" />
|
||||
<Shape ID="DesignTable:TBWH_PROFILE_TYPE" ZOrder="6" X="1204" Y="609" Height="67" Width="190" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="63" />
|
||||
</Shapes>
|
||||
<Connectors>
|
||||
<Connector ID="DesignRelation:FK_TBCW_PROF_DATA_SEARCH_PROF_IF" ZOrder="13" LineWidth="11">
|
||||
<Connector ID="DesignRelation:FK_TBCW_PROF_DATA_SEARCH_PROF_IF" ZOrder="11" LineWidth="11">
|
||||
<RoutePoints>
|
||||
<Point>
|
||||
<X>253</X>
|
||||
<X>254</X>
|
||||
<Y>-23</Y>
|
||||
</Point>
|
||||
<Point>
|
||||
@ -34,10 +34,10 @@
|
||||
</Point>
|
||||
</RoutePoints>
|
||||
</Connector>
|
||||
<Connector ID="DesignRelation:FK_TBCW_PROF_DOC_SEARCH_PROF_IF" ZOrder="11" LineWidth="11">
|
||||
<Connector ID="DesignRelation:FK_TBCW_PROF_DOC_SEARCH_PROF_IF" ZOrder="9" LineWidth="11">
|
||||
<RoutePoints>
|
||||
<Point>
|
||||
<X>253</X>
|
||||
<X>254</X>
|
||||
<Y>61</Y>
|
||||
</Point>
|
||||
<Point>
|
||||
@ -46,33 +46,5 @@
|
||||
</Point>
|
||||
</RoutePoints>
|
||||
</Connector>
|
||||
<Connector ID="DesignRelation:FK_TBCW_PROF_REL_CONTROL_PROF_ID" ZOrder="6" LineWidth="11">
|
||||
<RoutePoints>
|
||||
<Point>
|
||||
<X>133</X>
|
||||
<Y>242</Y>
|
||||
</Point>
|
||||
<Point>
|
||||
<X>133</X>
|
||||
<Y>270</Y>
|
||||
</Point>
|
||||
</RoutePoints>
|
||||
</Connector>
|
||||
<Connector ID="DesignRelation:FK_TBCW_PROF_REL_CONTROL_PROF_IF" ZOrder="5" LineWidth="11">
|
||||
<RoutePoints>
|
||||
<Point>
|
||||
<X>236</X>
|
||||
<Y>242</Y>
|
||||
</Point>
|
||||
<Point>
|
||||
<X>236</X>
|
||||
<Y>351</Y>
|
||||
</Point>
|
||||
<Point>
|
||||
<X>328</X>
|
||||
<Y>351</Y>
|
||||
</Point>
|
||||
</RoutePoints>
|
||||
</Connector>
|
||||
</Connectors>
|
||||
</DiagramLayout>
|
||||
@ -1,154 +0,0 @@
|
||||
Imports DD_LIB_Standards
|
||||
Imports System.IO
|
||||
Imports System.Text
|
||||
Imports System.Runtime.InteropServices
|
||||
|
||||
Public Class clsSearch
|
||||
'Fenster position ermitteln/auslesen
|
||||
'Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Integer
|
||||
Private Declare Function GetWindowRect Lib "user32.dll" (ByVal hWnd As IntPtr, ByRef lpRect As RECT) As Int32
|
||||
Private Declare Function ShowWindow Lib "user32" (ByVal handle As IntPtr, ByVal nCmdShow As Integer) As Integer
|
||||
<DllImport("user32.dll")>
|
||||
Private Shared Function SetForegroundWindow(ByVal hWnd As IntPtr) As <MarshalAs(UnmanagedType.Bool)> Boolean
|
||||
End Function
|
||||
|
||||
Private Structure RECT
|
||||
Dim Left As Integer
|
||||
Dim Top As Integer
|
||||
Dim Right As Integer
|
||||
Dim Bottom As Integer
|
||||
End Structure
|
||||
|
||||
Private Shared fileContents As String
|
||||
Public Shared Function RUN_WD_SEARCH(BaseSearch As String)
|
||||
Try
|
||||
Dim extension = Path.GetExtension(BaseSearch)
|
||||
Dim windream_temp_search As String = ""
|
||||
If IO.File.Exists(BaseSearch) = False Then
|
||||
Logger.Info("Die Windream-Suche existiert nicht oder ist nicht zugreifbar!", True)
|
||||
MsgBox("Die Windream-Suche existiert nicht oder ist nicht zugreifbar!", MsgBoxStyle.Critical)
|
||||
Return Nothing
|
||||
End If
|
||||
|
||||
fileContents = ""
|
||||
'Eine tempfile generieren
|
||||
Dim tempFilename1 = My.Computer.FileSystem.GetTempFileName()
|
||||
'Nur den Filenamen ohne Erweiterung
|
||||
Dim tempName = Path.GetFileNameWithoutExtension(tempFilename1)
|
||||
'tempfile löschen
|
||||
If My.Computer.FileSystem.FileExists(tempFilename1) Then
|
||||
My.Computer.FileSystem.DeleteFile(tempFilename1)
|
||||
End If
|
||||
|
||||
Dim temppath = Path.GetTempPath
|
||||
Dim EncodingFormat As Encoding
|
||||
|
||||
If WD_UNICODE = True Then
|
||||
EncodingFormat = Encoding.GetEncoding(1252) '1252
|
||||
Logger.Debug(" ...Unicode is used (Encoding.GetEncoding(1252))", False)
|
||||
Else
|
||||
Logger.Debug(" ...UTF8 (Encoding.GetEncoding(65001))", False)
|
||||
EncodingFormat = Encoding.GetEncoding(65001)
|
||||
End If
|
||||
|
||||
Logger.Debug(" ...ReadAlltext: " & BaseSearch, False)
|
||||
fileContents = My.Computer.FileSystem.ReadAllText(BaseSearch, EncodingFormat) ', System.Text.Encoding.Unicode
|
||||
Logger.Debug(" ...fileContents geladen", False)
|
||||
fileContents = fileContents.Replace("Í", "Ö")
|
||||
fileContents = fileContents.Replace("@Clipboard", CURRENT_CLIPBOARD_CONTENTS)
|
||||
fileContents = fileContents.Replace("@CLIPBOARD", CURRENT_CLIPBOARD_CONTENTS)
|
||||
fileContents = fileContents.Replace("@Zwischenablage", CURRENT_CLIPBOARD_CONTENTS)
|
||||
fileContents = fileContents.Replace("123456789", CURRENT_CLIPBOARD_CONTENTS)
|
||||
fileContents = fileContents.Replace("4711", CURRENT_CLIPBOARD_CONTENTS)
|
||||
Try
|
||||
'Die windream File zusammensetzen
|
||||
windream_temp_search = temppath & tempName & extension
|
||||
Try
|
||||
'Die File schreiben
|
||||
My.Computer.FileSystem.WriteAllText(windream_temp_search, fileContents, False, EncodingFormat)
|
||||
Logger.Debug(" ...wrote Text to windream_temp_search: " & windream_temp_search, False)
|
||||
' XML-Datei öffnen und laden
|
||||
Dim Stream As New IO.StreamReader(CStr(windream_temp_search), EncodingFormat)
|
||||
Dim Reader As New System.Xml.XmlTextReader(Stream)
|
||||
|
||||
' XML-Datei initialisieren
|
||||
Dim xml As New System.Xml.XmlDocument()
|
||||
' XML-Datei öffnen und laden
|
||||
xml.Load(Reader)
|
||||
Reader.Close()
|
||||
xml.Save(windream_temp_search)
|
||||
Logger.Debug(" ...Xml Generiert: " & windream_temp_search, False)
|
||||
Catch ex As Exception
|
||||
Logger.Info("TempFile could not be created: " & ex.Message, True)
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Unerwarteter Fehler in Write XmlSearch:")
|
||||
End Try
|
||||
|
||||
CURRENT_WD_TEMPSEARCH = windream_temp_search
|
||||
TEMP_FILES.Add(CURRENT_WD_TEMPSEARCH)
|
||||
Try
|
||||
Dim myhWnd As IntPtr
|
||||
Dim p As New Process()
|
||||
p.StartInfo.FileName = windream_temp_search
|
||||
If My.Settings.WDSearch_maximized = True Then
|
||||
p.StartInfo.WindowStyle = ProcessWindowStyle.Maximized
|
||||
Else
|
||||
p.StartInfo.WindowStyle = ProcessWindowStyle.Normal
|
||||
End If
|
||||
p.Start()
|
||||
|
||||
myhWnd = p.MainWindowHandle
|
||||
Threading.Thread.Sleep(1000)
|
||||
Dim rctMain As RECT
|
||||
GetWindowRect(p.MainWindowHandle, rctMain)
|
||||
If LogErrorsOnly = False Then
|
||||
Logger.Debug(" ...Top-Position: " & rctMain.Top.ToString, False)
|
||||
Logger.Debug(" ...Left-Position: " & rctMain.Left.ToString, False)
|
||||
Logger.Debug(" ...Right-Position: " & rctMain.Right.ToString, False)
|
||||
Logger.Debug(" ...Bottom-Position: " & rctMain.Bottom.ToString, False)
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Unexpected error in Ausführen der windream-Suche:")
|
||||
Logger.Info("Unexpected error while executing search: " & ex.Message, True)
|
||||
Return "Unexpected error while executing search"
|
||||
End Try
|
||||
Dim psList() As Process
|
||||
Try
|
||||
psList = Process.GetProcesses()
|
||||
|
||||
For Each p As Process In psList
|
||||
Console.WriteLine(p.Id.ToString() + " " + p.ProcessName)
|
||||
If p.ProcessName.Contains("indream.Find") Then
|
||||
AppActivate(p.Id)
|
||||
If My.Settings.WDSearch_maximized = False Then
|
||||
Dim rctMain As RECT
|
||||
GetWindowRect(p.MainWindowHandle, rctMain)
|
||||
If rctMain.Left = 0 Or rctMain.Right = 0 Then
|
||||
ShowWindow(p.MainWindowHandle, 3) ' SW_MAXIMIZE
|
||||
End If
|
||||
End If
|
||||
SetForegroundWindow(p.MainWindowHandle)
|
||||
End If
|
||||
|
||||
Next p
|
||||
|
||||
Catch ex As Exception
|
||||
Logger.Info("Unexpected error while Setting foreground: " & ex.Message)
|
||||
End Try
|
||||
'CURR_MATCH_WM_SEARCH = Nothing
|
||||
CURRENT_CLIPBOARD_CONTENTS = Nothing
|
||||
Return ""
|
||||
Catch ex As Exception
|
||||
Logger.Info("Unexpected error in Create Search: " & ex.Message)
|
||||
MsgBox("Error in Create Search:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
Return "Unexpected error in Create Search"
|
||||
End Try
|
||||
|
||||
Catch ex As Exception
|
||||
Logger.Info("Unexpected error in RUN_WD_SEARCH: " & ex.Message)
|
||||
MsgBox("Error in RUN_WD_SEARCH:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
Return "Unerwarteter Unexpected error in RUN_WD_SEARCH"
|
||||
End Try
|
||||
|
||||
|
||||
End Function
|
||||
End Class
|
||||
@ -28,12 +28,10 @@ Partial Class ctrlApplicationAssignment
|
||||
Me.TBCW_PROF_REL_WINDOWBindingSource = New System.Windows.Forms.BindingSource(Me.components)
|
||||
Me.MyDataset = New DD_Clipboard_Watcher.MyDataset()
|
||||
Me.GridView_Window = New DevExpress.XtraGrid.Views.Grid.GridView()
|
||||
Me.colPROCESS_NAME = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
Me.colGUID = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
Me.colDESCRIPTION = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
Me.colREGEX = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
Me.RepositoryItemRegexEdit = New DevExpress.XtraEditors.Repository.RepositoryItemButtonEdit()
|
||||
Me.colREGEX_CLIPBOARD = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
Me.RepositoryItemSpinEdit1 = New DevExpress.XtraEditors.Repository.RepositoryItemSpinEdit()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.GridControl_Control = New DevExpress.XtraGrid.GridControl()
|
||||
@ -124,21 +122,18 @@ Partial Class ctrlApplicationAssignment
|
||||
'
|
||||
Me.GridView_Window.Appearance.EvenRow.BackColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer))
|
||||
Me.GridView_Window.Appearance.EvenRow.Options.UseBackColor = True
|
||||
Me.GridView_Window.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.colPROCESS_NAME, Me.colGUID, Me.colDESCRIPTION, Me.colREGEX, Me.colREGEX_CLIPBOARD})
|
||||
Me.GridView_Window.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.colGUID, Me.colDESCRIPTION, Me.colREGEX})
|
||||
Me.GridView_Window.GridControl = Me.GridControl_Window
|
||||
Me.GridView_Window.Name = "GridView_Window"
|
||||
Me.GridView_Window.OptionsView.EnableAppearanceEvenRow = True
|
||||
'
|
||||
'colPROCESS_NAME
|
||||
'
|
||||
Me.colPROCESS_NAME.FieldName = "PROCESS_NAME"
|
||||
Me.colPROCESS_NAME.Name = "colPROCESS_NAME"
|
||||
'
|
||||
'colGUID
|
||||
'
|
||||
Me.colGUID.Caption = "GUID"
|
||||
Me.colGUID.FieldName = "GUID"
|
||||
Me.colGUID.Name = "colGUID"
|
||||
Me.colGUID.Visible = True
|
||||
Me.colGUID.VisibleIndex = 0
|
||||
'
|
||||
'colDESCRIPTION
|
||||
'
|
||||
@ -146,7 +141,7 @@ Partial Class ctrlApplicationAssignment
|
||||
Me.colDESCRIPTION.FieldName = "DESCRIPTION"
|
||||
Me.colDESCRIPTION.Name = "colDESCRIPTION"
|
||||
Me.colDESCRIPTION.Visible = True
|
||||
Me.colDESCRIPTION.VisibleIndex = 0
|
||||
Me.colDESCRIPTION.VisibleIndex = 1
|
||||
'
|
||||
'colREGEX
|
||||
'
|
||||
@ -155,7 +150,7 @@ Partial Class ctrlApplicationAssignment
|
||||
Me.colREGEX.FieldName = "REGEX"
|
||||
Me.colREGEX.Name = "colREGEX"
|
||||
Me.colREGEX.Visible = True
|
||||
Me.colREGEX.VisibleIndex = 1
|
||||
Me.colREGEX.VisibleIndex = 2
|
||||
'
|
||||
'RepositoryItemRegexEdit
|
||||
'
|
||||
@ -163,15 +158,6 @@ Partial Class ctrlApplicationAssignment
|
||||
Me.RepositoryItemRegexEdit.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton()})
|
||||
Me.RepositoryItemRegexEdit.Name = "RepositoryItemRegexEdit"
|
||||
'
|
||||
'colREGEX_CLIPBOARD
|
||||
'
|
||||
Me.colREGEX_CLIPBOARD.Caption = "Clipboard Regex"
|
||||
Me.colREGEX_CLIPBOARD.ColumnEdit = Me.RepositoryItemRegexEdit
|
||||
Me.colREGEX_CLIPBOARD.FieldName = "REGEX_CLIPBOARD"
|
||||
Me.colREGEX_CLIPBOARD.Name = "colREGEX_CLIPBOARD"
|
||||
Me.colREGEX_CLIPBOARD.Visible = True
|
||||
Me.colREGEX_CLIPBOARD.VisibleIndex = 2
|
||||
'
|
||||
'RepositoryItemSpinEdit1
|
||||
'
|
||||
Me.RepositoryItemSpinEdit1.AutoHeight = False
|
||||
@ -181,7 +167,7 @@ Partial Class ctrlApplicationAssignment
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.Dock = System.Windows.Forms.DockStyle.Top
|
||||
Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label1.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label1.Location = New System.Drawing.Point(0, 0)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(915, 25)
|
||||
@ -233,7 +219,7 @@ Partial Class ctrlApplicationAssignment
|
||||
'
|
||||
'colDESCRIPTION1
|
||||
'
|
||||
Me.colDESCRIPTION1.Caption = "Beschreibung"
|
||||
Me.colDESCRIPTION1.Caption = "FeldName"
|
||||
Me.colDESCRIPTION1.FieldName = "DESCRIPTION"
|
||||
Me.colDESCRIPTION1.Name = "colDESCRIPTION1"
|
||||
Me.colDESCRIPTION1.Visible = True
|
||||
@ -266,7 +252,7 @@ Partial Class ctrlApplicationAssignment
|
||||
'Label2
|
||||
'
|
||||
Me.Label2.Dock = System.Windows.Forms.DockStyle.Top
|
||||
Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label2.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label2.Location = New System.Drawing.Point(0, 0)
|
||||
Me.Label2.Name = "Label2"
|
||||
Me.Label2.Size = New System.Drawing.Size(915, 25)
|
||||
@ -390,10 +376,8 @@ Partial Class ctrlApplicationAssignment
|
||||
Friend WithEvents SplitContainer3 As SplitContainer
|
||||
Friend WithEvents GridControl_Window As DevExpress.XtraGrid.GridControl
|
||||
Friend WithEvents GridView_Window As DevExpress.XtraGrid.Views.Grid.GridView
|
||||
Friend WithEvents colPROCESS_NAME As DevExpress.XtraGrid.Columns.GridColumn
|
||||
Friend WithEvents colDESCRIPTION As DevExpress.XtraGrid.Columns.GridColumn
|
||||
Friend WithEvents colREGEX As DevExpress.XtraGrid.Columns.GridColumn
|
||||
Friend WithEvents colREGEX_CLIPBOARD As DevExpress.XtraGrid.Columns.GridColumn
|
||||
Friend WithEvents GridControl_Control As DevExpress.XtraGrid.GridControl
|
||||
Friend WithEvents GridView_Control As DevExpress.XtraGrid.Views.Grid.GridView
|
||||
Friend WithEvents GridControl3 As DevExpress.XtraGrid.GridControl
|
||||
|
||||
@ -6,10 +6,10 @@ Imports DevExpress.XtraGrid.Views.Grid
|
||||
Imports DigitalData.Controls.RegexEditor
|
||||
|
||||
Public Class ctrlApplicationAssignment
|
||||
|
||||
Public AppSelectionString As String
|
||||
Private Current_ProfileId As Integer
|
||||
Private Current_WindowId As Integer
|
||||
Private Current_ProcessName As String
|
||||
Private Current_ProcessGUID As Integer
|
||||
|
||||
Private Sub ctrlApplicationAssignment_Load(sender As Object, e As EventArgs) Handles Me.Load
|
||||
TBCW_PROFILE_PROCESSTableAdapter.Connection.ConnectionString = MyConnectionString
|
||||
@ -20,9 +20,18 @@ Public Class ctrlApplicationAssignment
|
||||
AddHandler RepositoryItemButtonEdit1.ButtonClick, AddressOf RepositoryItemRegexEdit_Click
|
||||
End Sub
|
||||
|
||||
Public Function Process_Load(ProfileId As Integer) As Boolean
|
||||
Public Function AssignProfileID(ProfileId As Integer) As Boolean
|
||||
Try
|
||||
Current_ProfileId = ProfileId
|
||||
Return True
|
||||
Catch ex As Exception
|
||||
Logger.Error(ex)
|
||||
Return False
|
||||
End Try
|
||||
End Function
|
||||
Public Function Process_Load(ProfileId As Integer) As Boolean
|
||||
Try
|
||||
|
||||
|
||||
TBCW_PROFILE_PROCESSTableAdapter.Fill(MyDataset.TBCW_PROFILE_PROCESS, ProfileId)
|
||||
Return True
|
||||
@ -46,7 +55,7 @@ Public Class ctrlApplicationAssignment
|
||||
If Database.ExecuteNonQuery(oSQL) = False Then
|
||||
Return False
|
||||
Else
|
||||
oSQL = String.Format("INSERT INTO TBCW_PROF_REL_WINDOW (PROFILE_ID, DESCRIPTION, PROCESS_NAME, REGEX, ADDED_WHO) VALUES ({0}, '{1}', '{2}','^{3}$','{4}')", ProfileId, oProcessName, oProcessName, oWindowTitle, Environment.UserName)
|
||||
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)
|
||||
If Database.ExecuteNonQuery(oSQL) = False Then
|
||||
Return False
|
||||
End If
|
||||
@ -65,7 +74,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}", oProcessId)
|
||||
Dim oSQL = String.Format("EXEC PRCW_DELETE_PROCESS {0},{1}", oProcessId, Current_ProfileId)
|
||||
If Database.ExecuteNonQuery(oSQL) Then
|
||||
Process_Load(Current_ProfileId)
|
||||
Return True
|
||||
@ -80,7 +89,7 @@ Public Class ctrlApplicationAssignment
|
||||
|
||||
Public Function Window_Load() As Boolean
|
||||
Try
|
||||
TBCW_PROF_REL_WINDOWTableAdapter.Fill(MyDataset.TBCW_PROF_REL_WINDOW, Current_ProcessName, Current_ProfileId)
|
||||
TBCW_PROF_REL_WINDOWTableAdapter.Fill(MyDataset.TBCW_PROF_REL_WINDOW, CURRENT_PROCESSID)
|
||||
|
||||
Return True
|
||||
Catch ex As Exception
|
||||
@ -112,7 +121,7 @@ Public Class ctrlApplicationAssignment
|
||||
Dim oProcessName As String = oForm.ProcessName
|
||||
|
||||
If oWindowTitle <> "" Then
|
||||
Dim insert = String.Format("INSERT INTO TBCW_PROF_REL_WINDOW (PROFILE_ID, DESCRIPTION, PROCESS_NAME, REGEX, ADDED_WHO) VALUES ({0}, '{1}', '{2}','^{3}$','{4}')", ProfileId, oProcessName, oProcessName, oWindowTitle, Environment.UserName)
|
||||
Dim insert = String.Format("INSERT INTO TBCW_PROF_REL_WINDOW (DESCRIPTION, REGEX, ADDED_WHO,PROCESS_ID) VALUES ('{0}', '^{1}$','{2}',{3})", oWindowTitle, oWindowTitle, Environment.UserName, CURRENT_PROCESSID)
|
||||
If Database.ExecuteNonQuery(insert) = False Then
|
||||
Return False
|
||||
End If
|
||||
@ -130,7 +139,7 @@ Public Class ctrlApplicationAssignment
|
||||
Public Function Window_DeleteAssignment() As Boolean
|
||||
Try
|
||||
Dim oGuid = GridView_Window.GetFocusedRowCellValue(GridView_Window.Columns("GUID"))
|
||||
Dim oSQL = String.Format("DELETE FROM TBCW_PROF_REL_WINDOW WHERE GUID = {0}", oGuid)
|
||||
Dim oSQL = String.Format("EXEC PRCW_DELETE_WINDOW {0}", oGuid)
|
||||
If Database.ExecuteNonQuery(oSQL) Then
|
||||
Process_Load(Current_ProfileId)
|
||||
Return True
|
||||
@ -145,14 +154,15 @@ Public Class ctrlApplicationAssignment
|
||||
|
||||
Public Function Window_SaveAssignment() As Boolean
|
||||
Try
|
||||
GridView_Window.CloseEditor()
|
||||
TBCW_PROF_REL_WINDOWBindingSource.EndEdit()
|
||||
GridView_Window.CloseEditor()
|
||||
If Not IsNothing(MyDataset.TBCW_PROF_REL_WINDOW.GetChanges) Then
|
||||
TBCW_PROF_REL_WINDOWBindingSource.EndEdit()
|
||||
TBCW_PROF_REL_WINDOWTableAdapter.Update(MyDataset.TBCW_PROF_REL_WINDOW)
|
||||
Return True
|
||||
End If
|
||||
|
||||
Return True
|
||||
|
||||
Catch ex As Exception
|
||||
Logger.Error(ex)
|
||||
Return False
|
||||
@ -161,7 +171,7 @@ Public Class ctrlApplicationAssignment
|
||||
|
||||
Public Function Control_Load() As Boolean
|
||||
Try
|
||||
TBCW_PROF_REL_CONTROLTableAdapter.Fill(MyDataset.TBCW_PROF_REL_CONTROL, Current_ProcessName, Current_WindowId, Current_ProfileId)
|
||||
TBCW_PROF_REL_CONTROLTableAdapter.Fill(MyDataset.TBCW_PROF_REL_CONTROL, Current_WindowId)
|
||||
|
||||
Return True
|
||||
Catch ex As Exception
|
||||
@ -170,7 +180,7 @@ Public Class ctrlApplicationAssignment
|
||||
End Try
|
||||
End Function
|
||||
|
||||
Public Function Control_CreateAssignment(ProfileId As Integer) As Boolean
|
||||
Public Function Control_CreateAssignment() As Boolean
|
||||
Dim oForm As New frmControlCapture()
|
||||
Dim oResult = oForm.ShowDialog()
|
||||
|
||||
@ -183,7 +193,8 @@ Public Class ctrlApplicationAssignment
|
||||
Dim oDefaultRegex As String = "\.+"
|
||||
|
||||
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)
|
||||
Dim insert = String.Format("INSERT INTO TBCW_PROF_REL_CONTROL (WINDOW_ID, DESCRIPTION, AUTOMATION_ID, FRAMEWORK_ID, REGEX, ADDED_WHO) VALUES ({0}, '{1}', '{2}', '{3}', '^{4}$','{5}')",
|
||||
Current_WindowId, oControlTitle, oAutomationId, oFrameworkId, oDefaultRegex, Environment.UserName)
|
||||
If Database.ExecuteNonQuery(insert) = False Then
|
||||
Return False
|
||||
End If
|
||||
@ -202,14 +213,15 @@ Public Class ctrlApplicationAssignment
|
||||
|
||||
Public Function Control_SaveAssignment() As Boolean
|
||||
Try
|
||||
GridView_Control.CloseEditor()
|
||||
TBCW_PROF_REL_CONTROLBindingSource.EndEdit()
|
||||
GridView_Control.CloseEditor()
|
||||
If Not IsNothing(MyDataset.TBCW_PROF_REL_CONTROL.GetChanges) Then
|
||||
TBCW_PROF_REL_CONTROLBindingSource.EndEdit()
|
||||
TBCW_PROF_REL_CONTROLTableAdapter.Update(MyDataset.TBCW_PROF_REL_CONTROL)
|
||||
Return True
|
||||
End If
|
||||
|
||||
Return True
|
||||
|
||||
Catch ex As Exception
|
||||
Logger.Error(ex)
|
||||
Return False
|
||||
@ -239,7 +251,12 @@ Public Class ctrlApplicationAssignment
|
||||
|
||||
Dim oSelectedRow As DataRow = GridViewProcessProfile.GetDataRow(e.FocusedRowHandle)
|
||||
Dim oProcessName As String = oSelectedRow.Item("PROC_NAME")
|
||||
Current_ProcessName = oProcessName
|
||||
Dim oPRocessGUID = oSelectedRow.Item("GUID")
|
||||
AppSelectionString = $"Selected Profile: {oPRocessGUID}-{oProcessName}"
|
||||
CURRENT_PROCESSID = oPRocessGUID
|
||||
CURRENT_PROCESSNAME = oProcessName
|
||||
MyDataset.TBCW_PROF_REL_CONTROL.Clear()
|
||||
MyDataset.TBCW_PROF_REL_WINDOW.Clear()
|
||||
|
||||
If Window_Load() = False Then
|
||||
MsgBox($"Error while loading windows for process {oProcessName}", vbCritical, "")
|
||||
@ -253,16 +270,32 @@ Public Class ctrlApplicationAssignment
|
||||
End Function
|
||||
|
||||
Private Sub GridView_Window_FocusedRowChanged(sender As Object, e As Views.Base.FocusedRowChangedEventArgs) Handles GridView_Window.FocusedRowChanged
|
||||
Try
|
||||
If e.FocusedRowHandle < 0 Then
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
Dim oSelectedRow As DataRow = GridView_Window.GetDataRow(e.FocusedRowHandle)
|
||||
Dim oWindowId As String = oSelectedRow.Item("GUID")
|
||||
Current_WindowId = oWindowId
|
||||
AppSelectionString = AppSelectionString & $" / WindowID: {oWindowId}"
|
||||
|
||||
If Control_Load() = False Then
|
||||
MsgBox($"Error while loading controls for window {oWindowId}", vbCritical, "")
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub GridView_Control_FocusedRowChanged(sender As Object, e As Views.Base.FocusedRowChangedEventArgs) Handles GridView_Control.FocusedRowChanged
|
||||
If e.FocusedRowHandle < 0 Then
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
Dim oSelectedRow As DataRow = GridViewProcessProfile.GetDataRow(e.FocusedRowHandle)
|
||||
Dim oWindowId As String = oSelectedRow.Item("GUID")
|
||||
Current_WindowId = oWindowId
|
||||
|
||||
If Control_Load() = False Then
|
||||
MsgBox($"Error while loading controls for window {oWindowId}", vbCritical, "")
|
||||
End If
|
||||
Dim oSelectedRow As DataRow = GridView_Control.GetDataRow(e.FocusedRowHandle)
|
||||
Dim oControlGUID = oSelectedRow.Item("GUID")
|
||||
AppSelectionString = AppSelectionString & $" - Selected ControlGUID: {oControlGUID}"
|
||||
End Sub
|
||||
End Class
|
||||
|
||||
@ -27,7 +27,7 @@ Partial Class frmAdministration
|
||||
Me.TBCW_PROFILESBindingSource = New System.Windows.Forms.BindingSource(Me.components)
|
||||
Me.MyDataset = New DD_Clipboard_Watcher.MyDataset()
|
||||
Me.GridControlProfiles = New DevExpress.XtraGrid.GridControl()
|
||||
Me.GridView1 = New DevExpress.XtraGrid.Views.Grid.GridView()
|
||||
Me.GridViewProfiles = New DevExpress.XtraGrid.Views.Grid.GridView()
|
||||
Me.colGUID = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
Me.colNAME = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
Me.TBWH_UserBindingSource = New System.Windows.Forms.BindingSource(Me.components)
|
||||
@ -210,10 +210,11 @@ Partial Class frmAdministration
|
||||
Me.LayoutControlItem19 = New DevExpress.XtraLayout.LayoutControlItem()
|
||||
Me.ComboBoxEdit1 = New DevExpress.XtraEditors.ComboBoxEdit()
|
||||
Me.SimpleSeparator1 = New DevExpress.XtraLayout.SimpleSeparator()
|
||||
Me.labelSelection = New DevExpress.XtraBars.BarStaticItem()
|
||||
CType(Me.TBCW_PROFILESBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.MyDataset, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.GridControlProfiles, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.GridView1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.GridViewProfiles, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.TBWH_UserBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.VWUSER_PROFILEBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.TBCW_PROF_DOC_SEARCHBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
@ -353,27 +354,27 @@ Partial Class frmAdministration
|
||||
Me.GridControlProfiles.DataSource = Me.TBCW_PROFILESBindingSource
|
||||
Me.GridControlProfiles.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.GridControlProfiles.Location = New System.Drawing.Point(0, 0)
|
||||
Me.GridControlProfiles.MainView = Me.GridView1
|
||||
Me.GridControlProfiles.MainView = Me.GridViewProfiles
|
||||
Me.GridControlProfiles.Name = "GridControlProfiles"
|
||||
Me.GridControlProfiles.Size = New System.Drawing.Size(159, 615)
|
||||
Me.GridControlProfiles.TabIndex = 18
|
||||
Me.GridControlProfiles.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView1})
|
||||
Me.GridControlProfiles.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridViewProfiles})
|
||||
'
|
||||
'GridView1
|
||||
'GridViewProfiles
|
||||
'
|
||||
Me.GridView1.Appearance.EvenRow.BackColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer))
|
||||
Me.GridView1.Appearance.EvenRow.Options.UseBackColor = True
|
||||
Me.GridView1.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.colGUID, Me.colNAME})
|
||||
Me.GridView1.GridControl = Me.GridControlProfiles
|
||||
Me.GridView1.Name = "GridView1"
|
||||
Me.GridView1.OptionsBehavior.Editable = False
|
||||
Me.GridView1.OptionsView.ColumnAutoWidth = False
|
||||
Me.GridView1.OptionsView.EnableAppearanceEvenRow = True
|
||||
Me.GridView1.OptionsView.ShowAutoFilterRow = True
|
||||
Me.GridView1.OptionsView.ShowDetailButtons = False
|
||||
Me.GridView1.OptionsView.ShowGroupPanel = False
|
||||
Me.GridView1.OptionsView.ShowHorizontalLines = DevExpress.Utils.DefaultBoolean.[True]
|
||||
Me.GridView1.OptionsView.ShowVerticalLines = DevExpress.Utils.DefaultBoolean.[True]
|
||||
Me.GridViewProfiles.Appearance.EvenRow.BackColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer))
|
||||
Me.GridViewProfiles.Appearance.EvenRow.Options.UseBackColor = True
|
||||
Me.GridViewProfiles.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.colGUID, Me.colNAME})
|
||||
Me.GridViewProfiles.GridControl = Me.GridControlProfiles
|
||||
Me.GridViewProfiles.Name = "GridViewProfiles"
|
||||
Me.GridViewProfiles.OptionsBehavior.Editable = False
|
||||
Me.GridViewProfiles.OptionsView.ColumnAutoWidth = False
|
||||
Me.GridViewProfiles.OptionsView.EnableAppearanceEvenRow = True
|
||||
Me.GridViewProfiles.OptionsView.ShowAutoFilterRow = True
|
||||
Me.GridViewProfiles.OptionsView.ShowDetailButtons = False
|
||||
Me.GridViewProfiles.OptionsView.ShowGroupPanel = False
|
||||
Me.GridViewProfiles.OptionsView.ShowHorizontalLines = DevExpress.Utils.DefaultBoolean.[True]
|
||||
Me.GridViewProfiles.OptionsView.ShowVerticalLines = DevExpress.Utils.DefaultBoolean.[True]
|
||||
'
|
||||
'colGUID
|
||||
'
|
||||
@ -526,9 +527,9 @@ Partial Class frmAdministration
|
||||
'
|
||||
Me.RibbonControl2.ApplicationButtonDropDownControl = Me.ApplicationMenu1
|
||||
Me.RibbonControl2.ExpandCollapseItem.Id = 0
|
||||
Me.RibbonControl2.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl2.ExpandCollapseItem, Me.BarButtonItem1, Me.BarButtonItem2, Me.BarButtonItem3, Me.BarButtonItem4, Me.BarButtonItem5, Me.BarButtonItem6, Me.BarButtonItem7, Me.BarButtonItem8, Me.BarButtonItem9, Me.BarButtonItem10, Me.BarButtonItem11, Me.BarButtonItem12, Me.BarButtonItem13, Me.BarButtonItem14, Me.BarButtonItem16, Me.BarButtonItem17, Me.BarButtonItem15, Me.BarButtonItem18, Me.BarButtonItem19, Me.BarButtonItem20, Me.BarButtonItem21, Me.BarButtonItem22, Me.labelStatus, Me.BarButtonItem23, Me.BarButtonItem24, Me.BarButtonItem25, Me.BarButtonItem26})
|
||||
Me.RibbonControl2.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl2.ExpandCollapseItem, Me.BarButtonItem1, Me.BarButtonItem2, Me.BarButtonItem3, Me.BarButtonItem4, Me.BarButtonItem5, Me.BarButtonItem6, Me.BarButtonItem7, Me.BarButtonItem8, Me.BarButtonItem9, Me.BarButtonItem10, Me.BarButtonItem11, Me.BarButtonItem12, Me.BarButtonItem13, Me.BarButtonItem14, Me.BarButtonItem16, Me.BarButtonItem17, Me.BarButtonItem15, Me.BarButtonItem18, Me.BarButtonItem19, Me.BarButtonItem20, Me.BarButtonItem21, Me.BarButtonItem22, Me.labelStatus, Me.BarButtonItem23, Me.BarButtonItem24, Me.BarButtonItem25, Me.BarButtonItem26, Me.labelSelection})
|
||||
Me.RibbonControl2.Location = New System.Drawing.Point(0, 0)
|
||||
Me.RibbonControl2.MaxItemId = 12
|
||||
Me.RibbonControl2.MaxItemId = 13
|
||||
Me.RibbonControl2.Name = "RibbonControl2"
|
||||
Me.RibbonControl2.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage2})
|
||||
Me.RibbonControl2.ShowExpandCollapseButton = DevExpress.Utils.DefaultBoolean.[False]
|
||||
@ -836,6 +837,7 @@ Partial Class frmAdministration
|
||||
'RibbonStatusBar1
|
||||
'
|
||||
Me.RibbonStatusBar1.ItemLinks.Add(Me.labelStatus)
|
||||
Me.RibbonStatusBar1.ItemLinks.Add(Me.labelSelection)
|
||||
Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 761)
|
||||
Me.RibbonStatusBar1.Name = "RibbonStatusBar1"
|
||||
Me.RibbonStatusBar1.Ribbon = Me.RibbonControl2
|
||||
@ -2128,6 +2130,11 @@ Partial Class frmAdministration
|
||||
Me.SimpleSeparator1.Name = "SimpleSeparator1"
|
||||
Me.SimpleSeparator1.Size = New System.Drawing.Size(280, 2)
|
||||
'
|
||||
'labelSelection
|
||||
'
|
||||
Me.labelSelection.Id = 12
|
||||
Me.labelSelection.Name = "labelSelection"
|
||||
'
|
||||
'frmAdministration
|
||||
'
|
||||
Me.Appearance.Options.UseFont = True
|
||||
@ -2147,7 +2154,7 @@ Partial Class frmAdministration
|
||||
CType(Me.TBCW_PROFILESBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.MyDataset, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.GridControlProfiles, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.GridView1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.GridViewProfiles, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.TBWH_UserBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.VWUSER_PROFILEBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.TBCW_PROF_DOC_SEARCHBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
@ -2279,7 +2286,7 @@ Partial Class frmAdministration
|
||||
Friend WithEvents TBCW_PROFILESTableAdapter As DD_Clipboard_Watcher.MyDatasetTableAdapters.TBCW_PROFILESTableAdapter
|
||||
Friend WithEvents TableAdapterManager As DD_Clipboard_Watcher.MyDatasetTableAdapters.TableAdapterManager
|
||||
Friend WithEvents GridControlProfiles As DevExpress.XtraGrid.GridControl
|
||||
Friend WithEvents GridView1 As DevExpress.XtraGrid.Views.Grid.GridView
|
||||
Friend WithEvents GridViewProfiles As DevExpress.XtraGrid.Views.Grid.GridView
|
||||
Friend WithEvents colGUID As DevExpress.XtraGrid.Columns.GridColumn
|
||||
Friend WithEvents colNAME As DevExpress.XtraGrid.Columns.GridColumn
|
||||
Friend WithEvents OFDWindreamsuche As System.Windows.Forms.OpenFileDialog
|
||||
@ -2460,4 +2467,5 @@ Partial Class frmAdministration
|
||||
Friend WithEvents BarButtonItem24 As DevExpress.XtraBars.BarButtonItem
|
||||
Friend WithEvents BarButtonItem25 As DevExpress.XtraBars.BarButtonItem
|
||||
Friend WithEvents BarButtonItem26 As DevExpress.XtraBars.BarButtonItem
|
||||
Friend WithEvents labelSelection As DevExpress.XtraBars.BarStaticItem
|
||||
End Class
|
||||
|
||||
@ -124,7 +124,7 @@
|
||||
<value>245, 17</value>
|
||||
</metadata>
|
||||
<metadata name="TBWH_UserBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>345, 56</value>
|
||||
<value>122, 56</value>
|
||||
</metadata>
|
||||
<metadata name="VWUSER_PROFILEBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>17, 17</value>
|
||||
@ -136,28 +136,28 @@
|
||||
<value>789, 17</value>
|
||||
</metadata>
|
||||
<metadata name="OFDWindreamsuche.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>1315, 17</value>
|
||||
<value>962, 17</value>
|
||||
</metadata>
|
||||
<metadata name="VWUSER_PROFILETableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>17, 56</value>
|
||||
<value>1125, 17</value>
|
||||
</metadata>
|
||||
<metadata name="TimerTest.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>240, 56</value>
|
||||
<value>17, 56</value>
|
||||
</metadata>
|
||||
<metadata name="BackgroundWorker1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>1071, 56</value>
|
||||
<value>316, 56</value>
|
||||
</metadata>
|
||||
<metadata name="ToolTip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>1234, 56</value>
|
||||
<value>479, 56</value>
|
||||
</metadata>
|
||||
<metadata name="TBCW_PROF_DOC_SEARCHBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>733, 95</value>
|
||||
<value>1140, 56</value>
|
||||
</metadata>
|
||||
<metadata name="TBCW_PROF_DATA_SEARCHBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>17, 95</value>
|
||||
<value>578, 56</value>
|
||||
</metadata>
|
||||
<metadata name="ApplicationMenu1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>997, 134</value>
|
||||
<value>1270, 95</value>
|
||||
</metadata>
|
||||
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
|
||||
<data name="BarButtonItem16.ImageOptions.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
@ -749,7 +749,7 @@
|
||||
</value>
|
||||
</data>
|
||||
<metadata name="TBWH_PROFILE_TYPEBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>751, 134</value>
|
||||
<value>1024, 95</value>
|
||||
</metadata>
|
||||
<data name="TabPageGeneralSettings.ImageOptions.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
@ -762,7 +762,7 @@
|
||||
</value>
|
||||
</data>
|
||||
<metadata name="TBDD_CONNECTIONBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>1149, 134</value>
|
||||
<value>17, 134</value>
|
||||
</metadata>
|
||||
<data name="TabPageDocuments.ImageOptions.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
@ -803,10 +803,10 @@
|
||||
</value>
|
||||
</data>
|
||||
<metadata name="VWCW_GROUP_PROFILEBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>227, 134</value>
|
||||
<value>500, 95</value>
|
||||
</metadata>
|
||||
<metadata name="TBWH_GROUPBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>17, 134</value>
|
||||
<value>290, 95</value>
|
||||
</metadata>
|
||||
<data name="TabPageGroupAssignment.ImageOptions.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
@ -820,16 +820,16 @@
|
||||
</value>
|
||||
</data>
|
||||
<metadata name="TBCW_PROF_DATA_SEARCHTableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>301, 95</value>
|
||||
<value>862, 56</value>
|
||||
</metadata>
|
||||
<metadata name="TBCW_PROF_DOC_SEARCHTableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>1011, 95</value>
|
||||
<value>17, 95</value>
|
||||
</metadata>
|
||||
<metadata name="VWCW_GROUP_PROFILETableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>492, 134</value>
|
||||
<value>765, 95</value>
|
||||
</metadata>
|
||||
<metadata name="TBDD_CONNECTIONTableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>17, 173</value>
|
||||
<value>261, 134</value>
|
||||
</metadata>
|
||||
<metadata name="$this.TrayHeight" type="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>159</value>
|
||||
|
||||
@ -77,13 +77,12 @@ Public Class frmAdministration
|
||||
|
||||
Sub Status_Changed(text As String)
|
||||
labelStatus.Visibility = DevExpress.XtraBars.BarItemVisibility.Always
|
||||
labelStatus.Caption = $"{text} - {Now.ToShortTimeString}"
|
||||
labelStatus.Caption = $"{text} - {Now.ToLongTimeString}"
|
||||
End Sub
|
||||
|
||||
Private Sub TBCW_PROFILESBindingSource_AddingNew(sender As Object, e As System.ComponentModel.AddingNewEventArgs) Handles TBCW_PROFILESBindingSource.AddingNew
|
||||
MyDataset.TBCW_PROFILES.ADDED_WHOColumn.DefaultValue = Environment.UserName
|
||||
MyDataset.TBCW_PROFILES.PROFILE_TYPEColumn.DefaultValue = 0
|
||||
MyDataset.TBCW_PROFILES.WD_SEARCHColumn.DefaultValue = String.Empty
|
||||
MyDataset.TBCW_PROFILES.REGEX_EXPRESSIONColumn.DefaultValue = ".+"
|
||||
MyDataset.TBCW_PROFILES.ACTIVEColumn.DefaultValue = True
|
||||
|
||||
@ -93,11 +92,23 @@ Public Class frmAdministration
|
||||
Private Sub GUIDTextBox_TextChanged(sender As Object, e As EventArgs) Handles PROFILE_IDTextBox.TextChanged
|
||||
|
||||
If PROFILE_IDTextBox.Text <> "" Then
|
||||
If CtrlApplicationAssignment1.AssignProfileID(PROFILE_IDTextBox.Text) = False Then
|
||||
MsgBox("Unexpected Error while assigning ProfileID!", MsgBoxStyle.Critical)
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
Refresh_ProfileData()
|
||||
Refresh_Free_Users(PROFILE_IDTextBox.Text)
|
||||
Refresh_Free_Groups(PROFILE_IDTextBox.Text)
|
||||
|
||||
Load_Profile_Process()
|
||||
If LogConfig.Debug = True Then
|
||||
labelSelection.Caption = CtrlApplicationAssignment1.AppSelectionString
|
||||
labelSelection.Visibility = DevExpress.XtraBars.BarItemVisibility.Always
|
||||
Else
|
||||
labelSelection.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
|
||||
End If
|
||||
|
||||
End If
|
||||
|
||||
End Sub
|
||||
@ -279,8 +290,6 @@ Public Class frmAdministration
|
||||
|
||||
Private Sub TBCW_PROF_REL_WINDOWBindingSource_AddingNew(sender As Object, e As System.ComponentModel.AddingNewEventArgs)
|
||||
MyDataset.TBCW_PROF_REL_WINDOW.ADDED_WHOColumn.DefaultValue = Environment.UserName
|
||||
MyDataset.TBCW_PROF_REL_WINDOW.PROFILE_IDColumn.DefaultValue = PROFILE_IDTextBox.Text
|
||||
MyDataset.TBCW_PROF_REL_WINDOW.PROCESS_NAMEColumn.DefaultValue = SelectedProcessName
|
||||
End Sub
|
||||
|
||||
Private Sub BarButtonItem1_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem1.ItemClick
|
||||
@ -299,19 +308,17 @@ Public Class frmAdministration
|
||||
' wenn Speichern ja
|
||||
If result = MsgBoxResult.Yes Then
|
||||
If Database.ExecuteNonQuery(swl) = True Then
|
||||
Load_Profiles()
|
||||
Refresh_ProfileScreen()
|
||||
End If
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub BarButtonItem4_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem4.ItemClick
|
||||
Refresh_ProfileScreen()
|
||||
End Sub
|
||||
Sub Refresh_ProfileScreen()
|
||||
Load_Profiles()
|
||||
Refresh_ProfileData()
|
||||
Try
|
||||
Dim ID = CInt(PROFILE_IDTextBox.Text)
|
||||
Catch ex As Exception
|
||||
Exit Sub
|
||||
End Try
|
||||
Refresh_Free_Users(PROFILE_IDTextBox.Text)
|
||||
Refresh_Free_Groups(PROFILE_IDTextBox.Text)
|
||||
End Sub
|
||||
@ -469,6 +476,7 @@ Public Class frmAdministration
|
||||
|
||||
Select Case oTabName
|
||||
Case TabPageProcessAssignment.Name
|
||||
CtrlApplicationAssignment1.Process_Load(PROFILE_IDTextBox.Text)
|
||||
RibbonGroup_Profile.Enabled = False
|
||||
RibbonGroup_User.Enabled = False
|
||||
RibbonGroup_Group.Enabled = False
|
||||
@ -540,6 +548,7 @@ Public Class frmAdministration
|
||||
RibbonGroup_DocSearch.Enabled = False
|
||||
RibbonGroup_DataSearch.Enabled = False
|
||||
End Select
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub BarButtonItem16_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem16.ItemClick
|
||||
@ -640,7 +649,7 @@ Public Class frmAdministration
|
||||
End Sub
|
||||
|
||||
Private Sub BarButtonItem23_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem23.ItemClick
|
||||
If CtrlApplicationAssignment1.Control_CreateAssignment(PROFILE_IDTextBox.Text) = False Then
|
||||
If CtrlApplicationAssignment1.Control_CreateAssignment() = False Then
|
||||
MsgBox("Error while creating control", MsgBoxStyle.Critical, Text)
|
||||
Else
|
||||
Status_Changed("Feld-Zuordnung angelegt")
|
||||
@ -666,4 +675,15 @@ Public Class frmAdministration
|
||||
Status_Changed("Feld-Zuordnung gespeichert")
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub BarButtonItem26_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem26.ItemClick
|
||||
Dim oSQL As String = $"EXEC PRCW_COPY_PROFILE {PROFILE_IDTextBox.Text}, '{USER_USERNAME}'"
|
||||
|
||||
If Database.ExecuteNonQuery(oSQL) = False Then
|
||||
MsgBox("Could not duplicate the profile...Check the logfile!", MsgBoxStyle.Exclamation)
|
||||
Else
|
||||
Refresh_ProfileScreen()
|
||||
MsgBox("Profile has been duplicated. Please check the dependencies!", MsgBoxStyle.Information)
|
||||
End If
|
||||
End Sub
|
||||
End Class
|
||||
@ -48,15 +48,21 @@ Partial Class frmConfig_Basic
|
||||
Me.Button1 = New System.Windows.Forms.Button()
|
||||
Me.btnApplicationFolder = New System.Windows.Forms.Button()
|
||||
Me.LinkLabel1 = New System.Windows.Forms.LinkLabel()
|
||||
Me.TabPage3 = New System.Windows.Forms.TabPage()
|
||||
Me.LabelVersion = New System.Windows.Forms.Label()
|
||||
Me.PictureBox1 = New System.Windows.Forms.PictureBox()
|
||||
Me.TabControl1.SuspendLayout()
|
||||
Me.TabPage1.SuspendLayout()
|
||||
Me.TabPage2.SuspendLayout()
|
||||
Me.TabPage3.SuspendLayout()
|
||||
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'TabControl1
|
||||
'
|
||||
Me.TabControl1.Controls.Add(Me.TabPage1)
|
||||
Me.TabControl1.Controls.Add(Me.TabPage2)
|
||||
Me.TabControl1.Controls.Add(Me.TabPage3)
|
||||
Me.TabControl1.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.TabControl1.Location = New System.Drawing.Point(0, 0)
|
||||
Me.TabControl1.Name = "TabControl1"
|
||||
@ -221,14 +227,14 @@ Partial Class frmConfig_Basic
|
||||
Me.TabPage2.Padding = New System.Windows.Forms.Padding(3)
|
||||
Me.TabPage2.Size = New System.Drawing.Size(668, 160)
|
||||
Me.TabPage2.TabIndex = 1
|
||||
Me.TabPage2.Text = "Weitere Einstellungen"
|
||||
Me.TabPage2.Text = "Tastaturkombination und Eisntellungen"
|
||||
Me.TabPage2.UseVisualStyleBackColor = True
|
||||
'
|
||||
'lblChanges
|
||||
'
|
||||
Me.lblChanges.AutoSize = True
|
||||
Me.lblChanges.BackColor = System.Drawing.Color.Yellow
|
||||
Me.lblChanges.Location = New System.Drawing.Point(8, 115)
|
||||
Me.lblChanges.Location = New System.Drawing.Point(8, 71)
|
||||
Me.lblChanges.Name = "lblChanges"
|
||||
Me.lblChanges.Size = New System.Drawing.Size(38, 13)
|
||||
Me.lblChanges.TabIndex = 14
|
||||
@ -237,53 +243,61 @@ Partial Class frmConfig_Basic
|
||||
'
|
||||
'btnChangeHotkey
|
||||
'
|
||||
Me.btnChangeHotkey.Location = New System.Drawing.Point(185, 89)
|
||||
Me.btnChangeHotkey.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.btnChangeHotkey.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.KeyDown_8461
|
||||
Me.btnChangeHotkey.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.btnChangeHotkey.Location = New System.Drawing.Point(186, 35)
|
||||
Me.btnChangeHotkey.Name = "btnChangeHotkey"
|
||||
Me.btnChangeHotkey.Size = New System.Drawing.Size(121, 23)
|
||||
Me.btnChangeHotkey.Size = New System.Drawing.Size(132, 31)
|
||||
Me.btnChangeHotkey.TabIndex = 13
|
||||
Me.btnChangeHotkey.Text = "Ändere Hotkey"
|
||||
Me.btnChangeHotkey.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
Me.btnChangeHotkey.UseVisualStyleBackColor = True
|
||||
'
|
||||
'txtHotkeySearchKey
|
||||
'
|
||||
Me.txtHotkeySearchKey.Location = New System.Drawing.Point(105, 91)
|
||||
Me.txtHotkeySearchKey.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtHotkeySearchKey.Location = New System.Drawing.Point(105, 39)
|
||||
Me.txtHotkeySearchKey.Name = "txtHotkeySearchKey"
|
||||
Me.txtHotkeySearchKey.Size = New System.Drawing.Size(65, 21)
|
||||
Me.txtHotkeySearchKey.Size = New System.Drawing.Size(65, 23)
|
||||
Me.txtHotkeySearchKey.TabIndex = 12
|
||||
Me.txtHotkeySearchKey.Text = "f"
|
||||
'
|
||||
'Label7
|
||||
'
|
||||
Me.Label7.AutoSize = True
|
||||
Me.Label7.Location = New System.Drawing.Point(102, 75)
|
||||
Me.Label7.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label7.Location = New System.Drawing.Point(102, 20)
|
||||
Me.Label7.Name = "Label7"
|
||||
Me.Label7.Size = New System.Drawing.Size(68, 13)
|
||||
Me.Label7.Size = New System.Drawing.Size(78, 16)
|
||||
Me.Label7.TabIndex = 11
|
||||
Me.Label7.Text = "Zifferntaste:"
|
||||
'
|
||||
'Label6
|
||||
'
|
||||
Me.Label6.AutoSize = True
|
||||
Me.Label6.Location = New System.Drawing.Point(8, 75)
|
||||
Me.Label6.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label6.Location = New System.Drawing.Point(8, 20)
|
||||
Me.Label6.Name = "Label6"
|
||||
Me.Label6.Size = New System.Drawing.Size(82, 13)
|
||||
Me.Label6.Size = New System.Drawing.Size(95, 16)
|
||||
Me.Label6.TabIndex = 10
|
||||
Me.Label6.Text = "Funktionstaste:"
|
||||
'
|
||||
'cmbfunctionHit
|
||||
'
|
||||
Me.cmbfunctionHit.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.cmbfunctionHit.FormattingEnabled = True
|
||||
Me.cmbfunctionHit.Items.AddRange(New Object() {"strg", "SHIFT"})
|
||||
Me.cmbfunctionHit.Location = New System.Drawing.Point(11, 91)
|
||||
Me.cmbfunctionHit.Location = New System.Drawing.Point(11, 39)
|
||||
Me.cmbfunctionHit.Name = "cmbfunctionHit"
|
||||
Me.cmbfunctionHit.Size = New System.Drawing.Size(79, 21)
|
||||
Me.cmbfunctionHit.Size = New System.Drawing.Size(88, 24)
|
||||
Me.cmbfunctionHit.TabIndex = 9
|
||||
'
|
||||
'chkLogErrorsOnly
|
||||
'
|
||||
Me.chkLogErrorsOnly.AutoSize = True
|
||||
Me.chkLogErrorsOnly.ImeMode = System.Windows.Forms.ImeMode.NoControl
|
||||
Me.chkLogErrorsOnly.Location = New System.Drawing.Point(8, 17)
|
||||
Me.chkLogErrorsOnly.Location = New System.Drawing.Point(462, 100)
|
||||
Me.chkLogErrorsOnly.Name = "chkLogErrorsOnly"
|
||||
Me.chkLogErrorsOnly.Size = New System.Drawing.Size(100, 17)
|
||||
Me.chkLogErrorsOnly.TabIndex = 7
|
||||
@ -328,6 +342,37 @@ Partial Class frmConfig_Basic
|
||||
Me.LinkLabel1.TabStop = True
|
||||
Me.LinkLabel1.Text = "Link zu Support-Tool Digital Data"
|
||||
'
|
||||
'TabPage3
|
||||
'
|
||||
Me.TabPage3.Controls.Add(Me.LabelVersion)
|
||||
Me.TabPage3.Controls.Add(Me.PictureBox1)
|
||||
Me.TabPage3.Location = New System.Drawing.Point(4, 22)
|
||||
Me.TabPage3.Name = "TabPage3"
|
||||
Me.TabPage3.Padding = New System.Windows.Forms.Padding(3)
|
||||
Me.TabPage3.Size = New System.Drawing.Size(668, 160)
|
||||
Me.TabPage3.TabIndex = 2
|
||||
Me.TabPage3.Text = "Info"
|
||||
Me.TabPage3.UseVisualStyleBackColor = True
|
||||
'
|
||||
'LabelVersion
|
||||
'
|
||||
Me.LabelVersion.AutoSize = True
|
||||
Me.LabelVersion.Location = New System.Drawing.Point(6, 115)
|
||||
Me.LabelVersion.Name = "LabelVersion"
|
||||
Me.LabelVersion.Size = New System.Drawing.Size(38, 13)
|
||||
Me.LabelVersion.TabIndex = 0
|
||||
Me.LabelVersion.Text = "Label8"
|
||||
'
|
||||
'PictureBox1
|
||||
'
|
||||
Me.PictureBox1.Image = CType(resources.GetObject("PictureBox1.Image"), System.Drawing.Image)
|
||||
Me.PictureBox1.Location = New System.Drawing.Point(-80, -22)
|
||||
Me.PictureBox1.Name = "PictureBox1"
|
||||
Me.PictureBox1.Size = New System.Drawing.Size(366, 134)
|
||||
Me.PictureBox1.SizeMode = System.Windows.Forms.PictureBoxSizeMode.Zoom
|
||||
Me.PictureBox1.TabIndex = 1
|
||||
Me.PictureBox1.TabStop = False
|
||||
'
|
||||
'frmConfig_Basic
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
@ -347,6 +392,9 @@ Partial Class frmConfig_Basic
|
||||
Me.TabPage1.PerformLayout()
|
||||
Me.TabPage2.ResumeLayout(False)
|
||||
Me.TabPage2.PerformLayout()
|
||||
Me.TabPage3.ResumeLayout(False)
|
||||
Me.TabPage3.PerformLayout()
|
||||
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
@ -375,4 +423,7 @@ Partial Class frmConfig_Basic
|
||||
Friend WithEvents Label7 As Label
|
||||
Friend WithEvents btnChangeHotkey As Button
|
||||
Friend WithEvents lblChanges As Label
|
||||
Friend WithEvents TabPage3 As TabPage
|
||||
Friend WithEvents LabelVersion As Label
|
||||
Friend WithEvents PictureBox1 As PictureBox
|
||||
End Class
|
||||
|
||||
File diff suppressed because it is too large
Load Diff
@ -161,6 +161,8 @@ Public Class frmConfig_Basic
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
Case 2
|
||||
LabelVersion.Text = $"Version: {My.Application.Info.Version.ToString}"
|
||||
End Select
|
||||
End Sub
|
||||
|
||||
|
||||
@ -40,6 +40,8 @@ Partial Class frmControlCapture
|
||||
Me.txtFrameworkId = New System.Windows.Forms.TextBox()
|
||||
Me.chkAutomationId = New System.Windows.Forms.CheckBox()
|
||||
Me.chkControlName = New System.Windows.Forms.CheckBox()
|
||||
Me.Label7 = New System.Windows.Forms.Label()
|
||||
Me.txtNewFocusControlHandle = New System.Windows.Forms.TextBox()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'Timer1
|
||||
@ -49,7 +51,8 @@ Partial Class frmControlCapture
|
||||
'
|
||||
'Label3
|
||||
'
|
||||
Me.Label3.Location = New System.Drawing.Point(12, 142)
|
||||
Me.Label3.Font = New System.Drawing.Font("Tahoma", 9.75!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label3.Location = New System.Drawing.Point(12, 183)
|
||||
Me.Label3.Name = "Label3"
|
||||
Me.Label3.Size = New System.Drawing.Size(438, 42)
|
||||
Me.Label3.TabIndex = 11
|
||||
@ -59,17 +62,17 @@ Partial Class frmControlCapture
|
||||
'Label4
|
||||
'
|
||||
Me.Label4.AutoSize = True
|
||||
Me.Label4.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label4.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label4.Location = New System.Drawing.Point(12, 89)
|
||||
Me.Label4.Name = "Label4"
|
||||
Me.Label4.Size = New System.Drawing.Size(71, 13)
|
||||
Me.Label4.Size = New System.Drawing.Size(61, 13)
|
||||
Me.Label4.TabIndex = 8
|
||||
Me.Label4.Text = "Feld Name:"
|
||||
'
|
||||
'Label2
|
||||
'
|
||||
Me.Label2.AutoSize = True
|
||||
Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label2.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label2.Location = New System.Drawing.Point(12, 35)
|
||||
Me.Label2.Name = "Label2"
|
||||
Me.Label2.Size = New System.Drawing.Size(78, 13)
|
||||
@ -79,38 +82,38 @@ Partial Class frmControlCapture
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.AutoSize = True
|
||||
Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label1.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label1.Location = New System.Drawing.Point(12, 9)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(61, 13)
|
||||
Me.Label1.Size = New System.Drawing.Size(62, 13)
|
||||
Me.Label1.TabIndex = 10
|
||||
Me.Label1.Text = "Prozess ID:"
|
||||
'
|
||||
'txtControlName
|
||||
'
|
||||
Me.txtControlName.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtControlName.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtControlName.Location = New System.Drawing.Point(226, 84)
|
||||
Me.txtControlName.Name = "txtControlName"
|
||||
Me.txtControlName.ReadOnly = True
|
||||
Me.txtControlName.Size = New System.Drawing.Size(224, 20)
|
||||
Me.txtControlName.Size = New System.Drawing.Size(224, 21)
|
||||
Me.txtControlName.TabIndex = 6
|
||||
'
|
||||
'txtName
|
||||
'
|
||||
Me.txtName.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtName.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtName.Location = New System.Drawing.Point(226, 32)
|
||||
Me.txtName.Name = "txtName"
|
||||
Me.txtName.ReadOnly = True
|
||||
Me.txtName.Size = New System.Drawing.Size(224, 20)
|
||||
Me.txtName.Size = New System.Drawing.Size(224, 21)
|
||||
Me.txtName.TabIndex = 7
|
||||
'
|
||||
'txtPID
|
||||
'
|
||||
Me.txtPID.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtPID.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtPID.Location = New System.Drawing.Point(226, 4)
|
||||
Me.txtPID.Name = "txtPID"
|
||||
Me.txtPID.ReadOnly = True
|
||||
Me.txtPID.Size = New System.Drawing.Size(224, 20)
|
||||
Me.txtPID.Size = New System.Drawing.Size(224, 21)
|
||||
Me.txtPID.TabIndex = 5
|
||||
'
|
||||
'Button1
|
||||
@ -118,7 +121,7 @@ Partial Class frmControlCapture
|
||||
Me.Button1.DialogResult = System.Windows.Forms.DialogResult.OK
|
||||
Me.Button1.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.add
|
||||
Me.Button1.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.Button1.Location = New System.Drawing.Point(15, 206)
|
||||
Me.Button1.Location = New System.Drawing.Point(15, 242)
|
||||
Me.Button1.Name = "Button1"
|
||||
Me.Button1.Size = New System.Drawing.Size(159, 34)
|
||||
Me.Button1.TabIndex = 0
|
||||
@ -130,7 +133,7 @@ Partial Class frmControlCapture
|
||||
Me.Button2.DialogResult = System.Windows.Forms.DialogResult.Cancel
|
||||
Me.Button2.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.cancel
|
||||
Me.Button2.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.Button2.Location = New System.Drawing.Point(291, 206)
|
||||
Me.Button2.Location = New System.Drawing.Point(291, 242)
|
||||
Me.Button2.Name = "Button2"
|
||||
Me.Button2.Size = New System.Drawing.Size(159, 34)
|
||||
Me.Button2.TabIndex = 0
|
||||
@ -139,46 +142,46 @@ Partial Class frmControlCapture
|
||||
'
|
||||
'txtAutomationId
|
||||
'
|
||||
Me.txtAutomationId.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtAutomationId.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtAutomationId.Location = New System.Drawing.Point(226, 110)
|
||||
Me.txtAutomationId.Name = "txtAutomationId"
|
||||
Me.txtAutomationId.ReadOnly = True
|
||||
Me.txtAutomationId.Size = New System.Drawing.Size(224, 20)
|
||||
Me.txtAutomationId.Size = New System.Drawing.Size(224, 21)
|
||||
Me.txtAutomationId.TabIndex = 6
|
||||
'
|
||||
'Label5
|
||||
'
|
||||
Me.Label5.AutoSize = True
|
||||
Me.Label5.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label5.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label5.Location = New System.Drawing.Point(12, 115)
|
||||
Me.Label5.Name = "Label5"
|
||||
Me.Label5.Size = New System.Drawing.Size(89, 13)
|
||||
Me.Label5.Size = New System.Drawing.Size(79, 13)
|
||||
Me.Label5.TabIndex = 8
|
||||
Me.Label5.Text = "Automation Id:"
|
||||
'
|
||||
'Label6
|
||||
'
|
||||
Me.Label6.AutoSize = True
|
||||
Me.Label6.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label6.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label6.Location = New System.Drawing.Point(12, 61)
|
||||
Me.Label6.Name = "Label6"
|
||||
Me.Label6.Size = New System.Drawing.Size(74, 13)
|
||||
Me.Label6.Size = New System.Drawing.Size(77, 13)
|
||||
Me.Label6.TabIndex = 8
|
||||
Me.Label6.Text = "Framework Id:"
|
||||
'
|
||||
'txtFrameworkId
|
||||
'
|
||||
Me.txtFrameworkId.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtFrameworkId.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtFrameworkId.Location = New System.Drawing.Point(226, 58)
|
||||
Me.txtFrameworkId.Name = "txtFrameworkId"
|
||||
Me.txtFrameworkId.ReadOnly = True
|
||||
Me.txtFrameworkId.Size = New System.Drawing.Size(224, 20)
|
||||
Me.txtFrameworkId.Size = New System.Drawing.Size(224, 21)
|
||||
Me.txtFrameworkId.TabIndex = 6
|
||||
'
|
||||
'chkAutomationId
|
||||
'
|
||||
Me.chkAutomationId.AutoSize = True
|
||||
Me.chkAutomationId.Location = New System.Drawing.Point(133, 112)
|
||||
Me.chkAutomationId.Location = New System.Drawing.Point(133, 139)
|
||||
Me.chkAutomationId.Name = "chkAutomationId"
|
||||
Me.chkAutomationId.Size = New System.Drawing.Size(87, 17)
|
||||
Me.chkAutomationId.TabIndex = 12
|
||||
@ -195,11 +198,32 @@ Partial Class frmControlCapture
|
||||
Me.chkControlName.Text = "Übernehmen"
|
||||
Me.chkControlName.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Label7
|
||||
'
|
||||
Me.Label7.AutoSize = True
|
||||
Me.Label7.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label7.Location = New System.Drawing.Point(12, 140)
|
||||
Me.Label7.Name = "Label7"
|
||||
Me.Label7.Size = New System.Drawing.Size(107, 13)
|
||||
Me.Label7.TabIndex = 14
|
||||
Me.Label7.Text = "FocusControlHandle:"
|
||||
'
|
||||
'txtNewFocusControlHandle
|
||||
'
|
||||
Me.txtNewFocusControlHandle.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtNewFocusControlHandle.Location = New System.Drawing.Point(226, 137)
|
||||
Me.txtNewFocusControlHandle.Name = "txtNewFocusControlHandle"
|
||||
Me.txtNewFocusControlHandle.ReadOnly = True
|
||||
Me.txtNewFocusControlHandle.Size = New System.Drawing.Size(224, 21)
|
||||
Me.txtNewFocusControlHandle.TabIndex = 13
|
||||
'
|
||||
'frmControlCapture
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.ClientSize = New System.Drawing.Size(462, 251)
|
||||
Me.ClientSize = New System.Drawing.Size(462, 300)
|
||||
Me.Controls.Add(Me.Label7)
|
||||
Me.Controls.Add(Me.txtNewFocusControlHandle)
|
||||
Me.Controls.Add(Me.chkControlName)
|
||||
Me.Controls.Add(Me.chkAutomationId)
|
||||
Me.Controls.Add(Me.Label3)
|
||||
@ -215,9 +239,11 @@ Partial Class frmControlCapture
|
||||
Me.Controls.Add(Me.txtPID)
|
||||
Me.Controls.Add(Me.Button2)
|
||||
Me.Controls.Add(Me.Button1)
|
||||
Me.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
|
||||
Me.Name = "frmControlCapture"
|
||||
Me.Text = "Feld Auswertung"
|
||||
Me.TopMost = True
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
@ -238,4 +264,6 @@ Partial Class frmControlCapture
|
||||
Friend WithEvents txtFrameworkId As TextBox
|
||||
Friend WithEvents chkAutomationId As CheckBox
|
||||
Friend WithEvents chkControlName As CheckBox
|
||||
Friend WithEvents Label7 As Label
|
||||
Friend WithEvents txtNewFocusControlHandle As TextBox
|
||||
End Class
|
||||
|
||||
@ -11,6 +11,7 @@ Public Class frmControlCapture
|
||||
|
||||
Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
|
||||
Dim oResult As WindowInfo = GetFocusedControl(Handle)
|
||||
Dim newoResult As IntPtr = FocusedControlinActiveWindow(Handle)
|
||||
|
||||
If oResult IsNot Nothing Then
|
||||
txtPID.Text = oResult.ClassName
|
||||
@ -18,10 +19,15 @@ Public Class frmControlCapture
|
||||
txtControlName.Text = oResult.ControlName
|
||||
txtAutomationId.Text = Automation.AutomationId
|
||||
txtFrameworkId.Text = Automation.FrameworkId
|
||||
|
||||
Console.WriteLine($"Automation.AutomationId: {Automation.AutomationId}")
|
||||
FrameworkId = Automation.FrameworkId
|
||||
AutomationId = Automation.AutomationId
|
||||
|
||||
ControlName = oResult.ControlName
|
||||
Console.WriteLine($"oResult.ControlName: {oResult.ControlName}")
|
||||
txtNewFocusControlHandle.Text = newoResult.ToString
|
||||
AutomationId = newoResult.ToString
|
||||
Console.WriteLine($"newoResult: {newoResult.ToString}")
|
||||
|
||||
ProcessName = oResult.ProcessName
|
||||
End If
|
||||
End Sub
|
||||
@ -48,4 +54,16 @@ Public Class frmControlCapture
|
||||
DialogResult = DialogResult.None
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub chkControlName_CheckedChanged(sender As Object, e As EventArgs) Handles chkControlName.CheckedChanged
|
||||
If chkControlName.Checked Then
|
||||
chkAutomationId.Checked = False
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub chkAutomationId_CheckedChanged(sender As Object, e As EventArgs) Handles chkAutomationId.CheckedChanged
|
||||
If chkAutomationId.Checked Then
|
||||
chkControlName.Checked = False
|
||||
End If
|
||||
End Sub
|
||||
End Class
|
||||
@ -104,7 +104,7 @@ Partial Class frmDocViewAbout
|
||||
'lblGdPictureDemo
|
||||
'
|
||||
Me.lblGdPictureDemo.AutoSize = True
|
||||
Me.lblGdPictureDemo.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lblGdPictureDemo.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lblGdPictureDemo.Location = New System.Drawing.Point(13, 14)
|
||||
Me.lblGdPictureDemo.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
|
||||
Me.lblGdPictureDemo.Name = "lblGdPictureDemo"
|
||||
|
||||
@ -38,36 +38,36 @@ Partial Class frmProcessCapture
|
||||
'
|
||||
'txtPID
|
||||
'
|
||||
Me.txtPID.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtPID.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtPID.Location = New System.Drawing.Point(132, 4)
|
||||
Me.txtPID.Name = "txtPID"
|
||||
Me.txtPID.ReadOnly = True
|
||||
Me.txtPID.Size = New System.Drawing.Size(224, 20)
|
||||
Me.txtPID.Size = New System.Drawing.Size(224, 21)
|
||||
Me.txtPID.TabIndex = 1
|
||||
'
|
||||
'txtName
|
||||
'
|
||||
Me.txtName.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtName.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtName.Location = New System.Drawing.Point(132, 32)
|
||||
Me.txtName.Name = "txtName"
|
||||
Me.txtName.ReadOnly = True
|
||||
Me.txtName.Size = New System.Drawing.Size(224, 20)
|
||||
Me.txtName.Size = New System.Drawing.Size(224, 21)
|
||||
Me.txtName.TabIndex = 2
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.AutoSize = True
|
||||
Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label1.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label1.Location = New System.Drawing.Point(12, 9)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(61, 13)
|
||||
Me.Label1.Size = New System.Drawing.Size(62, 13)
|
||||
Me.Label1.TabIndex = 3
|
||||
Me.Label1.Text = "Prozess ID:"
|
||||
'
|
||||
'Label2
|
||||
'
|
||||
Me.Label2.AutoSize = True
|
||||
Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label2.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label2.Location = New System.Drawing.Point(12, 35)
|
||||
Me.Label2.Name = "Label2"
|
||||
Me.Label2.Size = New System.Drawing.Size(78, 13)
|
||||
@ -76,7 +76,8 @@ Partial Class frmProcessCapture
|
||||
'
|
||||
'Label3
|
||||
'
|
||||
Me.Label3.Location = New System.Drawing.Point(12, 118)
|
||||
Me.Label3.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label3.Location = New System.Drawing.Point(12, 98)
|
||||
Me.Label3.Name = "Label3"
|
||||
Me.Label3.Size = New System.Drawing.Size(344, 42)
|
||||
Me.Label3.TabIndex = 4
|
||||
@ -89,20 +90,20 @@ Partial Class frmProcessCapture
|
||||
'
|
||||
'txtWindowTitle
|
||||
'
|
||||
Me.txtWindowTitle.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtWindowTitle.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtWindowTitle.Location = New System.Drawing.Point(132, 58)
|
||||
Me.txtWindowTitle.Name = "txtWindowTitle"
|
||||
Me.txtWindowTitle.ReadOnly = True
|
||||
Me.txtWindowTitle.Size = New System.Drawing.Size(224, 20)
|
||||
Me.txtWindowTitle.Size = New System.Drawing.Size(224, 21)
|
||||
Me.txtWindowTitle.TabIndex = 2
|
||||
'
|
||||
'Label4
|
||||
'
|
||||
Me.Label4.AutoSize = True
|
||||
Me.Label4.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label4.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label4.Location = New System.Drawing.Point(12, 61)
|
||||
Me.Label4.Name = "Label4"
|
||||
Me.Label4.Size = New System.Drawing.Size(68, 13)
|
||||
Me.Label4.Size = New System.Drawing.Size(71, 13)
|
||||
Me.Label4.TabIndex = 3
|
||||
Me.Label4.Text = "Fenster Titel:"
|
||||
'
|
||||
@ -111,7 +112,7 @@ Partial Class frmProcessCapture
|
||||
Me.Button2.DialogResult = System.Windows.Forms.DialogResult.Cancel
|
||||
Me.Button2.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.cancel
|
||||
Me.Button2.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.Button2.Location = New System.Drawing.Point(194, 206)
|
||||
Me.Button2.Location = New System.Drawing.Point(197, 155)
|
||||
Me.Button2.Name = "Button2"
|
||||
Me.Button2.Size = New System.Drawing.Size(159, 34)
|
||||
Me.Button2.TabIndex = 0
|
||||
@ -124,7 +125,7 @@ Partial Class frmProcessCapture
|
||||
Me.Button1.Enabled = False
|
||||
Me.Button1.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.add
|
||||
Me.Button1.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.Button1.Location = New System.Drawing.Point(15, 206)
|
||||
Me.Button1.Location = New System.Drawing.Point(18, 155)
|
||||
Me.Button1.Name = "Button1"
|
||||
Me.Button1.Size = New System.Drawing.Size(159, 34)
|
||||
Me.Button1.TabIndex = 0
|
||||
@ -135,7 +136,7 @@ Partial Class frmProcessCapture
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.ClientSize = New System.Drawing.Size(365, 252)
|
||||
Me.ClientSize = New System.Drawing.Size(362, 199)
|
||||
Me.Controls.Add(Me.Label3)
|
||||
Me.Controls.Add(Me.Label4)
|
||||
Me.Controls.Add(Me.Label2)
|
||||
@ -148,6 +149,7 @@ Partial Class frmProcessCapture
|
||||
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
|
||||
Me.Name = "frmProcessCapture"
|
||||
Me.Text = "Prozess Auswertung"
|
||||
Me.TopMost = True
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
|
||||
@ -22,12 +22,16 @@ Partial Class frmProfileMatch
|
||||
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
|
||||
<System.Diagnostics.DebuggerStepThrough()>
|
||||
Private Sub InitializeComponent()
|
||||
Me.components = New System.ComponentModel.Container()
|
||||
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmProfileMatch))
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.TileControlMatch = New DevExpress.XtraEditors.TileControl()
|
||||
Me.TileGroupDocumentsData = New DevExpress.XtraEditors.TileGroup()
|
||||
Me.TileGroupDocuments = New DevExpress.XtraEditors.TileGroup()
|
||||
Me.TileGroupData = New DevExpress.XtraEditors.TileGroup()
|
||||
Me.ContextMenuStrip1 = New System.Windows.Forms.ContextMenuStrip(Me.components)
|
||||
Me.AblaufSucheAnzeigenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.ContextMenuStrip1.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'Label1
|
||||
@ -63,6 +67,7 @@ Partial Class frmProfileMatch
|
||||
Me.TileControlMatch.AppearanceItem.Normal.Options.UseFont = True
|
||||
Me.TileControlMatch.AppearanceItem.Normal.Options.UseForeColor = True
|
||||
Me.TileControlMatch.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.TileControlMatch.ContextMenuStrip = Me.ContextMenuStrip1
|
||||
Me.TileControlMatch.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.TileControlMatch.Groups.Add(Me.TileGroupDocumentsData)
|
||||
Me.TileControlMatch.Groups.Add(Me.TileGroupDocuments)
|
||||
@ -91,6 +96,18 @@ Partial Class frmProfileMatch
|
||||
Me.TileGroupData.Name = "TileGroupData"
|
||||
Me.TileGroupData.Text = "Daten"
|
||||
'
|
||||
'ContextMenuStrip1
|
||||
'
|
||||
Me.ContextMenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.AblaufSucheAnzeigenToolStripMenuItem})
|
||||
Me.ContextMenuStrip1.Name = "ContextMenuStrip1"
|
||||
Me.ContextMenuStrip1.Size = New System.Drawing.Size(195, 48)
|
||||
'
|
||||
'AblaufSucheAnzeigenToolStripMenuItem
|
||||
'
|
||||
Me.AblaufSucheAnzeigenToolStripMenuItem.Name = "AblaufSucheAnzeigenToolStripMenuItem"
|
||||
Me.AblaufSucheAnzeigenToolStripMenuItem.Size = New System.Drawing.Size(194, 22)
|
||||
Me.AblaufSucheAnzeigenToolStripMenuItem.Text = "Ablauf Suche anzeigen"
|
||||
'
|
||||
'frmProfileMatch
|
||||
'
|
||||
Me.Appearance.Options.UseFont = True
|
||||
@ -108,6 +125,7 @@ Partial Class frmProfileMatch
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterParent
|
||||
Me.Text = "Profile Match"
|
||||
Me.TopMost = True
|
||||
Me.ContextMenuStrip1.ResumeLayout(False)
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
@ -117,4 +135,6 @@ Partial Class frmProfileMatch
|
||||
Friend WithEvents TileGroupDocumentsData As DevExpress.XtraEditors.TileGroup
|
||||
Friend WithEvents TileGroupDocuments As DevExpress.XtraEditors.TileGroup
|
||||
Friend WithEvents TileGroupData As DevExpress.XtraEditors.TileGroup
|
||||
Friend WithEvents ContextMenuStrip1 As ContextMenuStrip
|
||||
Friend WithEvents AblaufSucheAnzeigenToolStripMenuItem As ToolStripMenuItem
|
||||
End Class
|
||||
|
||||
@ -117,6 +117,9 @@
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<metadata name="ContextMenuStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>17, 17</value>
|
||||
</metadata>
|
||||
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
|
||||
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
|
||||
@ -37,7 +37,7 @@ Public Class frmProfileMatch
|
||||
End If
|
||||
|
||||
If oCreatedTiles = 0 Then
|
||||
Logger.Warn("No Results found for {0}", CURRENT_CLIPBOARD_CONTENTS)
|
||||
Logger.Warn("No Results found for ""{0}""", CURRENT_CLIPBOARD_CONTENTS)
|
||||
Me.Close()
|
||||
End If
|
||||
|
||||
@ -155,6 +155,7 @@ Public Class frmProfileMatch
|
||||
ConfigManager.Config.MatchWindowSize = Size
|
||||
ConfigManager.Config.MatchWindowLocation = Location
|
||||
ConfigManager.Save()
|
||||
CURRENT_CLIPBOARD_CONTENTS = Nothing
|
||||
Catch ex As Exception
|
||||
Logger.Error(ex)
|
||||
Logger.Info("Error in Save FormLayout: " & ex.Message)
|
||||
@ -234,5 +235,7 @@ Public Class frmProfileMatch
|
||||
End If
|
||||
End Sub
|
||||
|
||||
|
||||
Private Sub AblaufSucheAnzeigenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles AblaufSucheAnzeigenToolStripMenuItem.Click
|
||||
frmTreeView.ShowDialog()
|
||||
End Sub
|
||||
End Class
|
||||
@ -52,6 +52,7 @@ Public Class frmResultDoc
|
||||
Public TabIndex As Integer
|
||||
Public TabCaption As String
|
||||
Public ProfileId As Integer
|
||||
Public SQLCommand As String
|
||||
End Class
|
||||
|
||||
Private Async Sub frmResultDoc_Load(sender As Object, e As EventArgs) Handles Me.Load
|
||||
@ -115,7 +116,8 @@ Public Class frmResultDoc
|
||||
.DataTable = oDatatable,
|
||||
.ProfileId = oProfileId,
|
||||
.TabCaption = oTabTitle,
|
||||
.TabIndex = oCounter
|
||||
.TabIndex = oCounter,
|
||||
.SQLCommand = oSQL
|
||||
})
|
||||
|
||||
oCounter += 1
|
||||
@ -150,7 +152,11 @@ Public Class frmResultDoc
|
||||
Return Nothing
|
||||
End Try
|
||||
End Function
|
||||
|
||||
Sub Filter_EventTab(FilterCount As Integer)
|
||||
Dim oTabIndex = XtraTabControlDocs.SelectedTabPageIndex
|
||||
Dim oTabTitle = DTDocSearchDefinition.Rows(oTabIndex).Item("TAB_TITLE")
|
||||
XtraTabControlDocs.TabPages(TabIndex).Text = $"{oTabTitle} ({FilterCount} Filtered)"
|
||||
End Sub
|
||||
Sub RefreshTabDoc(ProfileId As Integer, Datatable As DataTable, TabIndex As Integer, TabCaption As String)
|
||||
Try
|
||||
Dim myGridControl As GridControl = GridControlDocSearch1
|
||||
@ -536,6 +542,7 @@ Public Class frmResultDoc
|
||||
tslblState.Text = ""
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Sub ReLoad_Active_DocTab()
|
||||
Try
|
||||
Dim oTabIndex = XtraTabControlDocs.SelectedTabPageIndex
|
||||
@ -647,4 +654,20 @@ Public Class frmResultDoc
|
||||
ShouldReturnToMatchForm = True
|
||||
Close()
|
||||
End Sub
|
||||
|
||||
Private Sub GridViewDocSearch1_ColumnFilterChanged(sender As Object, e As EventArgs) Handles GridViewDocSearch1.ColumnFilterChanged
|
||||
Filter_EventTab(GridViewDocSearch1.RowCount)
|
||||
End Sub
|
||||
Private Sub GridViewDocSearch2_ColumnFilterChanged(sender As Object, e As EventArgs) Handles GridViewDocSearch2.ColumnFilterChanged
|
||||
Filter_EventTab(GridViewDocSearch2.RowCount)
|
||||
End Sub
|
||||
Private Sub GridViewDocSearch3_ColumnFilterChanged(sender As Object, e As EventArgs) Handles GridViewDocSearch3.ColumnFilterChanged
|
||||
Filter_EventTab(GridViewDocSearch3.RowCount)
|
||||
End Sub
|
||||
Private Sub GridViewDocSearch4_ColumnFilterChanged(sender As Object, e As EventArgs) Handles GridViewDocSearch4.ColumnFilterChanged
|
||||
Filter_EventTab(GridViewDocSearch4.RowCount)
|
||||
End Sub
|
||||
Private Sub GridViewDocSearch5_ColumnFilterChanged(sender As Object, e As EventArgs) Handles GridViewDocSearch5.ColumnFilterChanged
|
||||
Filter_EventTab(GridViewDocSearch5.RowCount)
|
||||
End Sub
|
||||
End Class
|
||||
@ -35,7 +35,7 @@ Public Class frmResultSQL
|
||||
_frmProfileMatch = ProfileMatchForm
|
||||
End Sub
|
||||
|
||||
Private Async Sub frmResultDoc_Load(sender As Object, e As EventArgs) Handles Me.Load
|
||||
Private Async Sub frmResultSQL_Load(sender As Object, e As EventArgs) Handles Me.Load
|
||||
If Not ConfigManager.Config.ResultDataWindowSize.IsEmpty Then
|
||||
Size = ConfigManager.Config.ResultDataWindowSize
|
||||
End If
|
||||
@ -49,7 +49,9 @@ Public Class frmResultSQL
|
||||
GridViewDataSearch1.ShowLoadingPanel()
|
||||
|
||||
Dim oSearches = Await LoadSearchesAsync()
|
||||
|
||||
If oSearches.Count = 0 Then
|
||||
Me.Close()
|
||||
End If
|
||||
For Each oSearch In oSearches
|
||||
RefreshTabData(oSearch.ProfileId, oSearch.DataTable, oSearch.TabIndex, oSearch.TabCaption)
|
||||
Next
|
||||
@ -57,7 +59,7 @@ Public Class frmResultSQL
|
||||
GridViewDataSearch1.HideLoadingPanel()
|
||||
End Sub
|
||||
|
||||
Private Sub frmResultDoc_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing
|
||||
Private Sub frmResultSQL_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing
|
||||
Try
|
||||
ConfigManager.Config.ResultDataWindowSize = Size
|
||||
ConfigManager.Config.ResultDataWindowLocation = Location
|
||||
|
||||
1
app/DD_Clipboard_Searcher/frmSplash.Designer.vb
generated
1
app/DD_Clipboard_Searcher/frmSplash.Designer.vb
generated
@ -106,6 +106,7 @@ Partial Class frmSplash
|
||||
Me.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None
|
||||
Me.Name = "frmSplash"
|
||||
Me.ShowIcon = False
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
||||
Me.Text = "frmSplash"
|
||||
CType(Me.PictureBox2, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
|
||||
File diff suppressed because it is too large
Load Diff
66
app/DD_Clipboard_Searcher/frmStart.Designer.vb
generated
66
app/DD_Clipboard_Searcher/frmStart.Designer.vb
generated
@ -28,19 +28,21 @@ Partial Class frmStart
|
||||
Me.cmstrpNotifyIcon = New System.Windows.Forms.ContextMenuStrip(Me.components)
|
||||
Me.tsmiChangeState = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.ClientÖffnenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.ClientBeendenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.StatusStrip1 = New System.Windows.Forms.StatusStrip()
|
||||
Me.labelUser = New System.Windows.Forms.ToolStripStatusLabel()
|
||||
Me.labelVersion = New System.Windows.Forms.ToolStripStatusLabel()
|
||||
Me.lblrefresh = New System.Windows.Forms.ToolStripStatusLabel()
|
||||
Me.TimerClose = New System.Windows.Forms.Timer(Me.components)
|
||||
Me.ContextMenuStripForm = New System.Windows.Forms.ContextMenuStrip(Me.components)
|
||||
Me.MinimierenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.GroupBox1 = New System.Windows.Forms.GroupBox()
|
||||
Me.Label2 = New System.Windows.Forms.Label()
|
||||
Me.labelHotkey = New System.Windows.Forms.Label()
|
||||
Me.btnUserConfig = New System.Windows.Forms.Button()
|
||||
Me.btnAdminConfig = New System.Windows.Forms.Button()
|
||||
Me.Label2 = New System.Windows.Forms.Label()
|
||||
Me.ClientBeendenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.ImageList1 = New System.Windows.Forms.ImageList(Me.components)
|
||||
Me.TimerRefresh = New System.Windows.Forms.Timer(Me.components)
|
||||
Me.cmstrpNotifyIcon.SuspendLayout()
|
||||
Me.StatusStrip1.SuspendLayout()
|
||||
Me.ContextMenuStripForm.SuspendLayout()
|
||||
@ -61,7 +63,7 @@ Partial Class frmStart
|
||||
'
|
||||
Me.cmstrpNotifyIcon.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tsmiChangeState, Me.ClientÖffnenToolStripMenuItem, Me.ClientBeendenToolStripMenuItem})
|
||||
Me.cmstrpNotifyIcon.Name = "cmstrpNotifyIcon"
|
||||
Me.cmstrpNotifyIcon.Size = New System.Drawing.Size(250, 92)
|
||||
Me.cmstrpNotifyIcon.Size = New System.Drawing.Size(250, 70)
|
||||
'
|
||||
'tsmiChangeState
|
||||
'
|
||||
@ -78,9 +80,16 @@ Partial Class frmStart
|
||||
Me.ClientÖffnenToolStripMenuItem.Size = New System.Drawing.Size(249, 22)
|
||||
Me.ClientÖffnenToolStripMenuItem.Text = "Client öffnen"
|
||||
'
|
||||
'ClientBeendenToolStripMenuItem
|
||||
'
|
||||
Me.ClientBeendenToolStripMenuItem.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.cancel
|
||||
Me.ClientBeendenToolStripMenuItem.Name = "ClientBeendenToolStripMenuItem"
|
||||
Me.ClientBeendenToolStripMenuItem.Size = New System.Drawing.Size(249, 22)
|
||||
Me.ClientBeendenToolStripMenuItem.Text = "Client beenden"
|
||||
'
|
||||
'StatusStrip1
|
||||
'
|
||||
Me.StatusStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.labelUser, Me.labelVersion})
|
||||
Me.StatusStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.labelUser, Me.lblrefresh})
|
||||
Me.StatusStrip1.Location = New System.Drawing.Point(0, 154)
|
||||
Me.StatusStrip1.Name = "StatusStrip1"
|
||||
Me.StatusStrip1.Size = New System.Drawing.Size(345, 22)
|
||||
@ -95,12 +104,10 @@ Partial Class frmStart
|
||||
Me.labelUser.Size = New System.Drawing.Size(37, 17)
|
||||
Me.labelUser.Text = "{0}"
|
||||
'
|
||||
'labelVersion
|
||||
'lblrefresh
|
||||
'
|
||||
Me.labelVersion.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.StatusAnnotations_Information_16xMD_color
|
||||
Me.labelVersion.Name = "labelVersion"
|
||||
Me.labelVersion.Size = New System.Drawing.Size(78, 17)
|
||||
Me.labelVersion.Text = "Version {0}"
|
||||
Me.lblrefresh.Name = "lblrefresh"
|
||||
Me.lblrefresh.Size = New System.Drawing.Size(0, 17)
|
||||
'
|
||||
'TimerClose
|
||||
'
|
||||
@ -145,6 +152,17 @@ Partial Class frmStart
|
||||
Me.GroupBox1.TabStop = False
|
||||
Me.GroupBox1.Text = "Aktuelle Tastenkombination:"
|
||||
'
|
||||
'Label2
|
||||
'
|
||||
Me.Label2.Dock = System.Windows.Forms.DockStyle.Top
|
||||
Me.Label2.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label2.Location = New System.Drawing.Point(3, 17)
|
||||
Me.Label2.Name = "Label2"
|
||||
Me.Label2.Size = New System.Drawing.Size(312, 13)
|
||||
Me.Label2.TabIndex = 14
|
||||
Me.Label2.Text = "Zwischenablage gefolgt von:"
|
||||
Me.Label2.TextAlign = System.Drawing.ContentAlignment.TopCenter
|
||||
'
|
||||
'labelHotkey
|
||||
'
|
||||
Me.labelHotkey.Dock = System.Windows.Forms.DockStyle.Bottom
|
||||
@ -179,23 +197,19 @@ Partial Class frmStart
|
||||
Me.btnAdminConfig.Text = "Administration"
|
||||
Me.btnAdminConfig.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Label2
|
||||
'ImageList1
|
||||
'
|
||||
Me.Label2.Dock = System.Windows.Forms.DockStyle.Top
|
||||
Me.Label2.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label2.Location = New System.Drawing.Point(3, 17)
|
||||
Me.Label2.Name = "Label2"
|
||||
Me.Label2.Size = New System.Drawing.Size(312, 13)
|
||||
Me.Label2.TabIndex = 14
|
||||
Me.Label2.Text = "Zwischenablage gefolgt von:"
|
||||
Me.Label2.TextAlign = System.Drawing.ContentAlignment.TopCenter
|
||||
Me.ImageList1.ImageStream = CType(resources.GetObject("ImageList1.ImageStream"), System.Windows.Forms.ImageListStreamer)
|
||||
Me.ImageList1.TransparentColor = System.Drawing.Color.Transparent
|
||||
Me.ImageList1.Images.SetKeyName(0, "WorkItem_32xMD.png")
|
||||
Me.ImageList1.Images.SetKeyName(1, "key_16xLG.png")
|
||||
Me.ImageList1.Images.SetKeyName(2, "ResultstoFile_9946.png")
|
||||
Me.ImageList1.Images.SetKeyName(3, "WindowsForm_817.ico")
|
||||
Me.ImageList1.Images.SetKeyName(4, "process_16xMD.png")
|
||||
'
|
||||
'ClientBeendenToolStripMenuItem
|
||||
'TimerRefresh
|
||||
'
|
||||
Me.ClientBeendenToolStripMenuItem.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.cancel
|
||||
Me.ClientBeendenToolStripMenuItem.Name = "ClientBeendenToolStripMenuItem"
|
||||
Me.ClientBeendenToolStripMenuItem.Size = New System.Drawing.Size(249, 22)
|
||||
Me.ClientBeendenToolStripMenuItem.Text = "Client beenden"
|
||||
Me.TimerRefresh.Interval = 120000
|
||||
'
|
||||
'frmStart
|
||||
'
|
||||
@ -241,7 +255,9 @@ Partial Class frmStart
|
||||
Friend WithEvents labelHotkey As Label
|
||||
Friend WithEvents btnUserConfig As Button
|
||||
Friend WithEvents btnAdminConfig As Button
|
||||
Friend WithEvents labelVersion As ToolStripStatusLabel
|
||||
Friend WithEvents Label2 As Label
|
||||
Friend WithEvents ClientBeendenToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents ImageList1 As ImageList
|
||||
Friend WithEvents TimerRefresh As Timer
|
||||
Friend WithEvents lblrefresh As ToolStripStatusLabel
|
||||
End Class
|
||||
|
||||
@ -4655,6 +4655,68 @@
|
||||
<metadata name="ContextMenuStripForm.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>528, 17</value>
|
||||
</metadata>
|
||||
<metadata name="ImageList1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>707, 17</value>
|
||||
</metadata>
|
||||
<data name="ImageList1.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>
|
||||
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w
|
||||
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
|
||||
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAABU
|
||||
CwAAAk1TRnQBSQFMAgEBBQEAARgBAAEYAQABEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
|
||||
AwABQAMAASADAAEBAQABCAYAAQgYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA
|
||||
AQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IBAAM5
|
||||
AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8BMwMA
|
||||
AWYDAAGZAwABzAIAATMDAAIzAgABMwFmAgABMwGZAgABMwHMAgABMwH/AgABZgMAAWYBMwIAAmYCAAFm
|
||||
AZkCAAFmAcwCAAFmAf8CAAGZAwABmQEzAgABmQFmAgACmQIAAZkBzAIAAZkB/wIAAcwDAAHMATMCAAHM
|
||||
AWYCAAHMAZkCAALMAgABzAH/AgAB/wFmAgAB/wGZAgAB/wHMAQABMwH/AgAB/wEAATMBAAEzAQABZgEA
|
||||
ATMBAAGZAQABMwEAAcwBAAEzAQAB/wEAAf8BMwIAAzMBAAIzAWYBAAIzAZkBAAIzAcwBAAIzAf8BAAEz
|
||||
AWYCAAEzAWYBMwEAATMCZgEAATMBZgGZAQABMwFmAcwBAAEzAWYB/wEAATMBmQIAATMBmQEzAQABMwGZ
|
||||
AWYBAAEzApkBAAEzAZkBzAEAATMBmQH/AQABMwHMAgABMwHMATMBAAEzAcwBZgEAATMBzAGZAQABMwLM
|
||||
AQABMwHMAf8BAAEzAf8BMwEAATMB/wFmAQABMwH/AZkBAAEzAf8BzAEAATMC/wEAAWYDAAFmAQABMwEA
|
||||
AWYBAAFmAQABZgEAAZkBAAFmAQABzAEAAWYBAAH/AQABZgEzAgABZgIzAQABZgEzAWYBAAFmATMBmQEA
|
||||
AWYBMwHMAQABZgEzAf8BAAJmAgACZgEzAQADZgEAAmYBmQEAAmYBzAEAAWYBmQIAAWYBmQEzAQABZgGZ
|
||||
AWYBAAFmApkBAAFmAZkBzAEAAWYBmQH/AQABZgHMAgABZgHMATMBAAFmAcwBmQEAAWYCzAEAAWYBzAH/
|
||||
AQABZgH/AgABZgH/ATMBAAFmAf8BmQEAAWYB/wHMAQABzAEAAf8BAAH/AQABzAEAApkCAAGZATMBmQEA
|
||||
AZkBAAGZAQABmQEAAcwBAAGZAwABmQIzAQABmQEAAWYBAAGZATMBzAEAAZkBAAH/AQABmQFmAgABmQFm
|
||||
ATMBAAGZATMBZgEAAZkBZgGZAQABmQFmAcwBAAGZATMB/wEAApkBMwEAApkBZgEAA5kBAAKZAcwBAAKZ
|
||||
Af8BAAGZAcwCAAGZAcwBMwEAAWYBzAFmAQABmQHMAZkBAAGZAswBAAGZAcwB/wEAAZkB/wIAAZkB/wEz
|
||||
AQABmQHMAWYBAAGZAf8BmQEAAZkB/wHMAQABmQL/AQABzAMAAZkBAAEzAQABzAEAAWYBAAHMAQABmQEA
|
||||
AcwBAAHMAQABmQEzAgABzAIzAQABzAEzAWYBAAHMATMBmQEAAcwBMwHMAQABzAEzAf8BAAHMAWYCAAHM
|
||||
AWYBMwEAAZkCZgEAAcwBZgGZAQABzAFmAcwBAAGZAWYB/wEAAcwBmQIAAcwBmQEzAQABzAGZAWYBAAHM
|
||||
ApkBAAHMAZkBzAEAAcwBmQH/AQACzAIAAswBMwEAAswBZgEAAswBmQEAA8wBAALMAf8BAAHMAf8CAAHM
|
||||
Af8BMwEAAZkB/wFmAQABzAH/AZkBAAHMAf8BzAEAAcwC/wEAAcwBAAEzAQAB/wEAAWYBAAH/AQABmQEA
|
||||
AcwBMwIAAf8CMwEAAf8BMwFmAQAB/wEzAZkBAAH/ATMBzAEAAf8BMwH/AQAB/wFmAgAB/wFmATMBAAHM
|
||||
AmYBAAH/AWYBmQEAAf8BZgHMAQABzAFmAf8BAAH/AZkCAAH/AZkBMwEAAf8BmQFmAQAB/wKZAQAB/wGZ
|
||||
AcwBAAH/AZkB/wEAAf8BzAIAAf8BzAEzAQAB/wHMAWYBAAH/AcwBmQEAAf8CzAEAAf8BzAH/AQAC/wEz
|
||||
AQABzAH/AWYBAAL/AZkBAAL/AcwBAAJmAf8BAAFmAf8BZgEAAWYC/wEAAf8CZgEAAf8BZgH/AQAC/wFm
|
||||
AQABIQEAAaUBAANfAQADdwEAA4YBAAOWAQADywEAA7IBAAPXAQAD3QEAA+MBAAPqAQAD8QEAA/gBAAHw
|
||||
AfsB/wEAAaQCoAEAA4ADAAH/AgAB/wMAAv8BAAH/AwAB/wEAAf8BAAL/AgAD/4UABvQ5AAH0AfAB9AJt
|
||||
AfQB8AH0NwAB9AHwARQBbQITAW0BFAHwAfQ2AAL0AW0BkgL0AZIBbQP0NQAB9AFtAeoB9AKSAfQBEwFt
|
||||
AfQB8AH0NAAB9AFtAeoB9AKSAfQBEwFtAbwBFAHwAfQzAAL0AW0BkgL0AZIBbQH0AQcBbQL0MwAB9AHw
|
||||
ARQBbQITAW0BFAHwAfQBEwFtAfQ0AAH0AfAB9AJtAfQB8AHxAfQBEwFtAfQ1AAP0AbwBBwL0AZIBbQL0
|
||||
NgAB9AHwARQBbQITAW0BFAHwAfQ3AAH0AfAB9AJtAfQB8AH0OQAG9JcADPQZAAH0GgAB9AoUAfQUAAL0
|
||||
AgAD9BkAAfQKFAH0AQAP9AMAAfQBvAHtAvQB8AEUAfQZAAH0AhQG9AIUAfQBAAH0DRQB9AQAAfQB6gEU
|
||||
AbwCFAH0BwAF9AEABvQGAAH0AhQG9AIUAfQBAAH0ARQL9AEUAfQEAAH/AfQEFAH0Af8GAAH0ARQB9AEU
|
||||
AvQB8wFtAhQBbQHzAfQFAAH0AhQG9AIUAfQBAAH0ARQB9AMUBfQBFAH0ARQB9AQAAfQB8AQUARMB9AH/
|
||||
BAAC9AEUAfQBFAL0AW0EFAFtAfQFAAH0AhQG9AIUAfQBAAH0ARQF9AUUAfQBFAH0AwAB9AHwBhQBEwP0
|
||||
AgAB9AcUARMC8gIUAfIFAAH0AhQG9AIUAfQBAAH0ARQL9AEUAfQDAAH0AQcCFAETBhQB8wH0AQAB9AcU
|
||||
ARMC8gIUAfQDAAP0Ae8BFAb0AhQB9AEAAfQBFAH0AxQF9AEUAfQBFAH0BAAE9AETBBQBbQH0AgAH9AFt
|
||||
BBQBbQH0AwAB9AG0AYoBtAHvBPQDFAHsAfQBAAH0ARQF9AUUAfQBFAH0BwAB/wH0ARMCFAHsAfQJAAH0
|
||||
AfMBbQIUAW0B8wH0AQAE9AG0AYoBtAT0AhQB7AH0Af8BAAH0ARQL9AEUAfQIAAH0AbwBFAHsAfQLAAb0
|
||||
AgAB9AaKAbQB7wMUAewB9AH/AgAB9A0UAfQJAAH0AewB9BQAAfQGigG0Ae8CFAHsAfQB/wMAAfQNFAH0
|
||||
CQAC9BUABPQBtAGKAbQF9AH/BAAP9CIAAfQBtAGKAbQB9AH/OgAE9AH/GQABQgFNAT4HAAE+AwABKAMA
|
||||
AUADAAEgAwABAQEAAQEGAAEBFgAD/wEAAv8GAAL/BgAB8AE/BgAB4AEfBgABwAEPBgABwAEHBgABwAED
|
||||
BgABwAEBBgABwAEBBgABwAEBBgAB4AEBBgAB8AEBBgAB+AEBBgAB/AEDBgAB/gEHBgAC/wYABP8B8AEA
|
||||
A/8BvwL/AfABAAL/AfMBHwL/AfABAAGAAQAB4AEfAv8B8AEAAYABAAHwAR8BwQEDAfABAAGAAQAB8AEP
|
||||
AcABAQHwAQABgAEAAfABBwGAAQEB8AEAAYABAAHgAQEBgAEBAfABAAGAAQAB4AEAAYABAQHAAQABgAEA
|
||||
AfABAQGAAQEBwAEAAYABAAH+AQMB/gEBAgABgAEAAf8BBwH/AQMBAAEBAYABAAH/AY8C/wEAAQMBgAEA
|
||||
Af8BnwL/AQABBwGAAQAE/wHAB/8BwQP/Cw==
|
||||
</value>
|
||||
</data>
|
||||
<metadata name="TimerRefresh.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>817, 17</value>
|
||||
</metadata>
|
||||
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
AAABAAEAAAAAAAEAIAAoIAQAFgAAACgAAAAAAQAAAAIAAAEAIAAAAAAAACAEABMLAAATCwAAAAAAAAAA
|
||||
|
||||
@ -3,6 +3,8 @@ Imports System.IO
|
||||
Imports System.Globalization
|
||||
Imports DD_LIB_Standards
|
||||
Imports DD_Clipboard_Watcher.ClassConstants
|
||||
Imports System.Windows.Automation
|
||||
Imports DD_Clipboard_Watcher.ClassWindowAPI
|
||||
|
||||
Public Class frmStart
|
||||
Dim WithEvents Hotkey As New ClassHotkey(Me)
|
||||
@ -56,7 +58,6 @@ Public Class frmStart
|
||||
|
||||
End If
|
||||
labelUser.Text = String.Format(labelUser.Text, USER_USERNAME)
|
||||
labelVersion.Text = String.Format(labelVersion.Text, My.Application.Info.Version.ToString)
|
||||
labelHotkey.Text = String.Format(labelHotkey.Text, $"{HotkeyFunctionKey.ToUpper}+{HotkeySearchKey.ToUpper}")
|
||||
End Sub
|
||||
|
||||
@ -109,33 +110,61 @@ Public Class frmStart
|
||||
Dim oWindowInfo = ClassWindowAPI.GetWindowInfo()
|
||||
Dim ClipboardContents As String = Clipboard.GetText()
|
||||
Dim oProfileFilter As ClassProfileFilter
|
||||
|
||||
Dim newoResult As IntPtr = FocusedControlinActiveWindow(Handle)
|
||||
Try
|
||||
oProfileFilter = New ClassProfileFilter(DT_USER_PROFILES, DTPROFILE_REL_WINDOW, DTPROFILE_REL_CONTROL)
|
||||
oProfileFilter = New ClassProfileFilter(DT_USER_PROFILES, DTPROFILE_REL_PROCESS, DTPROFILE_REL_WINDOW, DTPROFILE_REL_CONTROL)
|
||||
Catch ex As Exception
|
||||
MsgBox("Fehler beim Laden der Profile. Möglicherweise liegt ein Konfigurationsfehler vor.", MsgBoxStyle.Critical, Text)
|
||||
Exit Sub
|
||||
End Try
|
||||
|
||||
Dim oProfiles = oProfileFilter.Profiles.AsEnumerable()
|
||||
CurrMatchTreeView.Nodes.Clear()
|
||||
CurrMatchTreeView.ImageList = ImageList1
|
||||
CurrMatchTreeView.SelectedImageIndex = 0
|
||||
|
||||
oProfiles = oProfileFilter.FilterProfilesByProcess(oProfiles, oWindowInfo.ProcessName)
|
||||
oProfiles = oProfileFilter.FilterProfilesByClipboardRegex(oProfiles, ClipboardContents)
|
||||
oProfiles = oProfileFilter.FilterWindowsByWindowTitleRegex(oProfiles, oWindowInfo.WindowTitle)
|
||||
oProfiles = oProfileFilter.FilterWindowsByWindowClipboardRegex(oProfiles, ClipboardContents)
|
||||
oProfiles = oProfileFilter.FilterProfilesByFocusedControl(oProfiles, ClipboardContents)
|
||||
oProfiles = oProfileFilter.RemoveDuplicateProfiles()
|
||||
If oProfiles.Count > 0 Then
|
||||
oProfiles = oProfileFilter.FilterProfilesByProcess(oProfiles, oWindowInfo.ProcessName)
|
||||
If oProfiles.Count > 0 Then
|
||||
oProfiles = oProfileFilter.FilterWindowsByWindowTitleRegex(oProfiles, oWindowInfo.WindowTitle)
|
||||
If oProfiles.Count > 0 Then
|
||||
' Dim ControlFocusResult
|
||||
Dim oResult As WindowInfo = GetFocusedControl(Handle)
|
||||
'Automation = New ClassAutomation(LogConfig)
|
||||
'If Not IsNothing(Automation.AutomationId) Then
|
||||
' ControlFocusResult = Automation.AutomationId
|
||||
'Else
|
||||
' ControlFocusResult = String.Empty
|
||||
'End If
|
||||
' MsgBox(newoResult.ToString)
|
||||
oProfiles = oProfileFilter.FilterProfilesByFocusedControl(oProfiles, ClipboardContents, newoResult.ToString)
|
||||
'oProfiles = oProfileFilter.FilterWindowsByWindowClipboardRegex(oProfiles, ClipboardContents)
|
||||
End If
|
||||
|
||||
|
||||
|
||||
End If
|
||||
End If
|
||||
'oProfiles = oProfileFilter.RemoveDuplicateProfiles()
|
||||
oProfiles = oProfileFilter.ClearNotMatchedProfiles(oProfiles)
|
||||
oProfiles = oProfiles.ToList()
|
||||
|
||||
|
||||
|
||||
|
||||
CURRENT_MATCHING_PROFILES = oProfiles
|
||||
CURRENT_CLIPBOARD_CONTENTS = ClipboardContents
|
||||
CURRENT_CLIPBOARD_CONTENTS = ClipboardContents
|
||||
End Sub
|
||||
|
||||
Private Sub ReceiveHotKey(ByVal HotKeyID As String) Handles Hotkey.HotKeyPressed
|
||||
If HotKeyID = HOTKEY_TRIGGER_WATCHER Then
|
||||
If CURRENT_MATCHING_PROFILES.Count > 0 And MONITORING_ACTIVE = True Then
|
||||
CHECK_PROFILE_MATCH()
|
||||
If CURRENT_CLIPBOARD_CONTENTS IsNot Nothing Then
|
||||
If CURRENT_MATCHING_PROFILES.Count > 0 And MONITORING_ACTIVE = True Then
|
||||
CHECK_PROFILE_MATCH()
|
||||
End If
|
||||
End If
|
||||
|
||||
ElseIf HotKeyID = HOTKEY_TOGGLE_WATCHER Then
|
||||
Change_Monitoring_State()
|
||||
End If
|
||||
@ -227,6 +256,7 @@ Public Class frmStart
|
||||
If USER_IS_ADMIN = True Then
|
||||
btnAdminConfig.Visible = True
|
||||
End If
|
||||
TimerRefresh.Start()
|
||||
End Sub
|
||||
|
||||
Private Sub NotifyIcon1_DoubleClick(sender As Object, e As EventArgs) Handles NotifyIconMain.DoubleClick
|
||||
@ -296,8 +326,18 @@ Public Class frmStart
|
||||
End Sub
|
||||
|
||||
Private Sub ClientBeendenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ClientBeendenToolStripMenuItem.Click
|
||||
Shut_Down
|
||||
End Sub
|
||||
Sub Shut_Down()
|
||||
If MsgBox("Wollen Sie das Programm beenden?", MsgBoxStyle.Question Or MsgBoxStyle.YesNo, Text) = MsgBoxResult.Yes Then
|
||||
Close()
|
||||
End If
|
||||
End Sub
|
||||
Private Sub TimerRefresh_Tick(sender As Object, e As EventArgs) Handles TimerRefresh.Tick
|
||||
ClassInit.Refresh_Profile_Links()
|
||||
lblrefresh.Text =
|
||||
ClassInit.CheckModuleData()
|
||||
lblrefresh.Text = $"Refreshed: {Now.ToShortTimeString} - UserLoggedIn: {USERCOUNT_LOGGED_IN}"
|
||||
|
||||
End Sub
|
||||
End Class
|
||||
|
||||
81
app/DD_Clipboard_Searcher/frmTreeView.Designer.vb
generated
Normal file
81
app/DD_Clipboard_Searcher/frmTreeView.Designer.vb
generated
Normal file
@ -0,0 +1,81 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class frmTreeView
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
|
||||
<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
|
||||
|
||||
'Wird vom Windows Form-Designer benötigt.
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
|
||||
'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
|
||||
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.components = New System.ComponentModel.Container()
|
||||
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmTreeView))
|
||||
Me.StatusStrip1 = New System.Windows.Forms.StatusStrip()
|
||||
Me.TreeView1 = New System.Windows.Forms.TreeView()
|
||||
Me.ImageList1 = New System.Windows.Forms.ImageList(Me.components)
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'StatusStrip1
|
||||
'
|
||||
Me.StatusStrip1.Location = New System.Drawing.Point(0, 463)
|
||||
Me.StatusStrip1.Name = "StatusStrip1"
|
||||
Me.StatusStrip1.Padding = New System.Windows.Forms.Padding(1, 0, 16, 0)
|
||||
Me.StatusStrip1.Size = New System.Drawing.Size(933, 22)
|
||||
Me.StatusStrip1.TabIndex = 1
|
||||
Me.StatusStrip1.Text = "StatusStrip1"
|
||||
'
|
||||
'TreeView1
|
||||
'
|
||||
Me.TreeView1.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.TreeView1.Location = New System.Drawing.Point(0, 0)
|
||||
Me.TreeView1.Name = "TreeView1"
|
||||
Me.TreeView1.Size = New System.Drawing.Size(933, 463)
|
||||
Me.TreeView1.TabIndex = 2
|
||||
'
|
||||
'ImageList1
|
||||
'
|
||||
Me.ImageList1.ImageStream = CType(resources.GetObject("ImageList1.ImageStream"), System.Windows.Forms.ImageListStreamer)
|
||||
Me.ImageList1.TransparentColor = System.Drawing.Color.Transparent
|
||||
Me.ImageList1.Images.SetKeyName(0, "WorkItem_32xMD.png")
|
||||
Me.ImageList1.Images.SetKeyName(1, "key_16xLG.png")
|
||||
Me.ImageList1.Images.SetKeyName(2, "ResultstoFile_9946.png")
|
||||
Me.ImageList1.Images.SetKeyName(3, "WindowsForm_817.ico")
|
||||
Me.ImageList1.Images.SetKeyName(4, "process_16xMD.png")
|
||||
'
|
||||
'frmTreeView
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 14.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.ClientSize = New System.Drawing.Size(933, 485)
|
||||
Me.Controls.Add(Me.TreeView1)
|
||||
Me.Controls.Add(Me.StatusStrip1)
|
||||
Me.Font = New System.Drawing.Font("Tahoma", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
|
||||
Me.MaximizeBox = False
|
||||
Me.MinimizeBox = False
|
||||
Me.Name = "frmTreeView"
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
||||
Me.Text = "Ablauf Suchalgorithmus"
|
||||
Me.TopMost = True
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
End Sub
|
||||
Friend WithEvents StatusStrip1 As StatusStrip
|
||||
Friend WithEvents TreeView1 As TreeView
|
||||
Friend WithEvents ImageList1 As ImageList
|
||||
End Class
|
||||
216
app/DD_Clipboard_Searcher/frmTreeView.resx
Normal file
216
app/DD_Clipboard_Searcher/frmTreeView.resx
Normal file
@ -0,0 +1,216 @@
|
||||
<?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>
|
||||
<metadata name="StatusStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>17, 17</value>
|
||||
</metadata>
|
||||
<metadata name="ImageList1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>134, 17</value>
|
||||
</metadata>
|
||||
<data name="ImageList1.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>
|
||||
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w
|
||||
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
|
||||
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAABU
|
||||
CwAAAk1TRnQBSQFMAgEBBQEAARgBAAEYAQABEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
|
||||
AwABQAMAASADAAEBAQABCAYAAQgYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA
|
||||
AQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IBAAM5
|
||||
AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8BMwMA
|
||||
AWYDAAGZAwABzAIAATMDAAIzAgABMwFmAgABMwGZAgABMwHMAgABMwH/AgABZgMAAWYBMwIAAmYCAAFm
|
||||
AZkCAAFmAcwCAAFmAf8CAAGZAwABmQEzAgABmQFmAgACmQIAAZkBzAIAAZkB/wIAAcwDAAHMATMCAAHM
|
||||
AWYCAAHMAZkCAALMAgABzAH/AgAB/wFmAgAB/wGZAgAB/wHMAQABMwH/AgAB/wEAATMBAAEzAQABZgEA
|
||||
ATMBAAGZAQABMwEAAcwBAAEzAQAB/wEAAf8BMwIAAzMBAAIzAWYBAAIzAZkBAAIzAcwBAAIzAf8BAAEz
|
||||
AWYCAAEzAWYBMwEAATMCZgEAATMBZgGZAQABMwFmAcwBAAEzAWYB/wEAATMBmQIAATMBmQEzAQABMwGZ
|
||||
AWYBAAEzApkBAAEzAZkBzAEAATMBmQH/AQABMwHMAgABMwHMATMBAAEzAcwBZgEAATMBzAGZAQABMwLM
|
||||
AQABMwHMAf8BAAEzAf8BMwEAATMB/wFmAQABMwH/AZkBAAEzAf8BzAEAATMC/wEAAWYDAAFmAQABMwEA
|
||||
AWYBAAFmAQABZgEAAZkBAAFmAQABzAEAAWYBAAH/AQABZgEzAgABZgIzAQABZgEzAWYBAAFmATMBmQEA
|
||||
AWYBMwHMAQABZgEzAf8BAAJmAgACZgEzAQADZgEAAmYBmQEAAmYBzAEAAWYBmQIAAWYBmQEzAQABZgGZ
|
||||
AWYBAAFmApkBAAFmAZkBzAEAAWYBmQH/AQABZgHMAgABZgHMATMBAAFmAcwBmQEAAWYCzAEAAWYBzAH/
|
||||
AQABZgH/AgABZgH/ATMBAAFmAf8BmQEAAWYB/wHMAQABzAEAAf8BAAH/AQABzAEAApkCAAGZATMBmQEA
|
||||
AZkBAAGZAQABmQEAAcwBAAGZAwABmQIzAQABmQEAAWYBAAGZATMBzAEAAZkBAAH/AQABmQFmAgABmQFm
|
||||
ATMBAAGZATMBZgEAAZkBZgGZAQABmQFmAcwBAAGZATMB/wEAApkBMwEAApkBZgEAA5kBAAKZAcwBAAKZ
|
||||
Af8BAAGZAcwCAAGZAcwBMwEAAWYBzAFmAQABmQHMAZkBAAGZAswBAAGZAcwB/wEAAZkB/wIAAZkB/wEz
|
||||
AQABmQHMAWYBAAGZAf8BmQEAAZkB/wHMAQABmQL/AQABzAMAAZkBAAEzAQABzAEAAWYBAAHMAQABmQEA
|
||||
AcwBAAHMAQABmQEzAgABzAIzAQABzAEzAWYBAAHMATMBmQEAAcwBMwHMAQABzAEzAf8BAAHMAWYCAAHM
|
||||
AWYBMwEAAZkCZgEAAcwBZgGZAQABzAFmAcwBAAGZAWYB/wEAAcwBmQIAAcwBmQEzAQABzAGZAWYBAAHM
|
||||
ApkBAAHMAZkBzAEAAcwBmQH/AQACzAIAAswBMwEAAswBZgEAAswBmQEAA8wBAALMAf8BAAHMAf8CAAHM
|
||||
Af8BMwEAAZkB/wFmAQABzAH/AZkBAAHMAf8BzAEAAcwC/wEAAcwBAAEzAQAB/wEAAWYBAAH/AQABmQEA
|
||||
AcwBMwIAAf8CMwEAAf8BMwFmAQAB/wEzAZkBAAH/ATMBzAEAAf8BMwH/AQAB/wFmAgAB/wFmATMBAAHM
|
||||
AmYBAAH/AWYBmQEAAf8BZgHMAQABzAFmAf8BAAH/AZkCAAH/AZkBMwEAAf8BmQFmAQAB/wKZAQAB/wGZ
|
||||
AcwBAAH/AZkB/wEAAf8BzAIAAf8BzAEzAQAB/wHMAWYBAAH/AcwBmQEAAf8CzAEAAf8BzAH/AQAC/wEz
|
||||
AQABzAH/AWYBAAL/AZkBAAL/AcwBAAJmAf8BAAFmAf8BZgEAAWYC/wEAAf8CZgEAAf8BZgH/AQAC/wFm
|
||||
AQABIQEAAaUBAANfAQADdwEAA4YBAAOWAQADywEAA7IBAAPXAQAD3QEAA+MBAAPqAQAD8QEAA/gBAAHw
|
||||
AfsB/wEAAaQCoAEAA4ADAAH/AgAB/wMAAv8BAAH/AwAB/wEAAf8BAAL/AgAD/4UABvQ5AAH0AfAB9AJt
|
||||
AfQB8AH0NwAB9AHwARQBbQITAW0BFAHwAfQ2AAL0AW0BkgL0AZIBbQP0NQAB9AFtAeoB9AKSAfQBEwFt
|
||||
AfQB8AH0NAAB9AFtAeoB9AKSAfQBEwFtAbwBFAHwAfQzAAL0AW0BkgL0AZIBbQH0AQcBbQL0MwAB9AHw
|
||||
ARQBbQITAW0BFAHwAfQBEwFtAfQ0AAH0AfAB9AJtAfQB8AHxAfQBEwFtAfQ1AAP0AbwBBwL0AZIBbQL0
|
||||
NgAB9AHwARQBbQITAW0BFAHwAfQ3AAH0AfAB9AJtAfQB8AH0OQAG9JcADPQZAAH0GgAB9AoUAfQUAAL0
|
||||
AgAD9BkAAfQKFAH0AQAP9AMAAfQBvAHtAvQB8AEUAfQZAAH0AhQG9AIUAfQBAAH0DRQB9AQAAfQB6gEU
|
||||
AbwCFAH0BwAF9AEABvQGAAH0AhQG9AIUAfQBAAH0ARQL9AEUAfQEAAH/AfQEFAH0Af8GAAH0ARQB9AEU
|
||||
AvQB8wFtAhQBbQHzAfQFAAH0AhQG9AIUAfQBAAH0ARQB9AMUBfQBFAH0ARQB9AQAAfQB8AQUARMB9AH/
|
||||
BAAC9AEUAfQBFAL0AW0EFAFtAfQFAAH0AhQG9AIUAfQBAAH0ARQF9AUUAfQBFAH0AwAB9AHwBhQBEwP0
|
||||
AgAB9AcUARMC8gIUAfIFAAH0AhQG9AIUAfQBAAH0ARQL9AEUAfQDAAH0AQcCFAETBhQB8wH0AQAB9AcU
|
||||
ARMC8gIUAfQDAAP0Ae8BFAb0AhQB9AEAAfQBFAH0AxQF9AEUAfQBFAH0BAAE9AETBBQBbQH0AgAH9AFt
|
||||
BBQBbQH0AwAB9AG0AYoBtAHvBPQDFAHsAfQBAAH0ARQF9AUUAfQBFAH0BwAB/wH0ARMCFAHsAfQJAAH0
|
||||
AfMBbQIUAW0B8wH0AQAE9AG0AYoBtAT0AhQB7AH0Af8BAAH0ARQL9AEUAfQIAAH0AbwBFAHsAfQLAAb0
|
||||
AgAB9AaKAbQB7wMUAewB9AH/AgAB9A0UAfQJAAH0AewB9BQAAfQGigG0Ae8CFAHsAfQB/wMAAfQNFAH0
|
||||
CQAC9BUABPQBtAGKAbQF9AH/BAAP9CIAAfQBtAGKAbQB9AH/OgAE9AH/GQABQgFNAT4HAAE+AwABKAMA
|
||||
AUADAAEgAwABAQEAAQEGAAEBFgAD/wEAAv8GAAL/BgAB8AE/BgAB4AEfBgABwAEPBgABwAEHBgABwAED
|
||||
BgABwAEBBgABwAEBBgABwAEBBgAB4AEBBgAB8AEBBgAB+AEBBgAB/AEDBgAB/gEHBgAC/wYABP8B8AEA
|
||||
A/8BvwL/AfABAAL/AfMBHwL/AfABAAGAAQAB4AEfAv8B8AEAAYABAAHwAR8BwQEDAfABAAGAAQAB8AEP
|
||||
AcABAQHwAQABgAEAAfABBwGAAQEB8AEAAYABAAHgAQEBgAEBAfABAAGAAQAB4AEAAYABAQHAAQABgAEA
|
||||
AfABAQGAAQEBwAEAAYABAAH+AQMB/gEBAgABgAEAAf8BBwH/AQMBAAEBAYABAAH/AY8C/wEAAQMBgAEA
|
||||
Af8BnwL/AQABBwGAAQAE/wHAB/8BwQP/Cw==
|
||||
</value>
|
||||
</data>
|
||||
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
|
||||
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
AAABAAIAEBAQAAEABAAoAQAAJgAAABAQAAABAAgAaAUAAE4BAAAoAAAAEAAAACAAAAABAAQAAAAAAIAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAAgAAAAICAAIAAAACAAIAAgIAAAICAgADAwMAAAAD/AAD/
|
||||
AAAA//8A/wAAAP8A/wD//wAA////AAD///8AAAAAD493+PAAAAD4d3d3jwAAAP93/3f/AAAA9393938A
|
||||
AAD3f3f3fwAAAP93/3f///8A+Hd3d493+PAPj3f4d3d3jwD///93/3f/AAAA9393938AAAD3f3f3fwAA
|
||||
AP93/3f/AAAA+Hd3d48AAAAPj3f48AAAAAD///8AwP8AAIB/AAAAPwAAAD8AAAA/AAAAPwAAAAMAAAAB
|
||||
AACAAAAAwAAAAPwAAAD8AAAA/AAAAPwAAAD+AQAA/wMAACgAAAAQAAAAIAAAAAEACAAAAAAAAAEAAAAA
|
||||
AAAAAAAAAAEAAAABAAAAAAAAQkJCAE1NTQBYWFgAb29vAJqZmQCzs7MA1NTUAPHv8AD29vYA+vr6AAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAD///8AAAAKCQkJCQoAAAAAAAAAAAAJBwkEBAkHCQAAAAAAAAAKBwEEAgIEAQcK
|
||||
AAAAAAAACQkEBQgIBQQJCQAAAAAAAAkEAwgFBQgCBAkAAAAAAAAJBAMIBQUIAgQJAAAAAAAACQkEBQgI
|
||||
BQQJCQkJCQoAAAoHAQQCAgQBBgkEBAkHCQAACQcJBAQJBgEEAwMEAQcKAAAKCQkJCQkEBQgIBQQJCQAA
|
||||
AAAAAAkEAwgFBQgCBAkAAAAAAAAJBAMIBQUIAgQJAAAAAAAACQkEBQgIBQQJCQAAAAAAAAoHAQQCAgQB
|
||||
BwoAAAAAAAAACQcJBAQJBwkAAAAAAAAAAAAKCQkJCQoAAMD/AACAfwAAAD8AAAA/AAAAPwAAAD8AAAAD
|
||||
AAAAAQAAgAAAAMAAAAD8AAAA/AAAAPwAAAD8AAAA/gEAAP8DAAA=
|
||||
</value>
|
||||
</data>
|
||||
</root>
|
||||
21
app/DD_Clipboard_Searcher/frmTreeView.vb
Normal file
21
app/DD_Clipboard_Searcher/frmTreeView.vb
Normal file
@ -0,0 +1,21 @@
|
||||
Public Class frmTreeView
|
||||
Private Sub frmTreeView_Load(sender As Object, e As EventArgs) Handles Me.Load
|
||||
TreeView1.Nodes.Clear()
|
||||
TreeView1.ImageList = ImageList1
|
||||
If Not IsNothing(CurrMatchTreeView) Then
|
||||
CurrMatchTreeView.BeginUpdate()
|
||||
|
||||
|
||||
For Each node As TreeNode In CurrMatchTreeView.Nodes
|
||||
If IsNothing(node.Tag) Then
|
||||
node.ImageIndex = 0
|
||||
Else
|
||||
node.ImageIndex = 2
|
||||
End If
|
||||
TreeView1.Nodes.Add(node.Clone)
|
||||
Next
|
||||
CurrMatchTreeView.EndUpdate()
|
||||
End If
|
||||
TreeView1.ExpandAll()
|
||||
End Sub
|
||||
End Class
|
||||
@ -51,7 +51,6 @@ Module modCurrent
|
||||
Public DT_USER_PROFILES As DataTable
|
||||
Public DT_CONNECTIONS As MyDataset.TBDD_CONNECTIONDataTable
|
||||
|
||||
Public CLIPBOARD_TEXT As String
|
||||
Public CURRENT_MATCHING_PROFILES As New List(Of ClassProfileFilter.ProfileData)
|
||||
|
||||
Public CURRENT_CLIPBOARD_CONTENTS
|
||||
@ -65,10 +64,14 @@ Module modCurrent
|
||||
|
||||
Public CLIENT_SELECTED As Integer = 0
|
||||
Public CurrDT_PROFILE_MATCH As DataTable
|
||||
Public DTPROFILE_REL_PROCESS As DataTable
|
||||
Public DTPROFILE_REL_WINDOW As DataTable
|
||||
Public DTPROFILE_REL_CONTROL As DataTable
|
||||
|
||||
Public CURRENT_DT_DOC_SEARCHES As DataTable
|
||||
Public CURRENT_DT_DATA_SEARCHES As DataTable
|
||||
Public CurrSearchOpen As Boolean = False
|
||||
|
||||
Public CurrMatchTreeView As New TreeView
|
||||
|
||||
End Module
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user