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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 13.02.2009, 17:19   #1
Fishb1
Новичок
Джуниор
 
Регистрация: 13.02.2009
Сообщений: 1
По умолчанию Добавление записей в таблицы

Здравствуйте.

У меня есть база данных складского учета.
В ней 3 таблицы.
таб1-таблица приход материалов;
таб2-склад;
таб3-списание материалов;

По логике должно работать так:
Приходит материал(таб 1) , далле данные из таблицы таб1 должны добавляться в таблицу таб2, но если какие материалы из таб1 совпадают с материалами из таб2, то должны просто суммироваться, а не добавляться как новая запись. Списание материала должно проводится примерно так, таблица таб3 должна брать данные о материале из таблицы таб2(с помощью полей подстановок) при этом количесво которое указано в таб3 должно отниматься от количества из таб2.

На практике не знаю как сделать,помогите пожалуйста.

Если что то не понятно пишите.
Fishb1 вне форума Ответить с цитированием
Старый 19.02.2009, 15:47   #2
VVlad69
Пользователь
 
Регистрация: 19.02.2009
Сообщений: 18
По умолчанию

можно вообще одной таблой обойтись, а записи вести со знаками + - приход; минус - расход. Склад же вычислять по запросу сумма(кол-во), группировка по товару
VVlad69 вне форума Ответить с цитированием
Старый 26.02.2009, 21:45   #3
Sparxy
Пользователь
 
Регистрация: 26.01.2009
Сообщений: 29
По умолчанию

если все делать через DAO.Database то описываешь свою базу, допустим
Dim dbs As Database
Dim tbl As DAO.Recordset
Dim tbl2 As DAO.Recordset
..........
Set dbs as CurrentDB
Set tbl = dbs.OpenRecordset("тут стандартный скл запрос;")
а потом пишешь
tbl.FindFirst "[твое поле] = """ & tbl2![название поля в другой таблице] & """" (это если текстовое поле)
tbl.FindFirst "[твое поле] = " & tbl2![название поля в другой таблице] & "" (это если числовое поле)
Не стоит чинить то, что еще не сломалось...
Sparxy вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Добавление записей Liones БД в Delphi 3 25.12.2008 10:08
как исключить добавление повторных записей в таблицы? Demonk Microsoft Office Access 3 27.11.2008 10:30
Добавление записей в связанные таблицы с помощью Навигатора ~MaGic~ БД в Delphi 2 09.07.2007 08:01
Добавление и удаление записей в Listview Scorpeon Компоненты Delphi 0 08.06.2007 23:09
добавление записей в таблицу strannik БД в Delphi 5 10.05.2007 08:12