Поддержка сайта

Высокие позиции в поисковой системе, на прямую зависят от развития вашего сайта.

Продвижение сайтов

Эффективность стратегий продвижения подтверждается сотрудничеством с крупными клиентами и отзывами о нашей работе.

Создание сайтов

Мы делаем сайты быстро, недорого и профессионально. От работы с нами, у вас останутся только положительные эмоции.

Сохранение отдела

Необходимо определить действия со сформированным скрытым полем savenewdepartment, включенным в форму, по нажатию кнопки Add Department.

Но сначала нужно построить код объекта Catalog, сохраняющий сведения об отделе в базе данных.

Добавление в объект Catalog кода сохранения нового отдела

1. Откройте проект WroxCommerce, найдите объект Catalog и добавьте в него код:

 Сохранение отдела

Описание работы

Сначала создаем набор записей для вставки новой строки: Dim NewDepartment As New Recordset

NewDepartment.Open "Departments", m_utility.DB.DB, adOpenKeyset,

adLockOpt imi s t і с

Вставляем новую строку и заносим сведения об отделе:

NewDepartment.AddNew NewDepartment("Name") = Name

Если родительский идентификатор не указан, нужно проследить за установкой значения в столбце DepartmentlDP.

If ParentID о 0 Then NewDepartment("DepartmentlDP") = ParentID

Если значение не установлено в явном виде, по умолчанию будет присвоено значение null, что нам и нужно. При поиске в дереве отдела верхнего уровня мы запрашиваем все отделы по null-значению DepartmentlDP.

Наконец, обновляем базу данных и возвращаем идентификатор нового отдела в объект, вызвавший функцию:

NewDepartment.Update

AddDepartment = NewDepartment("DepartmentID")

Читайте так же:

Нам доверяют

Интернет магазин