Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Access
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 02.07.2008, 14:03   #1
Customer
 
Регистрация: 02.07.2008
Сообщений: 3
Вопрос Ошибки при работе запросов с параметрами

Народ, дайте совет, пожалуйста! База данных, созданная и прекрасно работающая на одном компьютере, не работает на другом. При этом выдается сообщение об ошибке 3061 "слишком мало параметров. требуется 2". Запрос с 1 параметром, запрос и параметр определены как объекты DAO. Везде Access 2003 (формат базы Access 2000) и Windows XP.
Customer вне форума Ответить с цитированием
Старый 02.07.2008, 15:01   #2
Abrakadabra
Форумчанин
 
Регистрация: 26.04.2008
Сообщений: 487
По умолчанию

Цитата:
Сообщение от Customer Посмотреть сообщение
Народ, дайте совет, пожалуйста! База данных, созданная и прекрасно работающая на одном компьютере, не работает на другом. При этом выдается сообщение об ошибке 3061 "слишком мало параметров. требуется 2". Запрос с 1 параметром, запрос и параметр определены как объекты DAO. Везде Access 2003 (формат базы Access 2000) и Windows XP.
Покажите проблемную процедуру, а перед этим проверьте референсы, может там чего не так..
Abrakadabra вне форума Ответить с цитированием
Старый 02.07.2008, 15:14   #3
Customer
 
Регистрация: 02.07.2008
Сообщений: 3
Хорошо

Цитата:
Сообщение от Abrakadabra Посмотреть сообщение
Покажите проблемную процедуру, а перед этим проверьте референсы, может там чего не так..
В форме выделяется запись, которая затем обрабатывается запросом CloseToRep:
Private Sub Кнопка31_Click()
Dim prm As DAO.Parameter
Dim qdf As DAO.QueryDef
Dim recNo As Long
recNo = Me.NPP
Set qdf = CurrentDb.QueryDefs("CloseToRep")
qdf.Parameters!myindex = recNo
qdf.Execute
End Sub
Customer вне форума Ответить с цитированием
Старый 02.07.2008, 16:27   #4
Abrakadabra
Форумчанин
 
Регистрация: 26.04.2008
Сообщений: 487
По умолчанию

Цитата:
Сообщение от Customer Посмотреть сообщение
В форме выделяется запись, которая затем обрабатывается запросом CloseToRep:
Private Sub Кнопка31_Click()
Dim prm As DAO.Parameter
Dim qdf As DAO.QueryDef
Dim recNo As Long
recNo = Me.NPP
Set qdf = CurrentDb.QueryDefs("CloseToRep")
qdf.Parameters!myindex = recNo
qdf.Execute
End Sub
1.Проверьте работоспособность (откройте) сам запрос CloseToRep.
2. Возможна проблема с значением\наличием поля Me.NPP
3. Проверьте наличие библиотек DAO 3.6 на ПК
Abrakadabra вне форума Ответить с цитированием
Старый 14.07.2008, 20:35   #5
Customer
 
Регистрация: 02.07.2008
Сообщений: 3
По умолчанию

Grand merci, Abrakadabra! Приношу извинения за допущенную мной детскую ошибку. Всем, кто прочтет это - будьте крайне внимательны при формировании имен полей таблиц и при вводе вручную их имен в запросах...
Customer вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Запрос на сложение запросов ГОСЕАН БД в Delphi 3 19.05.2008 11:31
использование SQL запросов в коде VBA b00s Microsoft Office Access 3 26.04.2008 13:40
Проблема с параметрами при работе С ADO А. Долматов БД в Delphi 22 30.11.2007 08:47
несколько запросов SQL Arteom БД в Delphi 3 09.09.2007 23:39
Конструктор запросов kaa БД в Delphi 12 20.12.2006 16:45