Trabalhando com Banco de Dados

Conectando com o banco de dados: ACCESS

Nessa aula vamos aprender como usar as classes ADO.NET para realizar a conexão com o banco de dados ACCESS.

Sempre que formos trabalhar com banco de dados em VB.NET deveremos importar os seguintes namespaces:

Banco de dados Access

  • System.Data
  • System.Data.OleDb

A primeira coisa que você precisa fazer para acessar um banco de dados é criar uma conexão com o banco de dados. Para isto, utilize a classe OleDbConnection. Basicamente você precisa trabalhar com os parâmetros da conexão, conhecidos como “connectionString” ou string de conexão. O objeto OleDbConnection não permite que você atribua dinamicamente valores as propriedades específicas do provider. Você pode atribuí-las somente através da “string de conexão”. A string de conexão pode ser informada como parâmetro no momento em que você instancia um novo objeto ou através do atributo ConnectionString do objeto.

O formato típico de uma “string de conexão” é:
"Provider=Microsoft.Jet.OLEDB.4.0;DataSource=nomeDatabase;User ID = meuUsuario; Password = minhaSenha;".

Parâmetro Descrição
Provider Específica o provider OleDb a ser utilizado.
DataSource Específica o diretório ou nome do arquivo (Ex. c:\prog\Bancodados.mdb)
User Id Específica o usuário do arquivo. Se não for especificado utiliza “Admin” como default.
Password Específica a senha do usuário. Se não for especificado utiliza uma string vazia como default.

 

1) Primeiro coloque os namespace no seu formulário que vai acessar o banco de dados;

System.Data

System.Data.OleDb

2) Depois crie a conexão com o banco de dados;

'Tenta conectar com o banco de dados
Try

Dim oConexao As New OleDbConnection()

'String de conexao
Oconexao.ConnectionString= "PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA Source=c:aulasvbnet\db01\Dados.MDB"

'Abrir a conexao
oConexao.Open()

Messagebox.Show("Conectado")


'Fechar a conexao
oConexao.Close()
MessageBox.Show("Fechado")

Catch oExcep As OledbException

' Ocorreu um erro que é capturado
' pelo objeto de excessões particular
' para o provedor OLEDB

Messagebox.Show("Erro ao conectar com Banco de Dados "& _
controlchars.CrLf & _
oExcep.message & controlchars.CrLf & _
oExcep.source(), "Erro Conexão" )

End Try

 


Dicas:

Ir para: Aula anterior | Proxima aula | Indice de Aulas

 

 

Escreva para nós  Adicione ao Favoritos  Página Principal   Imprima essa página  Sair da Página  Voltar para página anterior

© 1999-2009 POWER Informática - Rua João Manoel, 912 - Centro - Santana do Livramento - RS
Fones: (55) 3 2 4 2 - 5 4 2 7 / (55) 9 9 9 4 - 8 7 8 2

Serviços Manutenção Hardware, programação, páginas Web