ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / VBA работает в AccessXP, а в Access97 нет!!! В чем причина?
6 сообщений из 6, страница 1 из 1
VBA работает в AccessXP, а в Access97 нет!!! В чем причина?
    #32843998
Orlic
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Orlic
Гость
привет. Горю, срочно, не знаю, что делать....
Код
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
Private Sub Form_Load()
Dim rst As New ADODB.Recordset

ЗДЕСЬ НАХОДИТ КОСЯК:  
        rst.Open "Select * from tbl_check", CurrentProject.Connection, adOpenKeyset, adLockOptimistic

        
        rst.Find "id = 'last'"
        time1 = rst![qwe]

    rst.Close
    Set rst = Nothing

работает в XP, а при конвертировании БД в формат 97 - отказывается, говорит, Ошибка выполнения 424 - Требуется объект....!!!!


Что делать, как изменить код не меняя его функций???
...
Рейтинг: 0 / 0
24.12.2004, 15:01:41
| Ответить | Цитировать | Написать  
VBA работает в AccessXP, а в Access97 нет!!! В чем причина?
    #32844004
Фотография Lelikk
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Lelikk
Участник
А библиотека ADO подключена?

________________________________________________________
Глюк - это высокоорганизованная система не поддающихся определению частиц
...
Рейтинг: 0 / 0
24.12.2004, 15:05:08
| Ответить | Цитировать | Написать  
VBA работает в AccessXP, а в Access97 нет!!! В чем причина?
    #32844008
Lenivec
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Lenivec
Участник
CurrentProject.Connection - нету такого в 97
создавай коннекшин вручную
...
Рейтинг: 0 / 0
24.12.2004, 15:07:31
| Ответить | Цитировать | Написать  
VBA работает в AccessXP, а в Access97 нет!!! В чем причина?
    #32844013
ЛП
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ЛП
Участник
тенденция однако...
раньше в ADP-проекте пытались найти CurrentDB, теперь в 97-ом аксесе пытаются найти CurrentProject

2 Orlic
Либо используй DAO (и CurrentDB), либо самостоятельно открывай ADODB.Connection (не обращаясь к несуществующему CurrentProject)
...
Рейтинг: 0 / 0
24.12.2004, 15:08:42
| Ответить | Цитировать | Написать  
VBA работает в AccessXP, а в Access97 нет!!! В чем причина?
    #32844023
Orlic
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Orlic
Гость
ЛПтенденция однако...
раньше в ADP-проекте пытались найти CurrentDB, теперь в 97-ом аксесе пытаются найти CurrentProject

2 Orlic
Либо используй DAO (и CurrentDB), либо самостоятельно открывай ADODB.Connection (не обращаясь к несуществующему CurrentProject)

раньше ни с тем, ни с другим не работал, но знаю, что DAO более старое (-ый, -ая?;-), чем ADO.

все, справился, спасибо. Сделал так:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
Dim rst As DAO.Recordset

Set rst = CurrentDb.OpenRecordset("Select * from tbl_check")

rst.FindLast "id = 'last'"

time1 = rst![qwe]
    
    rst.Close
    Set rst = Nothing

спасибо, буду иметь в виду
...
Рейтинг: 0 / 0
24.12.2004, 15:12:42
| Ответить | Цитировать | Написать  
VBA работает в AccessXP, а в Access97 нет!!! В чем причина?
    #32844297
Proga
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Proga
Участник
MDB надо 2000 и выше использовать, тогда и Cur... Project работать будет.
...
Рейтинг: 0 / 0
24.12.2004, 17:07:25
| Ответить | Цитировать | Написать  
6 сообщений из 6, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / VBA работает в AccessXP, а в Access97 нет!!! В чем причина?
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=45&msg=32844008&tid=1669546]:
 0ms
get settings:
 11ms
get forum list:
 14ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 50ms
get topic data:
 8ms
get forum data:
 3ms
get page messages:
 37ms
get tp. blocked users:
 1ms
others: 231ms
total:  359ms
созд. / загр.: 359ms
x
x
Закрыть


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