Архитектура Microsoft Windows для разработчиков



Подключение к БД средствами RDO


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

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

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

    1. Откройте окно кода для события cmdConnect_Click.
    2. Добавьте следующий код (он устанавливает соединение средствами RDO):

      Set cn = New rdoConnection

      With cn

      .Connect = "DSN=nwind"

      .EstablishConnection rdDriverNoPrompt, False

      End With

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

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

        txtFirstName.Text = rs!firstname

        txtLastName.Text = rs!lastname

        > Изучение кода приложения

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



        4. Содержание  Назад  Вперед