DevMedia
Você precisa estar logado para dar um feedback. Clique aqui para efetuar o login
Para efetuar o download você precisa estar logado. Clique aqui para efetuar o login
post favorito     comentários

Inserindo dados no banco Microsoft Access com codificação em VB.NET

Inserindo dados no banco Microsoft Access com codificação em VB.NET de maneira rápida e descomplicada.

[fechar]

Você não gostou da qualidade deste conteúdo?

(opcional) Você poderia comentar o que não lhe agradou?

Confirmo meu voto negativo

Ola a todos,

Vejo que a cada dia mais e mais pessoas se aventuraram no mundo do desenvolvimento de sistemas. Sistemas que vão desde ao Controle de Gastos Mensais a um arrojado Controle de Empréstimo de DVD’s, CD’s Roupas, Dinheiro entre outros e que ainda envia mensagens e e-mails a aos amigos mais folgados... E fale a verdade, quem não tem um amigo mala, que tudo que vê quer emprestado, mas o problema não é emprestar e sim reaver novamente o bem não é mesmo?

                Bem, mas voltando ao nosso assunto.  Após a iniciativa de construir seus próprios projetos, deixar as telas do sistema de acordo com o grau de felicidade do desenvolvedor, vem a parte mais trabalhosa e penosa desta aventura, ou seja, a codificação propriamente dita, e é nesta etapa que a grande maioria se perde ao longo do caminho, sendo que muitos desses futuros gurus da TI esbarram em um dos maiores vilões do mundo da programação. Pergunte para um grande gênio do desenvolvimento de sistemas se um dia ele não teve problemas em diferenciar a funcionalidade de uma aspas simples de aspas duplas em um código SQL... Com certeza meu amigo, ele vai pensar um pouco antes de responder...   Logo para quem deseja trabalhar com aplicações web, que utilizam consultas ao banco de dados, vai ai uma dica de como funciona... Estou partindo da idéia de que todos já saibam trabalhar com os componentes do Visual Studio 2005... Se não, vale a pena dar uma olhadinha antes... Informamos no neste exemplo estaremos utilizando o banco de dados Microsoft Access.

                Então mãos a obra: No ambienta do Visual Studio abra a view toobox e crie 04 Textbox e 01 Button.

                De um duplo clique no Button. Não precisa pensar duas vezes, selecione todo o código gerado para aquele botão e substituta pelo código abaixo.

                Concordo com muitos colegas que me falam que isso se torna um pouco ant - didático, pois estou omitindo totalmente a explicação de cada método. Bem com relação a este pequeno deslize da minha parte, creio e torço que futuramente aqueles que conseguirem gravar os dados, estarão tão animados que virarão noites e noites para entender cada linha deste pequeno código que estou disponibilizando, e ainda, estarão me corrigindo em falhas que aqui porventura se encontram.  Agora só peço um pouco de atenção para renomear as palavras que eu coloquei em vermelho. Como o nome da sua classe que deve ser na verdade o nome que você deu a seu web form... E também o caminho do seu arquivo Microsoft Access.


Imports
System.Data.OleDb
Partial Class Nome da Clase
Inherits System.Web.UI.Page

Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
            TextBox4.Text = Now.Date.ToShortDateString()

End Sub

Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click

               Dim sql As String
               Dim
conn As OleDbConnection
               Dim cmd As OleDbCommand

                  sql = "INSERT INTO nome_tabela(campo_da_tabela1,  campo_da_tabela2, campo_da_tabela3, campo_da_tabela4)"
                  
sql = sql & " values (" & TextBox1.Text & ", " & TextBox2.Text & ", " & TextBox3.Text & ", " & TextBox4.Text & ")"
                  
conn = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=d:\teste.mdb")

O Source indica o caminho do banco, aqui no caso diz que esta no diretório Drive:\nome_do_banco.mdb

               conn.Open()
               cmd = New OleDbCommand(sql, conn)
               Try
                     
cmd.ExecuteNonQuery()
               Catch ex As Exception
                     Response.Write(ex.ToString())
               Finally
            
              conn.Close()
               End Try

              Limpar os campos textbox

               TextBox1.Text = ""
               TextBox2.Text = ""
               TextBox3.Text = ""
               TextBox4.Text = ""

         End Sub

End Class

                Não Esqueçam,  para que seja possível inserir alguma informação no seu banco Microsoft Access é preciso que antes você o crie e coloque todos os campos necessários. No nosso exemplo criei no Microsoft Access um arquivo chamado teste com 04 colunas, sendo que cada coluna será chamada de: campo_da_tabela1, campo_da_tabela2, campo_da_tabela3, campo_da_tabela4. 

                Agora é só receber os dados através da: " & TextBox1.Text & ", " & TextBox2.Text & ", " & TextBox3.Text & ", " & TextBox4.Text & "

               

                É isso ai... Espero poder ter ajudá-los, pois esta é a minha maior intenção. Qualquer dúvida é só mandar um e-mail.

                Ate a próxima!

                Daniel Couto



Bacharel em Ciência da Computação pelo Centro Universitário de Brasília -UniCEUB. Pós Graduando em Gestão de Banco de Dados. Desenvolvedor em C#, VB.NET e JAVA J2EE. Atualmente trabalhando como DBA em uma empresa na área de Aviaçã [...]

O que você achou deste post?
Conhece a assinatura MVP?
Publicidade
Serviços

Mais posts