Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > MS Access > Как прибавить ?


Автор: SAVA 21.11.2005, 13:03
Есть таблицатоваров. как сделать так, чтоб когда происходит сделка закупки товара и в форме связаной с таблицей сделок из поля поличество товара значения прибавлялись к значению в таблице товаров к нужному полю.
Например на склада 100 паратруперов я ввожу покупку еще 100 и когда просматриваю склад вижу что паратруперов 200
Заранее благодарен.

Автор: Papirus 23.11.2005, 09:22
Если надо чтобы прибавка сохранялась в таблице товаров, а не просто отображалась, то есть смысл на AfterUpdate таблицы сделок редактировать запись в таблице товаров:
Код

Dim rs As DAO.Recordset
Set rs  = Forms!ТаблицаТоваров.Recordset
rs.Find "КодТовара = " & Forms!ТаблицаСделок.КодТовара

If Not rs.NoMatch Then
   rs.Edit
   rs.Fields("Количество") = rs.Fields("Количество") + Forms!ТаблицаСделок.Количество
   rs.Update
End If


Или

Код

CurrentDB.Execute "Update ТаблицаТоваров Set Количество = Количество + " & Forms!ТаблицаСделок.Количество
Forms!ТаблицаТоваров.Requery

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)