Помощь в написании студенческих работ
Антистрессовый сервис

Организация введения входных данных

РефератПомощь в написанииУзнать стоимостьмоей работы

Форма ф_накладная_приход служит для ввода данных в базу данных накладных и состоит из главной формы, на которой расположена кнопка для добавления данных о пришедшей продукции. Главная форма содержит поля Номер накладной прихода, её дату, торговую точку, куда была привезена продукция в виде ленточной ЭФ. Форма для добавления данных о продуктах содержит следующие поля — продукция, количество, цена… Читать ещё >

Организация введения входных данных (реферат, курсовая, диплом, контрольная)

Разработка формы ввода «ф_накладная_приход»

Форма ф_накладная_приход служит для ввода данных в базу данных накладных и состоит из главной формы, на которой расположена кнопка для добавления данных о пришедшей продукции. Главная форма содержит поля Номер накладной прихода, её дату, торговую точку, куда была привезена продукция в виде ленточной ЭФ. Форма для добавления данных о продуктах содержит следующие поля — продукция, количество, цена. Формы связаны полями номер накладной прихода.

В форме для добавления данных о продуктах:

— номер заказа — =[Формы]![ф_накл_приход]![номер].

Внешний вид форм представлен ниже на рис. 3.1 и 3.2.

Форма «ф_накладная_приход».

Рисунок 3.1 — Форма «ф_накладная_приход».

Для добавления данных создана кнопка «Добавить запись». Для добавления записи в таблицу был создан запрос, sql-код которого приведен ниже:

INSERT INTO dbo_тНакладная_приход (Номер_накладной_прихода, Дата_накладной_прихода, Код_операции, Код_продуктовой_точки)SELECT [Формы]![ф_накл_приход]![Поле2] AS [Number], [Формы]![ф_накл_приход]![Поле4]AS [date], 1 AS Operation, [Формы]![ф_накл_приход]![К8] AS Т_т.

Форма для добавления пришедших продуктов.

Рисунок 3.2 — Форма для добавления пришедших продуктов.

Для вставки записи в таблицу «тПриход» был написан модуль на Visual Basic, код которого представлен ниже:

Private Sub Кнопка6_Click ().

CurrentDb.Execute «Insert into dbo_тПриход» _.

& «(Кол_приход, Цена1_прихода, Код_продукции, Номер_накладной _прихода) Values «_.

& «('» & Me.Количество.Value & «', '» & Me.Цена.Value & «', '» & Me. Продук ция.Value & «','» & Me.Номер.Value & «');» .

DoCmd.close acForm, «Form1», acSaveYes.

End Sub.

Показать весь текст
Заполнить форму текущей работой