powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Проблемы с FIND в ADO
3 сообщений из 3, страница 1 из 1
Проблемы с FIND в ADO
    #32521302
cr
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
cr
Гость
Не осуществляется поиск с помощью создания рекордсета и метода FIND, выводится сообщение, что переменная не найдена. В рекордесете делается сложная выборка вида "select tabel.f,tabel.i,tabel.o, pasp.seria from pasp, tabel where tabel.num=pasp.num", было бы логично писать в FIND название таблицы и название столбца, но этот метод так не работает (по крайней мере у меня).
FIND реализован так:

Private Sub Find_Click
rs1.MoveFirst
rs1.Find "f='" + Text15.Text + "'"
Do While Not rs1.EOF
MsgBox "Название не найдено"
rs1.Find "f='" + Text15.Text + "'", 1, adSearchForward
Loop
End Sub

Вопрос такой - м.б. кто-нибудь знает, как работать с FIND и сложной выборкой, или лучше сделать другой рекордсет на основании значения Text15, если с FIND нет возможности так работать??
...
Рейтинг: 0 / 0
Проблемы с FIND в ADO
    #32521409
Фотография # Darth Vader #
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А какая разница? Ты ищешь запись с нужным значением. В методе Файнд АДО указываешь поле и значение. Как только запись нашел , дергаешь из нее значение нужного поля .Файнд работает быстро,так что думаю волнуешься ты зря.

А я обычно так ищу ( в текстовом поле )

tmpRs.MoveFirst

tmpRs.Find "field='" & nValue & "'"

If tmpRs.EOF = True Then

Else

msgbox "Ура!"
msgbox tmpRs("НужноеИмяПоля")

End If

tmpRs.MoveFirst
...
Рейтинг: 0 / 0
Проблемы с FIND в ADO
    #32521443
cr
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
cr
Гость
Спасибо!!! Заработало!!!
...
Рейтинг: 0 / 0
3 сообщений из 3, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Проблемы с FIND в ADO
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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