Usando Access

Acessando dados da Web - parte 2

Nota importante: para ter acesso aos vídeos e arquivos exemplos deste site, adquira um dos planos apresentados abaixo. Você pode comprar em até 5x no Cartão de Crédito, através do Paypal. 

Veja como comprar e saiba mais sobre o material oferecido,  clicando aqui.

De Jefferson Braz

No último artigo, demonstrei como realizar, de modo simples, a conexão entre um front-end Access e uma base de dados MySQL na Web.

Agora, vou refinar um pouco mais a técnica, tornando-a mais eficiente e otimizar a conexão com a base de dados que poderá oscilar em virtude da velocidade e tráfego no servidor.

O objetivo deste artigo não é ensinar a utilização e a configuração do MySQL, mas sim, possibilitar o primeiro contato com o referido banco de dados. Não pretendo me ater a determinados detalhes e conceitos que, a meu ver, são de conhecimento básico de qualquer bom programador em Access. Também não vou me aprofundar nas ferramentas propostas e na questão dos prós e contras em relação aos métodos empregados. Tenho o propósito de me concentrar na criação da base de dados, de forma simples e rápida; na otimização da conexão entre o Access e o MySQL e no modo de colocar o código para trabalhar a nosso favor, fazendo com que tenhamos que digitar a menor quantidade possível de código.

Assim sendo, resumi alguns aspectos e alguns códigos para que este artigo tenha em sua lógica: início, meio e fim. A intenção consiste em concluir o conceito aqui proposto, sem que haja a necessidade de desdobrar este artigo em dois ou três.

Maiores informações sobre o banco de dados MySQL ou das ferramentas utilizadas, poderão ser obtidas diretamente no site do fabricante.

Neste artigo será demonstrado apenas:

1. Como criar uma base de dados no servidor Web.
2. Como criar tabelas na base de dados.
3. Como realizar conexão otimizada à base de dados.

Como criar uma base de dados no servidor Web

A maneira de se criar uma base de dados, em qualquer provedor, é a mesma. O que muda é a disposição dos comandos, dependendo do tipo e da versão do painel de controle.

Você observará que não é muito diferente da logística no próprio Access:

1. Primeiro criamos a base de dados.
2. Definimos usuário e senha.
3. Criamos nossas tabelas e consultas.

Neste exemplo,  utilizo como base, o painel de controle do UOL.

Após acessar o painel de controle, o primeiro passo é clicar no comando Banco de Dados, como mostra na figura abaixo:

Em seguida, será aberta uma nova página com a relação de todos os bancos de dados criados.

 
Um dos servidores mais rápidos que encontrei na Web foi o do UOL, mas ele tem uma grande desvantagem quanto à sua configuração: você não pode personalizar o nome do banco de dados e o usuário. Ele sempre será a seqüência do nome do seu domínio. Assim, o campo descrição é útil para informações sobre a utilização do banco de dados.

Nesta janela vamos clicar no botão Criar Banco de Dados para criar o nosso banco de dados. Será aberta a janela Criar Banco de Dados, na qual serão definidas as seguintes configurações:

O próximo passo consiste em criar tabelas e consultas, em nossa base de dados.

Nota: diferente do painel Plesk, do primeiro artigo, não há necessidade de criar uma DNS para conexão. O provedor UOL suporta a conexão externa, sem a necessidade da criação da DNS.

Como criar tabelas na base de dados

Para trabalhar a estrutura do nosso banco de dados, podemos utilizar o phpMyAdmin, clicando na opção Administrar.

Realizando esta operação,  haverá o redirecionamento para o phpMyAdmin, onde será possível administrar através do browser.

Particularmente, prefiro uma ferramenta que permita a conexão à banco de dados, diretamente através do desktop, evitando assim, perdas momentâneas da conexão ou time-up de conexão com o servidor.

Existem várias ferramentas no mercado. Em minha opinião, uma das melhores é a SQL Front.

MySQL Front é um gerenciador gráfico de banco de dados MySQL. Oferece uma interface mais refinada do que sistemas construídos em PHP e HTML. A resposta é imediata, pois não há demora alguma para recarregar páginas HTML.

