MS Global Search

This commit is contained in:
2024-01-24 08:10:06 +01:00
parent 3212c3e077
commit 80deb257b7
3 changed files with 85 additions and 88 deletions

View File

@@ -98,10 +98,7 @@ Public Class frmGlobalSearch
End If
Dim sqlft = SQL_FULLTEXT
sqlft = sqlft.Replace("@FULLTEXT", oFTSearchtext)
'Dim selDoc = String.Format("SELECT T.[DocID],T.[FULL_FILENAME],T.[Filename],T.[DISPLAY_NAME],T.[Doctype],T.[Creation_DateTime] As CreatedWhen,T.[Change_DateTime] as ChangedWhen,T.[IN_WORK] as [InWork?] " &
' "FROM VWPMO_DOC_SEARCH T INNER JOIN ( " & vbNewLine &
' "{0}) Y ON T.DocID = Y.dwDocID " & vbNewLine &
' "INNER JOIN VWPMO_WD_OBJECT_RIGHTS TRIGHT ON T.DocID = TRIGHT.dwObjectID WHERE TRIGHT.dwUserOrGroupID = {1}", sqlft, USERID_FK_INT_ECM)
sel_FT = sqlft
End Sub