Um dia era pra mostrar coisas sobre o excel, hoje é para compartilhar meus poucos conhecimentos, com os interessados!

terça-feira, 5 de junho de 2012

Access - Aplicações com Jet 4.0






 A associação de mdb, pelo modo jet.
   Uma das formas mais eficazes, pois evita a criação de aplicações com tabelas vinculadas.

   Evitando congestionamento na rede e lentidão em sua aplicação, e  até estouro do seu banco de dados por falha de armazenagem no access.


Exemplo: 

Public DB As Database 'Public pois é uma variável publica, ou seja ela se transfere para outro comando de objeto, definimos o DB como um Banco de dados
Public Servidor As String 'Servidor uma string "uma variável de texto"

Servidor = "Caminhodobanco.mdb"
Set DB = OpenDatabase(Servidor) 'Define a variavel DB com o caminho do banco de dados
Set nform = Db.OpenRecordset("select nome_about from TB_ORIGENS;") ' Exemplo de aplicação de Sql via jet
msgbox nform(0) 'Retorna uma caixa de mensagem com o valor da SQL, variavel nform(0)
Set DB = Nothing ' Limpa a variável