Com este aplicativo, o trabalho com bancos de dados de MySQL ganha muito mais liberdade, pois não esconde a linguagem do usuário.   As informações são apresentadas na tela com bastante clareza. O Editor também permite um uso prático quando se trabalha com scripts e comandos de SQL.

O MySQL Front traz uma interface muito próxima ao MS Access, o que propicia ao usuário, sensação de conforto em sua utilização.

Você pode baixar o SQL Front, em sua última versão 5.1, nos links abaixo:

 
Criando nossa conexão

O primeiro passo é criarmos a nossa conexão com a nossa base de dados na Web.

Execute o SQL Front.  Por padrão, o aplicativo ao ser iniciado abrirá a janela Open Session que lista todas as conexões criadas ao servidor e permite a criação de uma nova conexão.

Para criar uma nova conexão, clique no botão New. Será aberta a janela Properties, onde você definirá a conexão ao seu banco de dados.

Ela é composta por 04 guias básicas:

Geral: definição de um nome e um ícone para sua conexão.

Name: definição de um nome para sua conexão.
Icone: seleção de um ícone para facilitar a identificação da sua conexão.

Connection: nessa guia, você informará a rota do seu servidor MySQ e a porta de conexão com o mesmo.

Server: informa o nome do servidor da base de dados. Neste exemplo nossa rota do servidor é dbmy0012.shservidor.com
Port: a porta de conexão padrão para conexão externa é a 3306.

Login: nessa guia você informa o nome do usuário, senha e nome do banco de dados para conexão.

User: nome do usuário criado para gerenciar o banco de dados.
Password: senha do seu banco de dados.
Database: nome do banco de dados a ser conectado. Se o banco de dados for informado, a conexão será direcionada para conexão automática à base de dados informada.

Uma vez informado os dados da sua conexão, clique no botão OK. Você será redirecionado para a janela Open Session, onde escolherá a conexão criada e clicará no botão ‘Open’ para abrir a conexão com a base de dados selecionada.

Vamos conhecer agora as 03 janelas básicas da aplicação:

1. Location Bar: a rota na Web da sua base de dados.
2. Navigator: serão listadas todas as tabelas do seu banco de dados.
3. Object browser: exibe informações sobre o objeto selecionado.

Nota: observe que foi listada uma série de tabelas com o prefixo jos_.  As tabelas são utilizadas pelo Joomla. Elas não devem ser removidas, renomeadas ou terem a sua estrutura alterada, pois isso fará com que o site deixe de funcionar.

Criando nossa tabela

Vamos iniciar agora o processo de criar tabelas no MySQL Front.

O primeiro passo é clicar sobre o nome do banco de dados desejado. Neste exemplo o banco de dados é o kartoffel_2. Em seguida, clicamos na opção Database e depois em New. Será listada uma série de opções. Clique na opção Table, como mostra a figura abaixo:

Será exibida a janela Add Table. Ele é a responsável por receber o nome da sua tabela e as configurações referentes ao seu comportamento. Por enquanto vamos nos concentrar em somente dar uma nome para sua tabela.

Na guia General na opção name vamos nomear nossa tabela.

Diferente do Access, por padrão, será automaticamente criado um campo chamado ID. Ele será automaticamente uma chave primária e campo auto-numeração.

Para confirmar a criação da tabela, basta clicar no botão OK.

Sua nova tabela será salva e automaticamente listada na guia Navigator.  O próximo passo é criar os demais campos da nossa tabela.

Para isso, clique no nome da sua tabela e clique na opção Add Field.  Será aberta uma janela aonde você informará o nome e o tipo do seu campo.

O campo Type é o nosso Tipo de Dados no Access.

Os campos no Access e no MySQL são diferentes um pouco quanto suas funcionalidades e características, assim, como no SQL Server. Vale ficar atento ao tipo de campo a ser utilizado, para que não haja comprometimento dos dados salvos, em virtude do formato dos dados configurados.

Para um melhor entendimento dos tipos de campos no MySQL, consulte o Manual de Referência do MySQL em: http://dev.mysql.com/doc/refman/4.1/pt/column-types.html

