DUVIDA - GRAVAR CHAVE ESTRANGEIRA
Pessoal, olá a todos.
Possuo duas tabelas em access chamadas FUNCIONÃRIOS e EMPRESAS.
A tabela FUNCIONÃRIOS possui um campo chamado fk_empresas para receber como chave estrangeira o campo id da tabela EMPRESAS.
Na tela de cadastro de empresas é salvo os dados inseridos e gerado um id como chave primária.
Na tela de cadastro de funcionário possui uma COMBO BOX que carrega o conteúdo do campo nome da tabela EMPRESAS.
Gostaria de saber como posso fazer para pegar o id que se refere ao nome da empresa vinda do combo e gravar na tabela FUNCIONÃRIOS, dentro campo fk_empresas.
Obrigados a todos pela atenção!!
Possuo duas tabelas em access chamadas FUNCIONÃRIOS e EMPRESAS.
A tabela FUNCIONÃRIOS possui um campo chamado fk_empresas para receber como chave estrangeira o campo id da tabela EMPRESAS.
Na tela de cadastro de empresas é salvo os dados inseridos e gerado um id como chave primária.
Na tela de cadastro de funcionário possui uma COMBO BOX que carrega o conteúdo do campo nome da tabela EMPRESAS.
Gostaria de saber como posso fazer para pegar o id que se refere ao nome da empresa vinda do combo e gravar na tabela FUNCIONÃRIOS, dentro campo fk_empresas.
Obrigados a todos pela atenção!!
Dim idEmpresa as string
sql = [Ô]select id from empresas where nome =[ô][Ô] & combobox.Text & [Ô][ô][Ô]
Comando = New MySqlCommand(sql, Conexao)
Dim leitor As MySqlDataReader = Comando.ExecuteReader
If leitor.Read = True Then
idEmpresa = leitor.Item([Ô]id[Ô]).ToString
End If
leitor.Close()
leitor.Dispose()
Conexao.Close()
Conexao.Dispose()
mais ou menos isso
nesse exemplo estou usando mysql
coloca no evento SelectedIndexChanged do combobox
sql = [Ô]select id from empresas where nome =[ô][Ô] & combobox.Text & [Ô][ô][Ô]
Comando = New MySqlCommand(sql, Conexao)
Dim leitor As MySqlDataReader = Comando.ExecuteReader
If leitor.Read = True Then
idEmpresa = leitor.Item([Ô]id[Ô]).ToString
End If
leitor.Close()
leitor.Dispose()
Conexao.Close()
Conexao.Dispose()
mais ou menos isso
nesse exemplo estou usando mysql
coloca no evento SelectedIndexChanged do combobox
Valeu ADHEL!!
select id from empresas where nome =[ô][Ô] & combobox.Text &
Era isso mesmo, joguei esse conteúdo em uma variável e depois joguei essa variável como parâmetro no insert
select id from empresas where nome =[ô][Ô] & combobox.Text &
Era isso mesmo, joguei esse conteúdo em uma variável e depois joguei essa variável como parâmetro no insert
Tópico encerrado , respostas não são mais permitidas