*
*


CAPTCHA Image   Reload Image
X

Учет выдачи гарантийных талонов (VB 6.0)

контрольные работы, программирование

Объем работы: 1 стр.

Год сдачи: 2004

Стоимость: 350 руб.

Просмотров: 491

 

Не подходит работа?
Узнай цену на написание.

Оглавление
Введение
Литература
Заказать работу
Основные функции:
- Система учета номенклатуры товаров
(сортировка по категории, производителю)
- Учет выдачи гарантийных талонов на реализуемую номенклатуру
- Справочник клиентов, «узнавание» постоянных покупателей
- Карточки ремонта

Dim str As String
If Trim(Text1.Text) "" And IsNumeric(Text2.Text) Then
str = "Select Name from Category Where Name="& Trim(Text1.Text) &""
Adodc3.CommandType = adCmdText
Adodc3.RecordSource = str
Adodc3.Refresh
If Adodc3.Recordset.EOF = True Then
Adodc2.Recordset.AddNew
Adodc2.Recordset.Fields("Name") = Trim(Text1.Text)
Adodc2.Recordset.Fields("DateLong") = CLng(Text2.Text)
Adodc2.Recordset.Update
MsgBox "Запись успешно добавлена", vbOKOnly, "Информация"
Adodc1.Refresh
DataGrid1.Refresh
Else: MsgBox "Запись уже существует", vbCritical, "Ошибка"
End If
Else: MsgBox "Не верно введены данные", vbCritical, "Ошибка"
End If

Б. Сайлер Использование Visual Basic 6

После офорления заказа Вам будут доступны содержание, введение, список литературы*
*- если автор дал согласие и выложил это описание.

Работу высылаем в течении суток после поступления денег на счет
ФИО*


E-mail для получения работы *


Телефон


ICQ


Дополнительная информация, вопросы, комментарии:



CAPTCHA Image
Сусловиямиприбретения работы согласен.

 
Добавить страницу в закладки
Отправить ссылку другу