Diferente do Access, no qual criamos todos os campos antes de salvar a nossa tabela, no SQL Front, os campos são criados um a um e vão sendo salvos automaticamente na estrutura da nossa tabela.

À medida que os campos vão sendo criados, eles vão povoando nossa Object Browser.

Nota: Para maiores informações sobre MySQL, consulte o seu manual de referência em: http://www.baixaki.com.br/download/mysql-manual.htm

Como realizar conexão otimizada à base de dados

No último artigo, demonstrei como realizar a conexão ao banco de dados.  Neste artigo informei que tratava-se de uma "demonstração de como realizar o procedimento” e que havia formas mais eficientes de conectar-se à uma base de dados.  Vamos agora abordar uma forma mais eficiente de se conectar à base de dados.

No último exemplo, nós abrimos uma conexão com a base de dados e ficamos conectados ao banco de dados.  O método nos favoreceu, visto que pudemos contar com recursos nativos do Access, como salvar e excluir dados, utilizando comandos diretos do Access, através do docmd.

Contudo,  ficamos sensíveis a fatores adversos como: instabilidade na velocidade da conexão, time-up do servidor, que poderia  abortar a nossa conexão ao banco de dados, sem sermos avisados. Sem falar que a forma de conexão limita a quantidade de usuários conectados ao banco de dados, visto que ficamos com a conexão “aberta” para a manipulação de dados.

Vamos trabalhar agora com códigos que evitam esses problemas, permitindo uma conexão mais inteligente ao nosso banco de dados. Para isso vamos usar e abusar do nosso amigo ADO – Access Data Object.

Entendo que muitos programadores em Access evitam utilizar o ADO, principalmente quando temos o JET ao nosso dispor, o que nos poupa de digitarmos grande quantidade de códigos para conexão. Contudo, o ADO nos dá o maior controle da conexão que estamos estabelecendo, sem falar que aceleramos a manipulação de dados e aumentamos, em muito, a quantidade de usuários trabalhando com o banco de dados ao mesmo tempo.

Quando trabalhamos com uma base de dados na Web,  utilizarmos o ADO ,  torna-se imprescindível.

A melhor maneira de fazer essa operação é não criar um vínculo permanente com a base de dados. O certo é abrir a conexão com o banco de dados, carregar os dados desejados e fechar novamente a conexão, liberando, assim, recursos para outro usuário realizar operações. O que conhecemos como forms desvinculados.

Eu trabalho, tu trabalhas e o ADO... deu trabalho

Como dito anteriormente, quando trabalhamos com ADO , a quantidade de dados que temos que digitar é bem maior que quando utilizamos o JET

No JET criamos conexão com a base de dados e o Access faz o resto.

Se vamos trabalhar com base de dados desvinculadas, temos que estabelecer a conexão em tempo de execução, abrindo a conexão e alimentando os dados campo a campo.

Vamos supor que tenhamos uma tabela chamada meus_dados. Nesta tabela temos 45 campos e vamos utilizar todos, em nosso formulário.

Dim MyCon
Dim DBase
MyCon = "Select * from meus_dados”
DBase = “c:\MinhaPasta\minha_base.accdb”
Set DB = DBEngine.Workspaces(0).OpenDatabase(DBase)
Set rst = DB.OpenRecordset(MyCon)

Me.controle_1 = rst(1)value
Me.controle_2 = rst(2).value
Me.controle_3 = rst(3).value
Me.controle_4 = rst(4).value
Me.controle_5 = rst(5).value
Me.controle_6 = rst(6).value
Me.controle_7 = rst(7).value
Me.controle_8 = rst(8).value
Me.controle_9 = rst(9).value
Me.controle_10 = rst(10).value
Me.controle_11 = rst(11).value
Me.controle_12 = rst(12).value

(…)

rst.close

E lá vai código…. só de ver a parte do código, já cansou a vista.  Agora vamos imaginar 100 tabelas com 100 formulários na mesma situação.  Já pensou na mão de obra?

