Использование объектов данных 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. Запустите и проверьте приложение.
         
         
         Содержание раздела
         
         

         ---

         
         
         
         
         

         ---