ID do artigo: 286189 - Última revisão: segunda-feira, 30 de agosto de 2004 - Revisão: 2.3

Como invocar a caixa de diálogo Propriedades do vínculo de dados de BD OLE no código do Visual Basic

Vista lado a ladoClique aqui para exibir o artigo traduzido e o artigo original em inglês, lado a lado.
Tradução automáticaExibir Aviso de Isenção de Tradução Automática
Exibir os produtos aos quais esse artigo se aplica.
Dica do SistemaEste artigo aplica-se a um sistema operativo diferente do que está a utilizar. Foi desactivado o conteúdo do artigo, que pode não ser relevante para si.
Expandir tudo | Recolher tudo

Sumário

A caixa de diálogo Propriedades de vínculos OLE DB dados normalmente é usada para definir ou editar atributos de seqüência de caracteres de conexão de ActiveX Data Object (ADO) para controles de dados ADO, objetos de conexão do Visual Basic 6.0 DataEnvironment e arquivos de universal data link (UDL, vínculo de dados). Documentos neste artigo um exemplo de código que demonstra como programaticamente chamar e usar esta caixa de diálogo em um aplicativo do Visual Basic para construir a seqüência de conexão para um objeto de conexão ADO em executar tempo usando uma gráfica do usuário interface (GUI) interface do driver. Este é um recurso útil para implementar em aplicativos e ferramentas que podem requerer os usuários especifiquem uma seqüência de conexão ADO em tempo de execução.

Mais Informações

O OLE DB Service Component 1.0 Type Library (oledb32.dll) que é instalado pelo Microsoft Data Access Components (MDAC) implementa um objeto chamado VínculosDeDados cujos métodos PromptEdit e PromptNew podem chamar e usar a caixa de diálogo de propriedades OLE DB vínculo de dados para definir ou editar seqüências de caracteres de conexão ADO.

Definir as etapas a seguir um exemplo do Visual Basic que demonstra como usar o objeto VínculosDeDados do OLE DB Service Component 1.0 biblioteca de tipos para editar as propriedades de seqüência de caracteres de conexão de um objeto de conexão ADO:
  1. Abra um novo projeto Standard EXE no Visual Basic. O Form1 é criado por padrão.
  2. No menu Project , defina referências a 2.x Microsoft ActiveX Data Objects Library e o OLE DB Service Component 1.0 biblioteca de tipos .
  3. Arrastar-e-soltar um CommandButton no Form1 e tornar a legenda Definir conexão .
  4. Copie e cole o código a seguir no módulo de código do Form1: 
    Dim cn As ADODB.Connection

Private Sub Command1_Click()

Dim MSDASCObj As MSDASC.DataLinks
Set MSDASCObj = New MSDASC.DataLinks

Set cn = New ADODB.Connection
MSDASCObj.PromptEdit cn

cn.Open
MsgBox "Connection opened successfully"
cn.Close
End Sub
  5. Salve o projeto e executá-lo.
  6. Clique em Definir conexão e observe que o código no procedimento de evento Click de CommandButton cria uma instância do objeto MSDASC.DataLinks e executa seu método PromptEdit para exibir a caixa de diálogo OLE DB propriedades do vínculo de dados . Esta caixa de diálogo é exibida como uma janela restrita. Como resultado, código subseqüente que segue a chamada para o método PromptEdit não será executado até que a caixa de diálogo Propriedades de link de dados é descartada.
  7. Selecione um provedor OLE DB adequado na guia provedores e, em seguida, especificar os outros atributos de conexão para estabelecer uma conexão com um dos seus bancos de dados (Access, SQL Server, Oracle e assim por diante).
  8. Clique em Test Connection na caixa de diálogo Propriedades de link de dados para testar a conexão. Observe que você recebe uma caixa de mensagem Testar conexão bem-sucedida se a conexão for bem-sucedida. Ignore a caixa de diálogo clicando em OK . O código restante no procedimento de evento Click de CommandButton agora é executado. A propriedade ConnectionString do objeto ADO Connection que foi passado como um parâmetro para o método PromptEdit é inicializado baseada nas configurações que você selecionou na caixa de diálogo Propriedades de link de dados .

    As instruções a seguir a chamada para o método PromptEdit do objeto MSDASC.DataLinks abrir e fechar uma conexão ADO usando o objeto de conexão ADO é inicializado pela chamada para o método PromptEdit . Isso verifica que a propriedade ConnectionString do objeto de conexão ADO foi definida corretamente de acordo com as opções que selecionou na caixa de diálogo Propriedades de vínculo de dados . Se clicar em Cancelar na caixa de diálogo Propriedades de vínculo de dados , a instrução cn.Open no código do Visual Basic gera um erro tempo de execução para indicar que ele não pôde estabelecer uma conexão usando ConnectionString não inicializado.

    Observação : você pode verificar ConnectionString para verificar se ele está vazio a conexão ("") e capturar o Cancelar antes da instrução connection.open.
A informação contida neste artigo aplica-se a:
  • Microsoft Visual Basic 5.0 Enterprise Edition
  • Microsoft Visual Basic Enterprise Edition for Windows 6.0
  • Microsoft Visual Basic 6.0 Enterprise Edition Service Pack 3
  • Microsoft Visual Basic 6.0 Enterprise Edition Service Pack 4
  • Microsoft Visual Basic 5.0 Professional Edition
  • Microsoft Visual Basic 6.0 Professional Edition
  • Microsoft OLE DB 2.0
  • Microsoft OLE DB 2.1
  • Microsoft OLE DB 2.5
  • Microsoft OLE DB 2.6
  • Microsoft ActiveX Data Objects 2.0
  • Microsoft ActiveX Data Objects 2.01
  • Microsoft ActiveX Data Objects 2.1
  • Microsoft ActiveX Data Objects 2.1 Service Pack 1
  • Microsoft ActiveX Data Objects 2.1 Service Pack 2
  • Microsoft ActiveX Data Objects 2.5
  • Microsoft ActiveX Data Objects 2.6
  • Microsoft ActiveX Data Objects 2.7
Voltar para o início
Palavras-chave: 
kbmt kbhowto KB286189 KbMtpt
Tradução automáticaTradução automática
IMPORTANTE: Este artigo foi traduzido por um sistema de tradução automática (também designado por Machine Translation ou MT), não tendo sido portanto traduzido ou revisto por pessoas. A Microsoft possui artigos traduzidos por aplicações (MT) e artigos traduzidos por tradutores profissionais, com o objetivo de oferecer em português a totalidade dos artigos existentes na base de dados de suporte. No entanto, a tradução automática não é sempre perfeita, podendo conter erros de vocabulário, sintaxe ou gramática. A Microsoft não é responsável por incoerências, erros ou prejuízos ocorridos em decorrência da utilização dos artigos MT por parte dos nossos clientes. A Microsoft realiza atualizações freqüentes ao software de tradução automática (MT). Obrigado.
Clique aqui para ver a versão em Inglês deste artigo: 286189  (http://support.microsoft.com/kb/286189/en-us/ )
Voltar para o início