Nesta linha de raciocínio é lógico que qualquer programador em Access vai evitar trabalhar com ADO. Imagine o tempo para desenvolver a aplicação e as implicações na escrita do código.

Vai dar trabalho, correto? Errado! Observe o código abaixo:

Dim FormAberto As Form
Dim Controle As Control

Set FormAberto = Forms(ForMy)

For Each Controle In FormAberto

 If Controle.ControlType = acTextBox Then

  FormAberto.Controls(Controle.Name) = rst(Controle.Name).Value

 End If

Next

rst.Close 'Encerra a conexão com o recordeset
cn.Close 'Encerra a conexão com a base de dados

Tecnicamente ele faz a mesma operação que o código anterior, contudo de uma forma dinâmica e inteligente, uma vez que a função pega o campo do seu formulário e carrega o dado correspondente ao campo da tabela.

Existe um ditado que eu aprecio muito: se a vida lhe deu um limão, faça uma limonada.

Vamos trazer essa lição para cá: se o ADO lhe deu um limão, deixa que o VBA faça uma limonada.

Deixando o código trabalhar por você

Preparamos um conjunto de funções básicas que vai fazer todo o trabalho braçal para você. De agora em diante, trabalhar com ADO e Recordeset, vai ser moleza.

Através deles você realizará rapidamente as seguintes etapas:

1. Conectar-se ao servidor.
2. Extrair os dados .
3. Alimentar o formulário.

Vamos realizar uma conexão à tabela criada contatos na nossa base de dados, utilizando as funções propostas.

Para não tornar o artigo ainda mais extenso, vamos descrever as funções que serão utilizadas. As funções poderão ser acompanhadas no exemplo disponibilizado.

1. Conectar-se ao servidor

a. MySQL_Server: carrega os dados de conexão com base em uma tabela.
b. Conexao_Open: abre a conexão com a tabela desejada.

2. Carrega dados da conexão aberta

a. Lista_Load: carrega os dados da conexão aberta e alimenta uma caixa de listagem.
b. Lista_Select: popula o formulário com base no registro selecionado na caixa de listagem.

3. Manipula dados

a. Add_MySQL: inclui novos dados na tabela.
b. Updade_MySQL: atualiza os dados selecionados.
c. Limpa_Campos: limpa os campos da tabela.
d. Delete_MySQL: deleta os dados selecionados.

As funções foram criadas para permitir que você preocupe-se apenas com recordeset desejado, bastando que para isso, o nome do controle nos formulários, seja o mesmo nome do campo na tabela. É suficiente abrir a conexão através do ADO, seja ela qual for e utilizar as funções para manipular os dados carregados.

Vejamos o exemplo abaixo:

Add_MySQL(sMySQL, FrMy)

Updade_MySQL: nome da função.
sMySQL: dados do recordeset a ser processador.
FrMy: formulário que sofrerá a ação da função.

A função ficaria assim:

Call Add_MySQL(“select * from contatos”, me.form.name)

A função tratará os campos a serem alimentados com base na quantidade e tipo de campos informados no formulário.

Utilizando as funções no seu formulário desacoplado

No nosso arquivo de exemplo, você encontrará o formulário ‘contatos’. Ele possui 06 (seis) controles do tipo caixa de texto, 05 (cinco) botões e uma caixa de listagem.

A nossa função realizará a conexão à base de dados e povoará o formulário, com base no nome dos campos do formulário.

1. Carregar: receberá a função que recupera todos os registros da tabela.
2. Excluir: será responsável pela exclusão do registro selecionado.
3. Salvar: será responsável por salvar o registro selecionado.
4. Novo: limpará o formulário para receber os novos dados.

Observe que o formulário encontra-se desacoplado da base de dados. A nossa função será responsável por alimentar a caixa de listagem, e posteriormente povoar o formulário.

Observe que os nomes dos campos são os mesmos nomes da tabela. Assim tudo que precisamos fazer é configurar corretamente as funções.

A primeira tarefa é alimentar a caixa de listagem presente em nosso formulário. Como a caixa de listagem vai recuperar todos os registros da nossa tabela no servidor, utilizaremos um recordset que recupera todos os registros.

