PESQUISAR EM BANCO DE DADOS VISUAL BASIC 2008
Ola pessoal do forum
Estou começando em visual basic 2008 e gostaria de fazer uma agenda telefonica bem simples, ela é constituida de três TextBoxs(TextBoxNome,TextBoxTelefone,TextBoxEmail) e um Button de pesquisa (ButtonPesquisa).
Já conssegui criar um banco de dados no Acces com o nome de Agenda e uma tabela com o nome de Lista, porém não consigui entender como faço para pesquisar um determinado dado, por exemplo: Eu digito um nome no TextBoxNome depois aperto o ButtonPesquisa, depois disso as TextBoxs TextBoxTelefone e TextBoxEmail se completam sozinhas com os dados do banco de dados.
Já dei uma olhada no site http://www.macoratti.net, mas não conssegui aplicar em meu programa.
Estou começando em visual basic 2008 e gostaria de fazer uma agenda telefonica bem simples, ela é constituida de três TextBoxs(TextBoxNome,TextBoxTelefone,TextBoxEmail) e um Button de pesquisa (ButtonPesquisa).
Já conssegui criar um banco de dados no Acces com o nome de Agenda e uma tabela com o nome de Lista, porém não consigui entender como faço para pesquisar um determinado dado, por exemplo: Eu digito um nome no TextBoxNome depois aperto o ButtonPesquisa, depois disso as TextBoxs TextBoxTelefone e TextBoxEmail se completam sozinhas com os dados do banco de dados.
Já dei uma olhada no site http://www.macoratti.net, mas não conssegui aplicar em meu programa.
Vc precisa estudar acesso a dados com .Net. este é um bom artigo: http://www.macoratti.net/ado_net1.htm
Leia com calma. Anote e atente à relação entre os objetos envolvidos no texto. Não sai colando no seu código.
Leia com calma. Anote e atente à relação entre os objetos envolvidos no texto. Não sai colando no seu código.
Coloque um DATAGRID no seu projeto e altere os dados do banco de dados e veja o resultado o resto é contigo.
Private da As SqlDataAdapter
Private ds As DataSet
Dim myConnectionString As String = [Ô]Data Source=SEU_SERVIDOR;Initial Catalog=SUATABELA;Persist Security Info=True;User ID=USUARIOBANCO;Password=SENHABANCO[Ô]
Dim connection As New SqlConnection(myConnectionString)
Dim SQL As String = [Ô]SELECT * FROM pessoas[Ô]
da = New SqlDataAdapter(SQL, connection)
ds = New DataSet
da.Fill(ds, [Ô]pessoas[Ô])
Me.DataGridView1.DataSource = ds.Tables([Ô]pessoas[Ô])
connection = Nothing
Private da As SqlDataAdapter
Private ds As DataSet
Dim myConnectionString As String = [Ô]Data Source=SEU_SERVIDOR;Initial Catalog=SUATABELA;Persist Security Info=True;User ID=USUARIOBANCO;Password=SENHABANCO[Ô]
Dim connection As New SqlConnection(myConnectionString)
Dim SQL As String = [Ô]SELECT * FROM pessoas[Ô]
da = New SqlDataAdapter(SQL, connection)
ds = New DataSet
da.Fill(ds, [Ô]pessoas[Ô])
Me.DataGridView1.DataSource = ds.Tables([Ô]pessoas[Ô])
connection = Nothing
Olha aqui um ótimos exemplo para você:
http://www.macoratti.net/vb_aglvw.htm
http://www.macoratti.net/10/03/vbn_lstv1.htm
Me pontue se te ajudei. vlw
http://www.macoratti.net/vb_aglvw.htm
http://www.macoratti.net/10/03/vbn_lstv1.htm
Me pontue se te ajudei. vlw
Tópico encerrado , respostas não são mais permitidas