Conectando-se e Navegando em um base de dados Access com ADO Data Control
A maneira mais fácil para se conectar a uma base de dados Access via ADO é utilizar a ADO Data Control. A sua utilização é idêntica ao DAO Data Control. Vejamos um exemplo passo a passo. Neste exemplo iremos acessar um banco de dados Access 97 chamado agenda.mdb e exibir os dados da tabela Clientes.
| O que é um banco de dados ?
Uma coleção de dados e objetos relacionados a um determinado tópico ou objetivo. Um banco de dados do Microsoft Access pode conter tabelas, consultas, formulários, relatórios, macros, módulos e atalhos a páginas de acesso a dados. O motor de banco de dados Microsoft Jet gerencia os dados das tabelas que residem no banco de dados. Os dados em tabelas vinculadas podem residir em um outro banco de dados do Access, em uma Origem do registro externos, como o dBASE ou o Microsoft Excel, ou em uma Origem do registro ODBC, como o Microsoft SQL
Server. |
A tabela Clientes possui a seguinte estrutura:
O que é uma tabela ? Uma tabela é um conjunto de dados sobre um tópico específico, como produtos ou fornecedores. Utilizar uma tabela separada para cada tópico significa armazenar os dados somente um vez, o que torna o banco de dados mais eficiente e reduz os erros de entrada de dados. |
Este banco de dados foi criado no Access. Para ver como criar uma tabela no Access leia : Usando o Access para criar um banco de dados e tabelas.
A seguir , veja como criar , passo a passo a aplicação para se conectar com o banco de dados agenda.mdb e acessar a tabela clientes.
1. Inicie um novo projeto (Standard EXE) no Visual Basic, e mude o nome do projeto para adodc na caixa de propriedades, renomeie também o nome do formulário para frmMain
2. Na opção do Menu Project | Components, inclua o Microsoft ADO Data Control 6.0 ao projeto.
 |
 |
| Inserindo o Componente ADO data Control no projeto | O objeto Adodc na Barra de Ferramentas |
3. A seguir inclua o ADO Data Control no formulario frmMain e as caixas de texto como mostrada na figura 1.0 a seguir:
 |
| Figura 1.0 |
Agora configure as propriedades DataSource e DataField das caixas de texto , a propriedade Caption das labels e as propriedades ConnectionString, Command Type e RecordSource do ADO Data Control como de acordo com a tabela 1.0.
Table 1.0 Objetos e propriedades para o formulário frmMain.
OBJETO Propriedade Valor Form Caption Usando ADO para conexão com banco de dados Access ADO Data control Name adodc1 Caption Clientes Align 2 - vbAlignBottom ConnectionString Provider=Microsoft.Jet.OLEDB.3.51;Persist Security Info=False;Data Source=C:\Arquivos de Programas\Microsoft Visual Studio\VB98\agenda.mdb RecordSource Clientes Command Type adCmdTable TextBox Name Text1 Text "" DataSource adodc1 DataField Nome TextBox Name Text2 Text "" DataSource adodc1 DataField Sobrenome TextBox Name Text3 Text "" DataSource adodc1 DataField Endereço TextBox Name Text4 Text "" DataSource adodc1 DataField Cidade TextBox Name Text5 Text "" DataSource adodc1 DataField Estado TextBox Name Text6 Text "" DataSource adodc1 DataField CEP TextBox Name Text7 Text "" DataSource adodc1 DataField Telefone Label Name * Caption *
(*) - Voce deve inserir 7 etiquetas (labels) em seu projeto e nomear cada uma conforme os nomes mostrados na figura 1.0. (para fazer isto selecione a label e pressione F4 alterando a propriedade caption para o nome desejado)
Para configurar as propriedades do ADO data control , clique com o botão direito do mouse sobre o controle e em propriedades clique na propriedade ConnectionString; a janela da figura 2.0 irá surgir na tela:
 |
 |
| Selecionando a Propriedade ConnectionString | Figura 2.0 |
1-) Clique no botão Build... e selecione o provedor: Microsoft Jet 3.51 OLE DB Provider (Figura 3.0). Clique em Avançar... para que a janela da figura 4.0 seja exibida.
 |
 |
| Fig 3.0 Lista de Provedores disponíveis | Fig 4.0 - Seleção do nome do banco de dados |
2-) Clique no botão com reticências(...) para inserir o nome do banco de dados. Na janela da figura 5.0 selecione o banco de dados o qual deseja acessar. Iremos selecionar Agenda.mdb e clicar no botão Abrir.
 |
| Fig 8.0 - Caixa de dialogo para selecionar a base de dados |
3-) Clique em OK e selecione a aba RecordSource (Figura 6.0) . Nela escolha adCmdTable e o nome da tabela, Clientes para o nosso caso. Pronto estamos prontos para fazer a vinculação do formulário aos dados da tabela.
 |
| Fig 6.0 - O tipo de Cursor usado e o nome da tabela para conexão |
Para vincular os TextBox aos campos da tabela , clique com o botão direito do mouse sobre cada TextBox e a seguir configure as propriedades DataSource para Adodc1 e DataField para cada campo da tabela clientes. Figura 7.0
|
|
Vamos vincular cada TextBox a cada campo da tabela para
poder exibí-los. A vinculação deverá ser feita para cada textbox :
- Text1.DataSource = adodc1 e Text1.DataField=Nome - Text2.DataSource = adodc1 e Text3.DataField=Sobrenome - Text3.DataSource = adodc1 e Text3.DataField=Endereco - Text4.DataSource = adodc1 e Text4.DataField=Cidade - Text5.DataSource = adodc1 e Text5.DataField=Estado - Text6.DataSource = adodc1 e Text6.DataField=Cep - Text7.DataSource = adodc1 e Text7.DataField=Teelfone |
| Figura 7.0 - TextBox - Exemplo de Configuração |
As caixas de texto vinculadas ao controle adodc1 |
Como funciona ?
O Controle ADO Data Control faz todo o serviço sem precisar de uma linha de código sequer, para movimentar-se pela tabela clientes basta clicar nas setas indicativas do controle ADO Data Control.
 |
Pressione F5 e veja o projeto em tempo de execução: Voce pode navegar pelos registros clicando nos botôes do controle ADO Data control.
 |
A seguir veremos como editar, incluir , excluir e localizar registros
usando o ADO Data control. 
José Carlos Macoratti |
