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

Commit Merge

Browse Source
This commit is contained in:
Digital Data - Marlon Schreiber
2019-07-08 12:11:03 +02:00
parent 16e37caeb5 46a0255b68
commit 77013c3c30
21 changed files with 282 additions and 153 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
app/DD_Clipboard_Searcher/frmMain.vb
View File

@@ -40,7 +40,7 @@ Public Class frmMain
'End With
Dim found As Boolean = False
CLIPBOARD_TEXT = Clipboard.GetText
If LogErrorsOnly = False Then clsLogger.Add(String.Format(" >>{0} - Clipboard-Watcher fired for process '{1}'", Now.ToString, PROC_Name), False)
Logger.Debug(String.Format(" >>{0} - Clipboard-Watcher fired for process '{1}'", Now.ToString, PROC_Name), False)
For Each row As DataRow In DT_USER_PROFILES.Rows
If found = True Then Exit For
@@ -59,16 +59,16 @@ Public Class frmMain
End If
'Else
' NotifyIconMain.ShowBalloonTip(20000, "Clipboard Watcher", String.Format("Clipboard Watcher fired but Clipboardcontent is equal: '{0}'", CURR_MATCH_RESULT), ToolTipIcon.Info)
' If LogErrorsOnly = False Then clsLogger.Add(String.Format(" >> {0} - Equal Clipboard-result '{1}'", Now.ToString, CURR_MATCH_RESULT), False)
' Logger.Debug(String.Format(" >> {0} - Equal Clipboard-result '{1}'", Now.ToString, CURR_MATCH_RESULT), False)
' Exit For
'End If
Else
If LogErrorsOnly = False Then clsLogger.Add(String.Format(" >> {0} - No regex-match for cliboardtext '{1}'", Now.ToString, match.Groups(0).Value), False)
Logger.Debug(String.Format(" >> {0} - No regex-match for cliboardtext '{1}'", Now.ToString, match.Groups(0).Value), False)
End If
End If
Next
If found = False Then
If LogErrorsOnly = False Then clsLogger.Add(String.Format(" >> {0} - Process '{1}' not configured!", Now.ToString, PROC_Name), False)
Logger.Debug(String.Format(" >> {0} - Process '{1}' not configured!", Now.ToString, PROC_Name), False)
End If
End Sub
@@ -97,7 +97,7 @@ Public Class frmMain
End Sub
Private Sub frmMain_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing
clsLogger.Add(">> Logout time: " & Now.ToString, False)
Logger.Info(">> Logout time: " & Now.ToString, False)
If ERROR_INIT = "INVALID USER" Or ERROR_INIT = "NO CLIENT" Then
Exit Sub
End If
@@ -132,7 +132,7 @@ Public Class frmMain
End Try
If clsLogger.LOGG_MSG <> String.Empty Then
clsLogger.Add(clsLogger.LOGG_MSG, False)
Logger.Info(clsLogger.LOGG_MSG, False)
End If
End Sub