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


Подключение к БД


Создав объектную переменную типа Database (и, если нужно, Workspace), Вы можете подключиться к БД средствами метода OpenDatabase.

Пример В этом коде на Visual Basic объектная переменная db, объявленная в предыдущем примере, используется для подключения к БД Northwind:

'Открыть базу данных, используя метод OpenDatabase

Set db = OpenDatabase("C:\DataBases\Northwind.mdb")

Установив соединение с БД, приложение может запрашивать сведения, добавлять новые и удалять существующие записи, а также обновлять данные. Для управления информацией в БД используется объект Recordset.

> Создание ссылки на DAO в Visual Basic

В этом упражнении Вы создадите код Visual Basic для подключения к БД с помощью DAO.

  1. Запустите Visual Basic.
  2. Создайте новый проект типа Standard EXE.
  3. В меню Project щелкните команду References.
  4. Установите ссылку на Microsoft DAO 3.5 Object Library и щелкните кнопку ОК.
  5. В меню Project щелкните команду Components.
  6. Выделите Microsoft Common Dialog Control 5.0 и щелкните кнопку ОК.
  7. Добавьте в форму элемент управления «стандартное диалоговое окно».
  8. В процедуре события Load этой формы наберите следующий код:

    Dim DB As Database

    CommonDialog1.ShowOpen

    Set DB = OpenDatabase(CommonDialog1.filename)

    If Not DB Is Nothing Then

    MsgBox "Successfully connected!

    Else

    MsgBox "Could not connect."

    End If

  9. В меню Run щелкните команду Start.
  10. Когда появиться стандартное диалоговое окно, откройте файл WA\Practice\ Nwind.mdb. После подключения к БД появится окно с информацией о статусе соединения.
  11. Завершите приложение и закройте Visual Basic.




Начало  Назад  Вперед



Книжный магазин