Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Вот такой запрос / 3 сообщений из 3, страница 1 из 1
26.05.2004, 08:39
    #32533736
Ирча
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вот такой запрос
Господа! поможите
Есть такой запрос
Код: plaintext
1.
2.
3.
4.
strSQL = "INSERT INTO СМРввод (Объект, МТР, КодД, ДатаВ, Акт) SELECT Списание.[Код Объекта], Списание.Сумма, " _
& str(Nz(Me.СписаниеПодч.Form.[КодД])) & "," _
& "#" & Format(Me.СписаниеПодч.Form.[ДатаВ], "mm\/dd\/yyyy") & "#," _
& CStr(Me.СписаниеПодч.Form.[Акт]) & _
" FROM Списание WHERE(((Списание.ВидТовара)=""Материал""));" 
И такой
Код: plaintext
1.
2.
3.
4.
strSQL = "INSERT INTO СМРввод (Объект, Обор, КодД, ДатаВ, Акт) SELECT Списание.[Код Объекта], Списание.Сумма, " _
& str(Nz(Me.СписаниеПодч.Form.[КодД])) & "," _
& "#" & Format(Me.СписаниеПодч.Form.[ДатаВ], "mm\/dd\/yyyy") & "#," _
& CStr(Me.СписаниеПодч.Form.[Акт]) & _
" FROM Списание WHERE(((Списание.ВидТовара)=""Оборудование""));"
Идея такова, если в поле Списание.Вид товара = оборудование, то сумма помещается в поле Обор таблицы СМРввод
Если Списание.Вид товара = материал, то сумма помещается в поле МТР таблицы СМРввод

Вто только дальше меня заклинило
как их запустить друг за другом
...
Рейтинг: 0 / 0
26.05.2004, 08:52
    #32533744
Ирча
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вот такой запрос
ОПС!
Сильно извеняюсь, по моему у меня все получилось
...
Рейтинг: 0 / 0
26.05.2004, 08:54
    #32533746
Shuhard
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вот такой запрос
.execute(String)
DAO-CurrentDb
ADO-CurrentProject.Connection
...
Рейтинг: 0 / 0
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Вот такой запрос / 3 сообщений из 3, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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