powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / findnext в recordset
7 сообщений из 7, страница 1 из 1
findnext в recordset
    #33683207
ba4inskii
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Data_xls.Recordset.FindNext UCase(Data_xls.Recordset.Fields(DBGrid_xls.Col).Name & " like '*" & Text_find.Text & "*'")
ищет значение нормально, только как сделать что бы он найдя последнее значение не останавливался, а начинал заного?
...
Рейтинг: 0 / 0
findnext в recordset
    #33683363
ba4inskii
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ну чего никто не знает????

ХЕЛП!!!!!!
...
Рейтинг: 0 / 0
findnext в recordset
    #33683378
Nikz
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
я наверное фигню сейчас говорю,
но может попробовать поиграться с
Код: plaintext
Data_xls.Recordset.MoveFirst
...
Рейтинг: 0 / 0
findnext в recordset
    #33683387
ba4inskii
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Nikzя наверное фигню сейчас говорю,
но может попробовать поиграться с
Код: plaintext
Data_xls.Recordset.MoveFirst

каким местом? пробовал фигня получаеться
...
Рейтинг: 0 / 0
findnext в recordset
    #33683400
Фотография buser
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Задайте это условие как фильтр... если я Вас пр-но понял...
...
Рейтинг: 0 / 0
findnext в recordset
    #33683457
ba4inskii
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
buserЗадайте это условие как фильтр... если я Вас пр-но понял...
вот именно что фильтр мне не нужен!
т.е. есть рекордсет на основе которого таблица, и что бы юзер не искал то что ему нужно из 200 записей нужен поиск, а сам рекордсет и так построен уже как фильтр из табл из 200 тыс записей
...
Рейтинг: 0 / 0
findnext в recordset
    #33683477
ba4inskii
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ВСЕ Нашел!!!
Вот может кому понадобиться

Private Sub cmd_find_Click()
1 Data_xls.Recordset.FindNext UCase(Data_xls.Recordset.Fields(DBGrid_xls.Col).Name & " like '*" & Text_find.Text & "*'")
If Data_xls.Recordset.NoMatch Then
Data_xls.Recordset.MoveFirst
GoTo 1
End If
End Sub

Data_xls.Recordset.Fields(DBGrid_xls.Col).Name определяет имя столбца где искать
...
Рейтинг: 0 / 0
7 сообщений из 7, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / findnext в recordset
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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