Я попробовал этот код, прежде чем скопировать его в мой основной проект (я создал новый проект, чтобы проверить коды первыми):Выражение содержит неверную дату постоянного
Private Sub posBtn_Click(sender As Object, e As EventArgs) Handles posBtn.Click
On Error GoTo wewe
If posText.Text = "" Then
Call notFound()
Exit Sub
Else
Dim cantFind As String = posText.Text
EmployeesRecordBindingSource.Filter = "(Convert(#_of_Employees, 'System.String') LIKE '" & posText.Text & "')" & "OR (last_name LIKE '" & posText.Text & "') OR (first_name LIKE '" & posText.Text & "')" & "OR (mi LIKE '" & posText.Text & "') OR (position LIKE '" & posText.Text & "')"
If EmployeesRecordBindingSource.Count <> 0 Then
With DataGridView2
.DataSource = EmployeesRecordBindingSource
End With
Else
MsgBox(cantFind & vbNewLine & "The search item was not found!", MsgBoxStyle.Information, "Hey boss")
EmployeesRecordBindingSource.Filter = Nothing
With DataGridView2
.ClearSelection()
.DataSource = EmployeesRecordBindingSource
End With
End If
End If
lul:
Exit Sub
wewe:
MsgBox("Error Number " & Err.Number & vbNewLine & "Error Description " & Err.Description, MsgBoxStyle.Critical, "Reset Error!")
Resume lul
End Sub
В моем примере проекте, это работает. Но когда я скопировал его в свой основной проект и запустил, я получил эту ошибку: The expression contains invalid date constant '#_ofE_Employees, 'Sytem.String') LIKE '1')OR
и так далее ... Я что-то пропустил? Btw, это для поиска в datagridview. У меня также есть частная подсистема для сброса, notfound.
Попробуйте '&" ИЛИ 'вместо' & 'ИЛИ'. –
Хорошо, я попробую :) – wwwMarvsdotcom
У меня такая же ошибка :( – wwwMarvsdotcom