edv/SDL
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

CBAM

Browse Source
This commit is contained in:
Andreas Luxbauer
2024-02-26 12:42:52 +01:00
parent 6e023041f9
commit 39dd8a0501
36 changed files with 11903 additions and 629 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
VERAG_PROG_ALLGEMEIN/Benutzerdefinierte Steuerelemente/MySearchBox.vb
View File

@@ -265,7 +265,7 @@ Public Class MySearchBox
If srch <> "" And SQL_WhereParamList.Count > 0 Then 'erster Suchparameter
SQLstr &= " AND ( 1<>1 "
For Each s In SQL_WhereParamList
SQLstr &= " OR " & s & " LIKE '" & srch & "%' "
SQLstr &= " OR " & s & " LIKE '" & srch.Replace("*", "%") & "%' "
Next
SQLstr &= " ) "
End If
@@ -273,7 +273,7 @@ Public Class MySearchBox
If srch2 <> "" And SQL_WhereParamList.Count > 0 Then 'Wenn zweiter Suchparameter
SQLstr &= " AND ( 1<>1 "
For Each s In SQL_WhereParamList
SQLstr &= " OR " & s & " LIKE '" & srch2 & "%' "
SQLstr &= " OR " & s & " LIKE '" & srch2.Replace("*", "%") & "%' "
Next
SQLstr &= " ) "
End If