Читаем Обработка баз данных на Visual Basic®.NET полностью

НА ЗАМЕТКУ

Среда Visual Studio .NET может не обнаружить пространство имен Data.Odbc, потому что оно является расширением базовой версии продукта. В таком случае выполните ряд действий.

1. Скопируйте инсталлятор провайдера данных ODBC с Web-узла компании Microsoft и выполните все инструкции по инсталляции.

2. В окне SolutionExplorer щелкните правой кнопкой мыши на папке References проекта DataProviderObjects.

3. Выберите в контекстном меню команду Add Reference.

4. Во вкладке.NET диалогового окна Add Reference прокрутите список компонентов и найдите файл Microsoft.Data.Odbc.dll.

5. Щелкните дважды на файле Microsoft.Data.Odbc.dll для включения его в список избранных компонентов Selected Components в нижней части диалогового окна Add Reference.

6. Щёлкните на кнопке ОК для закрытия диалогового окна Add Reference.

Если по какой-либо причине не распознано какое-то другое импортированное пространство имен, потребуется привести ссылку на файл System.Data.dll. Для этого выполните действия, перечисленные в пп. 2-6, где вместо файла Microsoft.Data.Odbc.dll при выполнении п. 4 нужно использовать файл System.Data.dll.

Теперь для кнопки btnConnection нужно создать код, приведенный в листинге 4.1, для создания подключения к базе данных pubs сервера SQL Server. Этот код создает подключение и отображает состояние подключения до и после попытки подключения к базе данных.

Листинг 4.1. Код открытия подключения и отображения его состояния

Private Sub btnConnection Click(ByVal sender As System.Object, _

 ByVal e As System.EventArgs) Handles btnConnection.Click

 ' Создание экземпляра объекта Connection

 Dim cnn As SqlConnection = New SqlConnection()

 ' Создание строки подключения

 cnn.ConnectionString = "server=localhost;uid=sa;database=pubs"

 txtResults.Clear()

 ' Отображение состояния подключения

 If (cnn.State = System.Data.ConnectionState.Open) Then

  txtResults.Text = txtResults.Text & "Connection is Open"

 Else

  txtResults.Text = txtResults.Text & "Connection is Closed"

 End If

 txtResults.Text = txtResults.Text & ControlChars.CrLf

 ' Открытие подключения

 txtResults.Text & "Opening DB connection…" _

  & ControlChars.CrLf & ControlChars.CrLf

 cnn.Open()

 ' Отображение состояния подключения

 If (cnn.State = System.Data.ConnectionState.Open) Then

  txtResults.Text = txtResults.Text & "Connection is Open"

 Else

  txtResults.Text = txtResults.Text & "Connection is Closed"

 End If

 txtResults.Text = txtResults.Text & ControlChars.CrLf

End Sub

Перейти на страницу:

Похожие книги

Access 2002: Самоучитель
Access 2002: Самоучитель

В книге рассматривается широкий круг вопросов, связанных с использованием программной среды Access 2002, которая является составной частью пакета Office 2002 и предназначена для создания банка данных в самых различных предметных областях.Подробно описывается методика проектирования объектов базы данных (таблицы, формы, отчеты, страницы доступа к данным, запросы, модули).Детально обсуждаются вопросы создания интегрированной базы данных в единой среде Access 2002: формирование БД с нуля, конвертирование в программную среду баз данных, созданных в ином программном окружении – Clarion, FoxPro.Особое внимание уделяется формированию разнообразных запросов к интегрированной базе данных Access 2002 с использованием языков программирования SQL, VBA и макросов.Приводятся общие сведения о возможностях языка обмена данными между различными компьютерами и приложениями (XML). Описываются возможности использования гиперссылок, связывающих базу данных с другими программными продуктами. Объясняется, как можно работать с базой данных Access 2002 без установки ее на компьютер, используя технологию ODBC (Open Data Base Connectivity). В приложениях приводятся количественные параметры Access 2002 и связанная с этой СУБД терминология.Предлагаемая книга будет полезна специалистам, занимающимся практической разработкой банков данных и приложений на их основе, а также студентам вузов, изучающим информатику.

Павел Юрьевич Дубнов

Программирование, программы, базы данных / ОС и Сети / Книги по IT