Abaixo, apresentarei códigos de forma resumida para que fique claro o respectivo entendimento. No exemplo para download, os códigos estão devidamente formatados dentro de um contexto para utilização.

O primeiro passo é carregar os dados em nosso formulário. Para isso vamos utilizar a função lista_load no botão carregar:

Private Sub carregar_Click()

   Call Lista_Load("select * from contatos order by nome_contato", Me.Form.Name)

End Sub

Uma vez carregada a caixa de listagem, precisamos carregar os dados selecionados na mesma. Para isso utilizaremos a função lista_select, como abaixo:

Private Sub Lista_Click()

  Call Lista_Select("select * from contatos where Id=" & Me.Lista.Column(0), Me.Form.Name)

End Sub

Agora que já sabemos como carregar os dados em nosso formulário, vamos configurar os botões que realizarão a manipulação dos dados.

Para excluir o registro selecionado, vamos utilizar a função Delete_MySQL.

Private Sub Excluir_Click()

 Call Delete_MySQL("select * from contatos where Id=" & Me.Lista.Column(0), Me.Form.Name)

End Sub

O botão ‘novo’ trabalhará em conjunto a o botão ‘salvar’.

O botão novo receberá a função Limpa_Campos, que irá preparar o formulário para receber os novos dados.

Private Sub Novo_Click()

    Limpa_Campos (Me.Form.Name)

End Sub

O botão Salvar será responsável por salvar novos dados e atualizar dados selecionados.

Private Sub Salvar_Click()

If IsNull(Me.Id) Then

Call Add_MySQL("select * from contatos", Me.Form.Name)

Else

Call Updade_MySQL("select * from contatos where Id=" & Me.Lista.Column(0), Me.Form.Name)

End If

End Sub

Com isso, adicionamos em nosso formulário, todos os códigos necessários para realizar o carregamento e a manipulação dos dados relacionados a tabela contatos na nossa base de dados MySQL na Web.

O exemplo disponibilizado foi testado através de uma conexão 2G, com velocidade nominal de 156 Kbps.

Para carregar a caixa de listagem, cronometramos 6,73 segundos um total de 96 registros, e para carregar os dados selecionados 1,37 segundos.

Nos laboratórios da Kartoffel, com conexão nominal de 7 MB, o modelo de conexão e manipulação dos dados foram cronometrados 1,23 segundos para carregar em uma caixa de listagem, aproximadamente 920 registros.

O tempo de resposta com conexão acima de 5 MB foi tão bom, que clientes aderiram ao conceito de trabalhar com aplicações desktop com base de dados totalmente na Web.

Com isso, posso afirmar com certeza que, o Access como front-end em desktops, com conexão em base de dados em servidores HTTP, se tornaram uma realidade cada vez mais presente, uma vez que preservamos toda a flexibilidade e modelagem que o Access nos oferece.

No próximo artigo da série, apresentaremos códigos de conexão mais refinados e dinâmicos para carregamento e manipulação dos dados carregados, bem como maiores detalhes sobre o MySQL Front.

Enquanto isso, sinta-se à vontade para fazer as adaptações necessárias aos códigos para atender ao seu dia a dia.

Segue abaixo, o banco de dados, em Access, para você realizar os testes de conexão.

Antes de rodar o aplicativo, você irá precisar instalar o drive ODBC do MySQL. 

Clique aqui para baixar o drive MySql ODBC 5.1.10

AccessWeb2.zip

Até o próximo artigo!

Jeferson Braz é programador em MS Access e Visual Basic com mais de 17 anos de experiência. 

Diretor de Desenvolvimento da Kartoffel Desenvolvimento de Sistemas Ltda, empresa especializada 

em Microsoft Access e CMS Joomla.  

Atua no mercado de desenvolvimento de aplicações customizáveis, realizando integração MS Access 

à base de dados web e a websites, suporte e manutenção. 

http://www.kartoffel.com.br

Artigos Relacionados

Acessando dados da Web - parte 1

Acessando dados da Web - parte 3

| Home | Vídeos | Tutoriais | Dicas | Ribbons | Suporte | Downloads | Contato | Artigo |