Модераторы: Akina
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> VBA Access2000->XP, Error "Type mismatch" for Recordset 
:(
    Опции темы
Atna
  Дата 5.5.2004, 16:23 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 9
Регистрация: 5.5.2004

Репутация: нет
Всего: нет



Либо я запуталась в библиотеках, либо...
Переношу (понадобилось) программу на VBA из Acceess-2000 в Access-XP (2002). Скажите на милость, почему прога, которая замечательно выполняется у меня (в 2000), выдает (в XP) "Error (13) Type mismatch" на код:

Set r = d.OpenRecordset("SELECT Formulyar.INS, Formulyar.DataV, Formulyar.Kod_Izd " _
& "FROM Formulyar " _
& "WHERE (Formulyar.Kod_Izd = " & kod & ") AND ((Formulyar.DataV) Is Null);")

когда d установлено как Database и d = CurrentDb, kod As Integer и kod=Me.Поле1 ( kod замечательно воспринимается, т.е. не в нем проблема)

Я так разумею, что все дело в подключенных библиотеках... Но я все проверила - полный набор!
Может быть еще что-то?
Повторюсь - в 2000-ке все работает!
Буду благодарна за подсказку. smile.gif
PM MAIL   Вверх
Akina
Дата 5.5.2004, 17:03 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Советчик
****


Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 34
Всего: 454



DIM r as Recordset?
Проверь наличие галки Tools - References - DAO Object Library

Это сообщение отредактировал(а) Akina - 5.5.2004, 17:04


--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

PM MAIL WWW ICQ Jabber   Вверх
Atna
Дата 5.5.2004, 17:44 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 9
Регистрация: 5.5.2004

Репутация: нет
Всего: нет



Прошу прощения за неточность. Да, это все есть:

Dim r As Recordset и DAO 3.6 Object Library

Мне уже самой кажется, что вся проблема в SQL ColCtrl 1.0 Type Library. В принципе никаких кардинальных различий ведь в Access-ах быть не должно? Так? Совместимость и все такое... Но спасибки за ответ!

Можно еще об одной проблеме? Делала копирование данных путем .AddNew в таблице. Замечательно-нажимаешь кнопку, производится копирование указанного числа записей... Но в форме у меня упорно отражается запись, которую я копировала. Даже после окончания копирования не показывается последняя (ставшая последней) запись (ориентируюсь по ID, который меняется). Как я только не изголялась с обновлением формы, видно что-то не то делаю sad.gif
DoCmd.GoToRecord, , acLast - указала, не действует sad.gif
PM MAIL   Вверх
Akina
Дата 5.5.2004, 17:59 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Советчик
****


Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 34
Всего: 454



Atna
Все-таки именно Dim r As Recordset ? или например ADODB.Recordset ? А в редакторе модуля этот тип корректно распознается и подставляется автоматом по первым символам ?

Цитата
Делала копирование данных путем .AddNew в таблице. Замечательно-нажимаешь кнопку, производится копирование указанного числа записей... Но в форме у меня упорно отражается запись, которую я копировала.

не, какая связь между таблицей в БД и отображением формы на экране? DoCmd.GoToRecord тебе смещает курсор в таблице - проверь номер текущей записи... а на экране будь любезна курсор двигать синхронно программными средствами.


--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

PM MAIL WWW ICQ Jabber   Вверх
Гость_Atna
Дата 5.5.2004, 18:17 (ссылка)    |    (голосов: 0) Загрузка ... Загрузка ... Быстрая цитата Цитата


Unregistered











Нет, все тип-топ : я только с DAO работаю! ActiveX мне без надобности. Более того, была бы благодарна, если б мне кто-нибудь объяснил преимущества этого метода.
А как же мне быть: записи новые в таблице появились, а в форме отражаются только после ее закрытия и повторного открытия. После нажатия кнопки и добовления записей в таблицу, в форме все остается в неизменном виде, даже то, что есть новые записи не отражается!
  Вверх
Akina
Дата 6.5.2004, 08:57 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Советчик
****


Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 34
Всего: 454



Цитата
как же мне быть: записи новые в таблице появились, а в форме отражаются только после ее закрытия и повторного открытия

Еще скажи что источник данных формы - снапшот biggrin.gif рефрешить за тебя рекордсеты кто будет?


--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

PM MAIL WWW ICQ Jabber   Вверх
vovkor
Дата 9.9.2004, 15:05 (ссылка)    |    (голосов: 0) Загрузка ... Загрузка ... Быстрая цитата Цитата


Unregistered











И все таки!!!! как решается проблема с RecordSet ?????
  Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "VB6"
Akina

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

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

  • Литературу по VB обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • Используйте теги [code=vb][/code] для подсветки кода. Используйтe чекбокс "транслит" (возле кнопок кодов) если у Вас нет русских шрифтов.


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Akina.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | VB6 | Следующая тема »


 




[ Время генерации скрипта: 0.0576 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.