ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Recordset в ADP
16 сообщений из 16, страница 1 из 1
Recordset в ADP
    #32621658
S. Fedorenko
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
S. Fedorenko
Участник
Помогите, пожалуйста.
Есть таблица "Select"

в MDB у меня есть такой код:

Код: plaintext
1.
2.
3.
Dim rcd As DAO.Recordset
Set rcd = db.OpenRecordset("Select", dbOpenTable)

rcd.RecordCount

теперь переписываю всё на ADP и первая строка выдает ошибку.

Я в ADP новичок.

Подскажите, чем заменить.
...
Рейтинг: 0 / 0
26.07.2004, 16:40:46
| Ответить | Цитировать | Написать  
Recordset в ADP
    #32621662
S. Fedorenko
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
S. Fedorenko
Участник
Ошибку выдает эта строка:

Код: plaintext
1.
Set rcd = db.OpenRecordset("Select", dbOpenTable)

У меня Access 2000, MS SQL Server 2000 ent ed.
...
Рейтинг: 0 / 0
26.07.2004, 16:42:12
| Ответить | Цитировать | Написать  
Recordset в ADP
    #32621674
Фотография TatianaT
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
TatianaT
Участник
а как обьявлена db, как DAO.Database или просто Database
...
Рейтинг: 0 / 0
26.07.2004, 16:45:48
| Ответить | Цитировать | Написать  
Recordset в ADP
    #32621677
Proga
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Proga
Участник
Переходи на Access 2002 он правильней.
Код: plaintext
1.
2.
3.
4.
strSum = "SELECT balance.* From balance WHERE (balance.level_balance=" & i & ") and ((balance.type_balance)=1);"
    Set MyRst = New ADODB.Recordset
    MyRst.Open strSum, strcon, adOpenDynamic, adLockOptimistic, adCmdText
    While Not MyRst.EOF
например
...
Рейтинг: 0 / 0
26.07.2004, 16:46:38
| Ответить | Цитировать | Написать  
Recordset в ADP
    #32621681
S. Fedorenko
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
S. Fedorenko
Участник
TatianaTа как обьявлена db, как DAO.Database или просто Database

Код: plaintext
Dim db As DAO.Database
...
Рейтинг: 0 / 0
26.07.2004, 16:48:45
| Ответить | Цитировать | Написать  
Recordset в ADP
    #32621687
Фотография TatianaT
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
TatianaT
Участник
а какая ошибка?
...
Рейтинг: 0 / 0
26.07.2004, 16:50:11
| Ответить | Цитировать | Написать  
Recordset в ADP
    #32621702
S. Fedorenko
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
S. Fedorenko
Участник
все понял.
ему не нравилось название таблицы "SELECT"

но, я переименовал таблицу и, на всякий случай, переделал так:

Код: plaintext
1.
2.
Dim rcd As Recordset
        Set rcd = New ADODB.Recordset
    rcd.Open "SelectMain", CurrentProject.Connection

Усё нормально вреде
...
Рейтинг: 0 / 0
26.07.2004, 16:54:42
| Ответить | Цитировать | Написать  
Recordset в ADP
    #32621703
zz
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
zz
Участник
автортеперь переписываю всё на ADP и первая строка выдает ошибку.

Не подключена библиотека DAO.
...
Рейтинг: 0 / 0
26.07.2004, 16:55:27
| Ответить | Цитировать | Написать  
Recordset в ADP
    #32621716
Фотография Latuk
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Latuk
Участник
>rcd.RecordCount
Ежели собрался посчитать кол-во записей
то RecordCount у ADO рекордсете не заполненно пока last не сделаеш
А если только кло-во и нужно то следует посчитать его запросом
а на клиенте получить только готовый результат.
...
Рейтинг: 0 / 0
26.07.2004, 17:01:42
| Ответить | Цитировать | Написать  
Recordset в ADP
    #32621728
Hummer
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Hummer
Участник
2 Latuk
Да ладно?:) Про MoveLast-то:)
...
Рейтинг: 0 / 0
26.07.2004, 17:05:14
| Ответить | Цитировать | Написать  
Recordset в ADP
    #32621744
Фотография TatianaT
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
TatianaT
Участник
это в дао нужно было обязательно туда-сюда сбегать
...
Рейтинг: 0 / 0
26.07.2004, 17:13:05
| Ответить | Цитировать | Написать  
Recordset в ADP
    #32621757
stag
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
stag
Участник
to TatianaT
ничего подобного.
...
Рейтинг: 0 / 0
26.07.2004, 17:18:11
| Ответить | Цитировать | Написать  
Recordset в ADP
    #32621790
Фотография Latuk
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Latuk
Участник
Давно уже рекордсеты нигде кроме формы заполнять не юзал
но точно помню где-то эта трабла была что приходилось MoveLast делать
(здесь помню,здесь не помню )
...
Рейтинг: 0 / 0
26.07.2004, 17:32:46
| Ответить | Цитировать | Написать  
Recordset в ADP
    #32621792
S. Fedorenko
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
S. Fedorenko
Участник
Про туда-сюда я знаю
Мне нужно знать ести ли там записи вообще, и если есть то Recordcount вернет мне >0 в любом случае. Поэтому туда-сюда мне нафиг тут не нужен. Всё равно спасибо.
...
Рейтинг: 0 / 0
26.07.2004, 17:33:06
| Ответить | Цитировать | Написать  
Recordset в ADP
    #32621797
Hummer
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Hummer
Участник
Для этого есть EOF.
...
Рейтинг: 0 / 0
26.07.2004, 17:35:16
| Ответить | Цитировать | Написать  
Recordset в ADP
    #32621811
zz
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
zz
Участник
Если рекордсет ForwardOnly тогда RecordCount при открытии даст -1, насколько я помню. И убедиться в наличии записей можно

NOT (rst.EOF AND rst.BOF) =True если они (записи) есть.
...
Рейтинг: 0 / 0
26.07.2004, 17:39:56
| Ответить | Цитировать | Написать  
16 сообщений из 16, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Recordset в ADP
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=45&msg=32621702&tid=1672940]:
 0ms
get settings:
 6ms
get forum list:
 9ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 41ms
get topic data:
 8ms
get forum data:
 2ms
get page messages:
 40ms
get tp. blocked users:
 2ms
others: 226ms
total:  340ms
созд. / загр.: 340ms
x
x
Закрыть


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