Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / подскажите с ADODB.Recordset-м / 5 сообщений из 5, страница 1 из 1
24.09.2008, 07:07
    #35555736
Железнодорожник
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
подскажите с ADODB.Recordset-м
привет форумчане, пишу в VBA
если использовать оператор LIKE в SQL запросе, то результать запроса 0. что не так ???
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset
Dim SQL As String
Set cn = New ADODB.Connection
Set rs = New ADODB.Recordset
If txtStreet.Text <> "" Then
SQL = "Select Field1, ID from table Where (Field1 LIKE '*" & Trim(txtStreet.Text) & "*')"
Else
SQL = "Select Field1, ID from table"
End If
cn.Open ("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\my.mdb;Persist Security Info=False")
rs.Open SQL, cn, adOpenStatic, adLockOptimistic
If rs.RecordCount <=  0  Then Exit Sub
а если txtStreet.Text="" вытаскивается все записи как положено :-) где что не так ? За ранее благодарен !!!
...
Рейтинг: 0 / 0
24.09.2008, 08:07
    #35555774
Железнодорожник
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
подскажите с ADODB.Recordset-м
вопрос снят, разобрался,
Код: plaintext
SQL = "Select НАИМЕНОВАН, ID from STREETS Where (НАИМЕНОВАН LIKE '%" & Trim(txtStreet.Text) & "%')"
теперь вопрос дургой: есть компонент Listbox, туда item-ы добавляю, могу ли добавить туда и ещё дополнительные параметры, ну скажем добавляем запись "Record1" и его ID=1, вот ID куда можно запихать ? В tag ?
...
Рейтинг: 0 / 0
24.09.2008, 08:29
    #35555799
HandKot
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
подскажите с ADODB.Recordset-м
пердлагаю сделать еще один столбец и в нем хронить. Ширину столбца сделать 0

I Have Nine Lives You Have One Only
THINK!
...
Рейтинг: 0 / 0
24.09.2008, 08:38
    #35555804
Железнодорожник
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
подскажите с ADODB.Recordset-м
HandKotпердлагаю сделать еще один столбец и в нем хронить. Ширину столбца сделать 0

I Have Nine Lives You Have One Only
THINK!
ну у меня интерфейс проги очень маленькая (поиск)
мне желательно добавить в Tag
как можно в добавляемый item записать в его tag значение...?
...
Рейтинг: 0 / 0
24.09.2008, 11:19
    #35556177
AndrF
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
подскажите с ADODB.Recordset-м
Железнодорожниквопрос снят, разобрался,
Код: plaintext
SQL = "Select НАИМЕНОВАН, ID from STREETS Where (НАИМЕНОВАН LIKE '%" & Trim(txtStreet.Text) & "%')"
теперь вопрос дургой: есть компонент Listbox, туда item-ы добавляю, могу ли добавить туда и ещё дополнительные параметры, ну скажем добавляем запись "Record1" и его ID=1, вот ID куда можно запихать ? В tag ?

В ItemData .
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / подскажите с ADODB.Recordset-м / 5 сообщений из 5, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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