Использование объектов данных ActiveX



Использование объектов данных ActiveX

В этом упражнении Вы воспользуетесь Visual Basic и ADO для подключения к источнику данных и выполнения запроса. Чтобы упростить Вам жизнь, часть кода мы подготовили заранее.

> Открытие проекта

  1. Запустите Visual Basic 5.0.
  2. В диалоговом окне New Project откройте вкладку Existing.
  3. Найдите на диске файл WA\Practice\Ch07\Lab7RDO.vbp и щелкните кнопку Open.
  4. В ответ на предложение добавить проект в Visual SourceSafe щелкните кнопку No.
  5. В меню Project выберите команду References.

    Обратите внимание на заранее созданную ссылку на библиотеку Microsoft OLE DB ActiveX Data Object 1.0 Library.

> Подключение к ODBC-совместимому источнику данных

  1. В разделе General Declarations формы frmADO создайте следующую объектную переменную уровня формы:

    Dim rs As New ADODB.Recordset

  2. Откройте окно кода для события cmdConnect_Click.


  3. Добавьте следующий код для открытия набора записей:

    rs.Open "SELECT LastName, FirstName FROM Employees",

    "DSN=nwind;", adOpenKeyset

> Заполнение полей ввода данными из таблицы сотрудников

  1. Из списка объектов в окне кода выберите (General).
  2. Из списка процедур в окне кода выберите FillTextBoxes.
  3. Добавьте в эту процедуру код для заполнения полей ввода аналогично примеру, приведенному ниже.

    txtFirstName.Text = rs! firstname

    txtLastName.Text = rs!lastname

> Проверка остального кода приложения

  1. Рассмотрите код событий cmdFirst, cmdPrevious, cmdNext и cmdLast.
  2. Сохраните проект.
  3. Запустите и проверьте приложение.



Содержание раздела