COMO: Criar uma cadeia de ligação através de programação no ADO.NET utilizando o Visual Basic .NET

Este artigo passo a passo demonstra como utilize a caixa de diálogo Propriedades de ligação de dados para criar uma cadeia de ligação através de programação no momento da concepção.

Requisitos

A lista seguinte descreve o hardware recomendado, software, infra-estrutura de rede e service packs que necessita:

• Microsoft Windows 2000 Professional, Windows 2000 Server, Windows 2000 Advanced Server ou Windows NT 4.0 Server
• Microsoft Visual Studio .NET

Este artigo pressupõe que está familiarizado com os seguintes tópicos:

• Visual Studio .NET
• Noções básicas do ADO.NET e sintaxe
• Princípios básicos de ActiveX Data Objects (ADO) e sintaxe

Criar uma ligação ADO

Quando utiliza ADO para criar a ligação, a ligação de dados cria um objecto ADODB ligação padrão.

1. Inicie o Visual Studio .NET e crie uma aplicação do Windows no Visual Basic. NET. É criado o Form1 por predefinição.
2. Menu Project , clique em Add Reference e, em seguida, adicione as seguintes referências:
   
   
   • Microsoft ActiveX Data Objects 2.7
   • biblioteca de tipos OLEDB Microsoft Service Component 1.0
   
   Nota : depois de clicar em OK na caixa de diálogo referências , pode aparecer a seguinte mensagem de erro:
   Não foi possível encontrar uma assemblagem de interoperabilidade primária para o COM o componente 'Microsoft OLE DB Service Component 1.0 biblioteca de tipos'. Uma assemblagem de interoperabilidade primária não está registada para esta biblioteca de tipos. Deseja ter um wrapper gerado?
   Clique em Sim na mensagem de erro.
3. Adicione um controlo de botão ao Form1.
4. Adicione o seguinte código ao evento Button1_Click :

   Dim mydlg As New MSDASC.DataLinks()
   Dim ADOcon As New ADODB.Connection()
   
   ADOcon = mydlg.PromptNew
   ADOcon.Open()
   
   If ADOcon.State = 1 Then
         MsgBox("Connection Opened")
   Else
         MsgBox("Connection Failed")
   End If

5. Prima a tecla F5 e, em seguida, clique em Button1 .
6. Escreva as informações adequadas na caixa de diálogo Propriedades de ligação de dados e certifique-se de que selecciona a caixa de verificação Permitir guardar palavra-passe .
7. Clique em Testar ligação .
8. Clique em OK . Se o teste de ligação com êxito a ligação de dados, é estabelecida uma ligação a base de dados e é apresentada uma caixa de mensagem.

Criar uma ligação de base de dados de OLE

Quando cria uma ligação de OLE DB com o fornecedor gerido de OLE DB no. NET, não pode criar ligações a origens de dados ODBC. Uma vez que ODBC tem a suas próprias fornecedor gerido no. NET, recebe um erro se utilizar a opção fornecedor de OLEDB Microsoft para controladores ODBC na caixa de diálogo Propriedades de ligação de dados . Além disso, tem de carregar ADO para a aplicação porque a ligação de dados cria um objecto ADODB ligações que não é compatível com o objecto OleDbConnection . Assim, tem de criar uma ligação de ADODB e atribuir a propriedade ConnectionString à propriedade CadeiaDeLigação do objeto OleDbConnection para funcionar correctamente.

1. Inicie o Visual Studio .NET e crie uma aplicação do Windows no Visual Basic. NET. Form1 é adicionado ao projecto por predefinição.
2. Menu Project , clique em Add Reference e, em seguida, adicione as seguintes referências:
   • Microsoft ActiveX Data Objects 2.7
   • biblioteca de tipos OLEDB Microsoft Service Component 1.0
   
   
3. Adicione um controlo de botão ao Form1.
4. Utilize a instrução de importação no espaço de nomes System.data.OLEDB para que não é necessário para qualificar declarações este espaço de nomes mais tarde no código. Tem de utilizar a instrução de importação anteriores para quaisquer outras declarações:

   Imports System.Data.OleDb

5. Adicione o seguinte código ao evento Button1_Click :

   Dim mydlg As New MSDASC.DataLinks()
   Dim OleCon As New OleDbConnection()
   Dim ADOcon As New ADODB.Connection()
   
   ADOcon = mydlg.PromptNew
   OleCon.ConnectionString = ADOcon.ConnectionString
   
   OleCon.Open()
   
   If OleCon.State = 1 Then
       MsgBox("Connection Opened")
   Else
       MsgBox("Connection Failed")
   End If

6. Prima F5 e, em seguida, clique em Button1 .
7. Escreva as informações adequadas na caixa de diálogo Propriedades de ligação de dados e certifique-se de que selecciona a caixa de verificação Permitir guardar palavra-passe .
8. Clique em Testar ligação .
9. Clique em OK . Se o teste de ligação com êxito a ligação de dados, é estabelecida uma ligação a base de dados e é apresentada uma caixa de mensagem.

Informações adicionais

Requer esforço adicional para utilizar este método para criar uma ligação ODBC porque a ligação de dados cria uma cadeia de ligação que é específico de OLE DB e não é compatível com o fornecedor gerido do ODBC. Para que isto funcione, tem de analisar a cadeia de ligação ADODB para as informações relevantes, tal como o ID de utilizador, palavra-passe e origem de dados. Depois de obter estas informações, é possível utilizar para criar uma cadeia de ligação é específica de ODBC. Lembre-se de que a ligação de dados só utiliza origem de dados ODBC (DSN) de nomes; assim, não é possível criar uma ligação sem DSN através da ligação de dados.

Para obter informações adicionais, clique nos números de artigo existentes abaixo para visualizar os artigos na Microsoft Knowledge Base: Para mais informações gerais sobre o ADO.NET ou Visual Basic. NET, consulte os seguintes newsgroups da MSDN:
Para mais informações, consulte o seguinte livro: Para mais informações, consulte o seguinte curso de formação & certificação da Microsoft: