ReSQL.ru
     
powered by simpleCommunicator - 2.0.59     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Переход по записям
7 сообщений из 7, страница 1 из 1
Переход по записям
    #32092302
multiwest
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
multiwest
Гость
Помогите разобратся: нужно чтобы при наборе в поле поиска происходил поиск в Datagrid по мере набора символов. написал прогу но выдает ошибку

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
nn = Len(Text1.Text)
DataGrid1.SetFocus
Adodc1.Recordset.MoveFirst
poisk = UCase(LTrim(RTrim(Text1)))
usl =  "Mid(tovar,1 ," & nn &  ")='" & poisk & "'" 
'Adodc1.Recordset.Find usl
Adodc1.Recordset.Find usl
If Adodc1.Recordset.BOF Or Adodc1.Recordset.EOF Then

'MsgBox ( "Òîâàð  "  & poisk &  "  íå íàéäåí   " )
Text1.SetFocus
Else
End If


ошибку выдает в строке Adodc1.Recordset.Find usl

что я неправильно сделал?
...
Рейтинг: 0 / 0
17.01.2003, 10:07
| Ответить | Цитировать | Написать  
Переход по записям
    #32092309
SCS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
SCS
Гость
у тебя строка для поиска получилась, что то типа
Mid(TTT, 1,5)='FGFG'
а должно быть что то похожее (используй wildchar * для поиска по шаблону) на
имяполя='FGFG*'
...
Рейтинг: 0 / 0
17.01.2003, 10:15
| Ответить | Цитировать | Написать  
Переход по записям
    #32092310
SCS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
SCS
Гость
Упс
имяполя LIKE 'FGFG*'
...
Рейтинг: 0 / 0
17.01.2003, 10:17
| Ответить | Цитировать | Написать  
Переход по записям
    #32092314
Маveric
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Маveric
Участник
По моему нельзя функцию Mid использовать в условии поиска. Её адошный провайдер не понимает.
...
Рейтинг: 0 / 0
17.01.2003, 10:20
| Ответить | Цитировать | Написать  
Переход по записям
    #32092335
multiwest
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
multiwest
Гость
Код: plaintext
usl =  "tovar=like'" & poisk & "'*"

Выдает туже ошибку
...
Рейтинг: 0 / 0
17.01.2003, 10:52
| Ответить | Цитировать | Написать  
Переход по записям
    #32092419
SCS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
SCS
Гость
Код: plaintext
usl =  "tovar like '" & poisk & "*'"
...
Рейтинг: 0 / 0
17.01.2003, 12:15
| Ответить | Цитировать | Написать  
Переход по записям
    #32092456
multiwest
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
multiwest
Гость
SCS
Благодарю.
...
Рейтинг: 0 / 0
17.01.2003, 12:53
| Ответить | Цитировать | Написать  
7 сообщений из 7, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Переход по записям
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]