Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Использование LIKE в BVA / 6 сообщений из 6, страница 1 из 1
25.11.2004, 14:06:59
    #32799655
С.е.р.г.
С.е.р.г.
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Использование LIKE в BVA
Какой-то глюк.... Вот упрощенный пример:
Надо из таблицы взять все записи, где поле Filed1 начинается с test.
Имеем в Acceess'е таблицу Tab1 с тремя записями
id____Field1
1____test
2____testa
3____ttttt
Имеем код в VBA:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
 Dim MyTb As New ADODB.Recordset
 Set MyTb = New ADODB.Recordset
  With MyTb
  .CursorType = adOpenStatic
  .LockType = adLockOptimistic
  .Open "SELECT * FROM Tab1 WHERE Field1 LIKE 'test*'", CurrentProject.Connection
 End With
 MsgBox (MyTb.RecordCount)
 MyTb.Close
По идее мы должны получить MyTb:
id____Field1
1____test
2____testa
Однако число записей в полученом запросе MyTb равно 0.
В Access'e через конструкотр запросов в режиме SQL вставляю строку "SELECT * FROM Tab1 WHERE Field1 LIKE 'test*'" - все работает:
id____Field1
1____test
2____testa
В чем загвоздка при создании запроса через VBA? (WinXP<SP2>+OfficeXP<SP2>)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
25.11.2004, 14:10:25
    #32799664
Shuhard
Shuhard
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Использование LIKE в BVA
автор
Dim MyTb As New ADODB.Recordset
Set MyTb = New ADODB.Recordset

2 раза New - так надо ?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
25.11.2004, 14:17:16
    #32799682
С.е.р.г.
С.е.р.г.
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Использование LIKE в BVA
Нет, ошибся:). Но сути вопроса это не меняет.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
25.11.2004, 14:19:33
    #32799690
Victosha
Victosha
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Использование LIKE в BVA
в данном случае -

Код: plaintext
LIKE 'test%'"

(с выражением лица)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
25.11.2004, 14:25:20
    #32799706
С.е.р.г.
С.е.р.г.
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Использование LIKE в BVA
Вах, спасибо! Целый день мучался...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
25.11.2004, 14:36:09
    #32799747
Раз (1)
Раз (1)
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Использование LIKE в BVA
<off>
С.е.р.г.
MyTb

Прикольное название, если по-русски читать :)
</off>
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Использование LIKE в BVA / 6 сообщений из 6, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 294ms
Закрыть
start [/forum/topic.php?fid=45&tablet=1&tid=1670135]:
 0ms
get settings:
 5ms
get forum list:
 11ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 46ms
get topic data:
 8ms
get forum data:
 2ms
get page messages:
 29ms
get tp. blocked users:
 1ms
others: 188ms
total:  294ms
x
x
Закрыть


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