Access Run-Time Ошибка 3075 - PullRequest
Новая
       12

Access Run-Time Ошибка 3075

0 голосов
/ 26 апреля 2018

У меня проблемы с запуском следующего отчета. Я продолжаю получать ошибку времени выполнения 3075. ReportText - это текстовое поле в форме. Кажется, ошибка в поле reportsearch.

Private Sub Command284_Click ()

Dim reportsearch As String Dim reportText As String

If IsNull (Me.txtReport.Value) Тогда MsgBox "Это поле должно содержать ключевое слово" Me.txtReport.SetFocus

Else reportText = Me.txtReport.Value

reportsearch = "SELECT * FROM NCECBVI WHERE ([Фамилия] LIKE" "" & reportText & "" "ИЛИ ([Имя] LIKE" "" & reportText & " "")) "

DoCmd.OpenReport "NCECBVI-Report", acPreview,, reportsearch

End If

End Sub

1 Ответ

0 голосов
/ 09 июня 2018

Параметр WhereCondition команды OpenReport должен просто содержать само условие без другого синтаксиса вокруг него. Измените ваше reportsearch назначение на: 

reportsearch = "[Last Name] LIKE """ & reportText & """ OR [First Name] LIKE """ & reportText & """"

Кроме того, вы используете LIKE в условии, но у вас нет подстановочных знаков. Либо измените LIKE на =, либо используйте символы подстановки, чтобы получить совпадения, содержащие введенную строку: 

reportsearch = "[Last Name] LIKE ""*" & reportText & "*"" OR [First Name] LIKE ""*" & reportText & "*"""
...