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

NewDocSearch

Browse Source
This commit is contained in:
Digital Data - Marlon Schreiber
2019-07-10 15:30:32 +02:00
parent 695525c13b
commit add17d703b
71 changed files with 23244 additions and 111 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
app/DD_Clipboard_Searcher/clsHotkey.vb
View File

@@ -74,7 +74,7 @@ Public Class clsHotkey
End Class
Public Shared Sub Refresh_Profile_Links()
Try
Dim sql = String.Format("SELECT T.*, T2.PROC_NAME FROM TBCW_PROFILES T, TBCW_USER_PROFILE T1, TBCW_PROFILE_PROCESS T2 WHERE T.GUID = T1.PROFILE_ID AND T.GUID = T2.PROFILE_ID AND T1.USER_ID = {0} AND T.ACTIVE = 1", USER_ID)
Dim sql = String.Format("SELECT * FROM VWCW_USER_PROFILE WHERE USER_ID = {0}", USER_ID)
DT_USER_PROFILES = clsDatabase.Return_Datatable(sql)
If DT_USER_PROFILES.Rows.Count = 0 Then
MsgBox("No profiles configured for this user so far!", MsgBoxStyle.Exclamation)