












Estude fácil! Tem muito documento disponível na Docsity
Ganhe pontos ajudando outros esrudantes ou compre um plano Premium
Prepare-se para as provas
Estude fácil! Tem muito documento disponível na Docsity
Prepare-se para as provas com trabalhos de outros alunos como você, aqui na Docsity
Encontra documentos específicos para os exames da tua universidade
Prepare-se com as videoaulas e exercícios resolvidos criados a partir da grade da sua Universidade
Responda perguntas de provas passadas e avalie sua preparação.
Ganhe pontos para baixar
Ganhe pontos ajudando outros esrudantes ou compre um plano Premium
Saiba como criar um banco de dados usando o visual data manager e como realizar operações básicas, como inserir, editar, excluir e consultar registros usando visual basic e ado. Passos detalhados e códigos para criar uma nova base de dados, criar tabelas, adicionar campos e inserir registros.
Tipologia: Notas de estudo
1 / 20
Esta página não é visível na pré-visualização
Não perca as partes importantes!













Criando banco de dados usando o Visual Data Manager
Você deve escolher um diretório para onde desejasalvar o arquivo e informar o nome do banco dedados a ser criado.
Clique com o botão direito do mouse na área livre dajanela
Database Window
. Clique na opção
New
table
É nesta janela que iremos criar a nossa tabela. Informe onome da tabela que deseja criar na linha
Table Name
Após informar todos os campos de sua tabela você deveráobter um resultado parecido com o exibido abaixo. Clique nobotão
Build the Table
para criar a tabela em seu banco de
dados.
Efetuando acesso à banco de dados pelo VB
Conexão com banco de dados utilizando ADOAbrindo a conexão 'cria a variável de conexãoPublic cn As New ADODB.Connection'Abre a conexão com banco de dadoscn.Open "Provider = Microsoft.Jet.OLEDB.4.0;Data
Source = Teste.mdb" Fechando a conexão 'Fecha a conexão com banco de dadoscn.CloseSet cn = Nothing
Efetuando Update de um registro 'String com comando SQLstrSQL = "Update Teste set Descricao = '" & Text
& "' where Codigo = " & Text 'executa o comando SQL, usando a conexãocn.Execute strSQL
Efetuando Delete de um registro 'String com comando SQLstrSQL = “Delete from Teste where Codigo = " & Text 'executa o comando SQL, usando a conexãocn.Execute strSQL
Efetuando o tratamento do resultado da consulta ‘Loop do recordsetDo While not rs.EOF
ou^
Do Until rs.EOF
.....rs.MoveNext Looprs.Close
Métodos de movimentação em Recordset