[NOVATO] CARREGAR DADOS DO BANCO NA TEXTBOX VB 6
Ola pessoal, desculpa a ignorância,
Gostaria de saber como faco para carregar informações do banco nas textbox?
Por exemplo tenho um cadastro de clientes e quando eu chamar o form ele já trazer as informações como Nome, Endereco, Cep que ja estao salvos no banco, pois irei criar botoes para navegar entre os dodos no banco...tipo um avancar, retornar etc..
Desde ja Obrigado
Gostaria de saber como faco para carregar informações do banco nas textbox?
Por exemplo tenho um cadastro de clientes e quando eu chamar o form ele já trazer as informações como Nome, Endereco, Cep que ja estao salvos no banco, pois irei criar botoes para navegar entre os dodos no banco...tipo um avancar, retornar etc..
Desde ja Obrigado
colega faça consultas aqui no site mesmo
pesquise por agenda, geralmente as agendas possuem todos comandos basicos para conexão e navegação
pesquise por agenda, geralmente as agendas possuem todos comandos basicos para conexão e navegação
Já obteve uma resposta,porém se tiver dúvidas
faça um post da DÙVIDA.
Valeu.
faça um post da DÙVIDA.
Valeu.
vc pode usar assim
Dim conectar As MySqlConnection
[ô]conecta à base de dados
conectar = New MySqlConnection()
conectar.ConnectionString = [Ô]server=localhost; uid=aca; pwd=thc133; database=rh_online[Ô]
Dim reader As MySql.Data.MySqlClient.MySqlDataReader
Dim cmd As MySql.Data.MySqlClient.MySqlCommand
cmd = New MySql.Data.MySqlClient.MySqlCommand([Ô]SELECT matricula, nome, funcao FROM cad_funcionarios WHERE nome = [ô][Ô] & txtnomefuncionario.Text & [Ô][ô][Ô], conectar)
conectar.Open()
reader = cmd.ExecuteReader
While reader.Read
txtmatricula.Text = reader([Ô]matricula[Ô])
txtnomefuncionario.Text = reader([Ô]nome[Ô])
txtfuncao.Text = reader([Ô]funcao[Ô])
End While
conectar.Close()
Dim conectar As MySqlConnection
[ô]conecta à base de dados
conectar = New MySqlConnection()
conectar.ConnectionString = [Ô]server=localhost; uid=aca; pwd=thc133; database=rh_online[Ô]
Dim reader As MySql.Data.MySqlClient.MySqlDataReader
Dim cmd As MySql.Data.MySqlClient.MySqlCommand
cmd = New MySql.Data.MySqlClient.MySqlCommand([Ô]SELECT matricula, nome, funcao FROM cad_funcionarios WHERE nome = [ô][Ô] & txtnomefuncionario.Text & [Ô][ô][Ô], conectar)
conectar.Open()
reader = cmd.ExecuteReader
While reader.Read
txtmatricula.Text = reader([Ô]matricula[Ô])
txtnomefuncionario.Text = reader([Ô]nome[Ô])
txtfuncao.Text = reader([Ô]funcao[Ô])
End While
conectar.Close()
Vlw ae Pessoal...principalmente ao ROBFERREIRA que postou um exemplo...
Muito Obrigado...
Problema Resolvido!
ABRAÇOOOOOO
Muito Obrigado...
Problema Resolvido!
ABRAÇOOOOOO
Tópico encerrado , respostas não são mais permitidas