ZeidHaddad
Registered User.
- Local time
- Today, 14:34
- Joined
- Oct 29, 2019
- Messages
- 44
Hello everyone!
So I’m trying to use the following code to search in a split form
Dim strsearch As String
Dim Task As String
'Check if a keyword entered or not
If IsNull(Me.txtsearch) Or Me.txtsearch = "" Then
MsgBox "Please type in your search keyword.", vbOKOnly, "Keyword Needed"
Me.txtsearch.BackColor = vbYellow
Me.txtsearch.SetFocus
Else
strsearch = Me.txtsearch.Value
Task = "SELECT * FROM Dokumentation WHERE ((Vertragsnummer Like ""*" & strsearch & "*""))"
Me.RecordSource = Task
Me.txtsearch.BackColor = vbWhite
End If
But its not working and i think the mistake is from “me.recordsource = Task”
So I’m trying to use the following code to search in a split form
Dim strsearch As String
Dim Task As String
'Check if a keyword entered or not
If IsNull(Me.txtsearch) Or Me.txtsearch = "" Then
MsgBox "Please type in your search keyword.", vbOKOnly, "Keyword Needed"
Me.txtsearch.BackColor = vbYellow
Me.txtsearch.SetFocus
Else
strsearch = Me.txtsearch.Value
Task = "SELECT * FROM Dokumentation WHERE ((Vertragsnummer Like ""*" & strsearch & "*""))"
Me.RecordSource = Task
Me.txtsearch.BackColor = vbWhite
End If
But its not working and i think the mistake is from “me.recordsource = Task”