Rambler's Top100
Форум: MS ACCESSVBVBA MS OfficeMS SQL server
Новые сообщения: 0000

Форум: MS ACCESS

Вопросы связанные с MS ACCESS

Обновить визитку
Участники «Online»
Все участники

 
 

Доброго времени суток, Посетитель!

вид форума:
Линейный форум Структурный форум

тема: Продажа товаров
 
 автор: Gologramma   (08.05.2012 в 12:38)   личное сообщение
 
 

Здравствуйте! Может у кого-нибудь есть пример того, как реализовать в форме продажу товара? Как я пыталась сделать: подчиненна таблица, в ней поле со списком-выбираются товары, когда выбрал-атоматически ставится его цена.прописывается количество. считается стоимость.
но у меня получалось либо ввести только однозначение товара, либо вся таблица заполнялась одним и тем же..
сейчас пытаюсь сделать с временной таблицей, но не получается внести данные туда.
Private Sub Артикул_AfterUpdate()
Dim strSQL As String
Dim strSQL2 As String
strSQL = " INSERT INTO TblTemp ( Артикул, Цена ) " & _
" SELECT Артикул, Цена " & _
" FROM [Запрос на лекарства]" & _
" WHERE [Запрос на лекарства].[Артикул]='" & Me!Артикул & "'"
' Заносим данные во временную таблицу
CurrentProject.Connection.Execute (strSQL)
Me.Артикул.Requery 'Отображаем список внесенных ИП
Me.Цена.Requery
End Sub

CurrentProject.Connection.Execute (strSQL) - вот здесь ошибка(несоответствие типов данных в условиях отбора)
как должно быть? может есть другой способ!???
Заранее спасибо..
http://zalil.ru/33199920-сама база

  Ответить  
 
 автор: kot_k_k   (08.05.2012 в 14:10)   личное сообщение
 
 

должна быть табла куда заносим данные о каждой продаваемой партии (чеке), т.е. аналог приход - расход.
а в качестве ввода нужно воспользоваться событием дабл клик на "Названии"
- открыть форму КАТАЛОГ лекарст (мадально)
- отработать на ней далб клик - можно значение кода лекарства присвоить глобальной переменной,
закрыть каталог
рисвоить текущему полю Наименование значение Глобальной переменной.

  Ответить  
HiProg.com - Технологии программирования
Rambler's Top100 TopList