MS IDB Anbindung RightClick und Events

GUIs.ZooFlow/frmAdmin.vb

@@ -53,7 +53,7 @@ Partial Public Class frmAdmin
         FlowForm.Show()
 
         ' === Load Data ===
-        RefreshData()
+        CW_RefreshData()
     End Sub
 
     Private Sub frmAdmin_Shown(sender As Object, e As EventArgs) Handles Me.Shown
@@ -85,7 +85,7 @@ Partial Public Class frmAdmin
     End Sub
 
     Private Sub TimerRefreshData_Tick(sender As Object, e As EventArgs)
-        RefreshData()
+        CW_RefreshData()
     End Sub
 
     Private Async Sub FlowForm_ClipboardChanged(sender As Object, e As IDataObject) Handles FlowForm.ClipboardChanged
@@ -175,14 +175,14 @@ Partial Public Class frmAdmin
         End If
     End Sub
 
-    Public Sub RefreshData()
+    Public Sub CW_RefreshData()
         Try
             Dim oUserId As Integer = My.Application.User.UserId
             Dim oSql As String = My.Queries.ClipboardWatcher.VWCW_USER_PROFILE(oUserId)
             My.Application.ClipboardWatcher.UserProfiles = My.Database.GetDatatable(oSql)
 
             If My.Application.ClipboardWatcher.UserProfiles.Rows.Count = 0 Then
-                MsgBox("No profiles configured for this user so far!", MsgBoxStyle.Exclamation)
+                Logger.Debug("CW_RefreshData - No profiles configured for this user so far!")
             Else
                 oSql = My.Queries.ClipboardWatcher.TBCW_PROFILE_PROCESS(oUserId)
                 My.Application.ClipboardWatcher.ProfileProcesses = My.Database.GetDatatable(oSql)