Vba запрос

zagadochnitsa
Дата: 01.02.2016 15:12:09
Как прописать готовый запрос (аксес) на вставку в VBA. в запросе заполняются 3 поля, 2 из них берут значения из формы, а третье поле заполняется еще из одного запроса.

Private Sub Кнопка4_Click()
With CurrentDb.QueryDefs("Insert_tov")
.Parameters("Nd") = Me.Поле1
.Parameters("Nt") = Me.Поле2
.Execute
End With
End Sub

Я так делала, все работают. а в этом мне пишет мало параметров. в чем может быть ошибка?
спасибо!
ПЕНСИОНЕРКА
Дата: 01.02.2016 15:14:48
zagadochnitsa,

возможно поля 1 или 2 пустые
мы ведь даже их тип не видим
для дат вообще свои законы
==========
выложите базу или хотя бы
--запрос
--значения полей 1 и 2
zagadochnitsa
Дата: 01.02.2016 15:17:42
INSERT INTO Product_report ( N_rep, R_date, СуммаНаПочаток )
SELECT [Nt] AS Выражение1, [Nd] AS Выражение2, Zaluwku.[остаток_на_ начало_ дня]
FROM Zaluwku;
это запрос вставки
соответственно поле1 дата, оно не пустое при проверке все значение ввожу с формы
ПЕНСИОНЕРКА
Дата: 01.02.2016 15:20:19
zagadochnitsa,

но дата должна вводится в американском формате mm/dd/yyyy
вряд ли вы это обеспечили
zagadochnitsa
Дата: 01.02.2016 15:21:41
ПЕНСИОНЕРКА,
подскажите, пожалуйста, как это сделать)
я маску на форме прописала на дату 00.00.0000;0;" "
ПЕНСИОНЕРКА
Дата: 01.02.2016 15:58:05
zagadochnitsa,

я видимо сделала та, что бы уменьшить возню с кавычками(если я конечно не перепутала поля 1 2)
Private Sub Кнопка4_Click()
Dim s1
s1 = "INSERT INTO Product_report ( N_rep, R_date, СуммаНаПочаток )"
s1 = s1 & " SELECT [Nt] , [Nd] ,"
s1 = s1 & " Zaluwku.[остаток_на_ начало_ дня]"
s1 = s1 & " FROM Zaluwku;"

s1 = Replace(s1, "[nt]", Me.Поле1)
s1 = Replace(s1, "[nd]", Format(Me.Поле2, "\#mm\/dd\/yyyy\#"))

Debug.Print s1
CurrentDb.Execute s1
End Sub
zagadochnitsa
Дата: 01.02.2016 16:02:57
ПЕНСИОНЕРКА,Спасибо огромное за помощь!
но все равно говорит,что мало параметров.
может у меня криво что-то стоит?
ПЕНСИОНЕРКА
Дата: 01.02.2016 16:06:53
zagadochnitsa,

может я поля 1 2 перепутала или у вас одно из полей пустое или одно дата, второе символьное
zagadochnitsa
Дата: 01.02.2016 16:09:49
ПЕНСИОНЕРКА, проверила, все правильно, вы не ошиблись.
ПЕНСИОНЕРКА
Дата: 01.02.2016 16:15:48
zagadochnitsa,

у меня работает(создала отладочную таблички)
выложите базу ---иначе не угадать ситуацию