VBNet - Форум - Сложный вопрос по базам

Вопрос: Сложный вопрос по базам Добавлено: 28.06.02 21:23

Автор вопроса: Юрий

Уважаемые cпецы по VB5 и базам данных!
Помогите решить такую проблему. Программа пишется на VB5
к ней подцепляется база данных на Access-97 (mdb).
В программе есть две (DBGrid) таблицы, каждая из которых
связана с таблицей из базы и текстовое окно в которое вводится значение.
Я сделал, что когда в окне пишется значение оно выбирается и ищется
сразу в двух этих таблицах. А хочу сделать, чтобы было как
в Excel(автоматическая допись), пишу
первые буквы в окно и по ним ищется в таблицах значение,
которое потом скидывается в это же окно.
Private Sub Text1_Change(Index As Integer)
Select Case Index
Case 1
'поиск в первой таблице J
S = "select * from j "
S = S & "where ucase$(left$(jl, 254)) like"
S = S & Chr(34) & "*" & Text1(1).Text & "*" & Chr(34)
DJ.RecordSource = S
On Error Resume Next
DJ.Refresh
'поиск во второй таблице L
S = "select * from L "
S = S & "where ucase$(left$(LO, 254)) like"
S = S & Chr(34) & "*" & Text1(1).Text & "*" & Chr(34)
OL.RecordSource = S
On Error Resume Next
OL.Refresh
End Select
End Sub
Всем спасибо.
Юрий.
karit@inbox.ru

Ответить

Ответы Всего ответов: 3

Номер ответа: 1
Автор ответа:

Slay

Вопросов: 27
Ответов: 150

Web-сайт: www.slaysoft.stormway.ru
Профиль | | #1

Добавлено: 29.06.02 10:19

не очень понял что тебе нужно.... у тебя и так вроде должно получиться... два запроса на выборку даных.... в чем проблема???

по подробней напиши...

Ответить

Номер ответа: 2
Автор ответа:

Slay

Вопросов: 27
Ответов: 150

Web-сайт: www.slaysoft.stormway.ru
Профиль | | #2

Добавлено: 29.06.02 11:46

S = S & "where ucase$(left$(LO, 254)) like"

не понял этой сторки... не ужели у тебя в такой постановке выполняются ucase и left? И что содержит LO и jl.... после Where должно идти название фиелда вот в таком виде:

SELECT *
FROM Таблица1
WHERE Таблица1.Поле1 Like "*";

Ответить

Номер ответа: 3
Автор ответа:

Slay

Вопросов: 27
Ответов: 150

Web-сайт: www.slaysoft.stormway.ru
Профиль | | #3

Добавлено: 01.07.02 10:51

А... наконецто до меня дошло что тебе нужно...

автоподстановка значения в текбокс из базы...

я тут нарисовал примерчик (только не запросами а финдом)

если нужно солью....

Ответить

Страница: 1 |