FoxPro Club Главная

Конференция Решения Фотоальбом Сайт М.Дроздова Статьи Файловый архив Книга Visual FoxPro 9.0 Русский Help для Visual FoxPro
Пользователей: 9233
Вход
Подключение к MSSQL Server 2000 с использованием ADO. Редактирование таблицы с иерархической структу

Заинтересовал CursorAdapter и ADO, впрочем как и MSSQL Server. Данный пример показывает, как можно использовать ADO-подключение для редактирования данных. Кстати, при построении CursorAdapter-a я воспользовался стандартным builder-ом, в последствии подправив немного Init (установил маленькие TimeOut-ы). В форме для авторизации используется класс для чтения/записи в INI файлы, взятый из примеров VFP8, т.е. в последствии Вам нужно будет набирать только пароль. Транзакции можно и не использовать, а проверять TABLEUPDATE(.t.)=.t., однако вставку и удаление я все таки провожу в начатой Thisform.browser_de.ent_structure.DataSource.ActiveConnection.Be ginTrans() insert... IF TABLEUPDATE(.t.) Thisform.browser_de.ent_structure.DataSource.ActiveConnection.CommitTrans() ... транзакции.


 
Прислал: bullbone ie Bykov V. Konstantin   Категория: Foxpro и другие приложения


Подключение к MSSQL Server 2000 с использованием ADO. Редактирование таблицы с иерархической структурой с использованием ActiveX TreeView, поиск, вставка, рекурсивное удаление и др. VFP8 SP1

1). Внимание! Вам потребуется mscomctl.ocx для выполнения проекта (содержит ActiveX TreeView control и ImageList control). Я использовал 6-ые версии. Если будет вылетать ошибка, попробуйте скопировать mscomctl.ocx из \SYSTEM32\ в SQL_ADO_TEST\ActiveX\ и зарегистрировать его там при помощи regsvr32 (Win2k - XP)

2). На MSSQL Server 2000 создайте любую базу. Создайте в ней таблицу с именем ent_structure и с 3-мя полями:

nkey numeric 9
nparent numeric 9
name char 254

создайте уникальный индекс (constraint) по полю nkey (значения в поле не повторяются)

3)Занесите в таблицу 2 строки:

nkey=1, nparent=0, name=СЛУЖЕБНАЯ ПАПКА

nkey=2, nparent=0, name=ПРЕДПРИЯТИЕ

4) При необходимости создайте Юзера с правами записи/чтения на базу

5) В настройках ODBC создайте системный DSN подключения к созданной БД.

6) Открывайте проект и запускайте autorization_form.

 
Сделайте оценку этого решения Плохо Удовлетворительно Так себе Хорошо Отлично Текущая оценка: (5.114) Вложение [108.81]kb
Дополнения пользователей
Подключение к MSSQL Server 2000 с использованием ADO. Редактирование таблицы с иерархической структу
[+][?]
Bykov V. Konstantin
10.11.03 12:41:47

Не запускайте EXE-шник в папке проекта, удалите его.
Bykov V. Konstantin
10.11.03 17:55:10

Также используется механизм Drag and Drop при перетаскивании узлов TreeView на основе решения
ВладимираМ.
[Дополнить]



© 2000-2017 Fox Club 
При размещении любых материалов с сайта на других ресурсах- прямая ссылка на www.foxclub.ru обязательна
Яндекс.Метрика