ник: Анатолий (Киев)
Что не получается?
Покажите, что у вас получается в .RecordSource. ИМХО, неправильное условие (лишние кавычки). Надо: s = "Where [гос_номер] Like '*" & s & "*'"
А почему просто не применить фильтр?
With Me.p_avto1.Form
If Len(s) <> 0 Then
.Filter = "[гос_номер] Like '*" & s & "*'"
.FilterOn = True
Else
.FilterOn = False
End If
End With
|
ЗЫ. .Requery в вашем примере - лишнее.