Практическая работа 46. ActiveX Document.DLL

Здесь создаeтся документ ActiveX Document. DLL, в котором используем доступ к данным посредством элемента управления Data с выводом их в поле элемента управления MSFlexGrid; тогда имеется возможность предоставить доступ к локальным базам данных пользователю сети. Документы ActiveX инициализируются (в отличие от формы) в процедуре UserDocument_Initialize (). В примере используем материалы практической работы 28 (доступ к данным с выводом результатов в поле элемента управления MSFlexGrid).

Последовательность действий:

1. Cоздать проект типа ActiveX Document.DLL,

2. скопировать проект (практическая работа 28), при этом использовать свойство MSFlexGrid.DataSource = Data1 вместо части программы, описывающей работу с ячейками MSFlexGrid (см. комментарии к коду практической работы 28),

3. для ввода SQL-запроса добавить командную кнопку Command1 (командная кнопка практики 28 не используется), см. код, данный ниже. Первый запрос (Select Name From Student) вводится в окне свойств текстового поля,

4. ввести код, данный ниже, стартовать проект - проект выполняется в приложении Browser. Новый запрос вводится в текстовое поле, затем делается щелчок на командной кнопке, рис. 6.17

Private Sub UserDocument_Initialize()Dim i As IntegerCommonDialog1.FileName = ""CommonDialog1.Action = 1Data1.Connect = ""Data1.DatabaseName = CommonDialog1.FileNameData1.RefreshFor i = 0 To Data1.Database.TableDefs.Count - 1Combo1.AddItem (Data1.Database.TableDefs(i).Name)Next iCombo1.Text = ""Data1.RecordSource = Text1.TextData1.RefreshEnd Sub' SQL-запрос, вводимый в текстовое поле, присваивается ' свойству RecordSourcePrivate Sub Command1_Click() Data1.RecordSource = Text1.TextData1.RefreshEnd Sub

Рис. 6.17. ActiveX Document.DLL

Лекция 7: