USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Inserção de registros na mesma tabela
Michel Morgado
SAO PAULO
SP - BRASIL
ENUNCIADA !
Postada em 09/10/2007 08:48 hs            
Bom Dia,
 
Eu e minhas duvidass hehe ..
 
Como faço para inserir um registro com campos e tabelas diferentes ?
 
Exemplo:
 
tbl_registros
Campo                    Tipo
codigo                    Autonumeração
num_matricula          Texto
nom_func                Texto
des_cpf                  Texto
 
tbl_registros_compl      Tipo
codigo                       Autonumeroação
num_matricula             Texto
nom_func                   Texto
des_cpf                      Texto
dat_ferias_1                Texto
dat_ferias_2                Texto
 
Dai meu codigo está assim:
 
Insert into tbl_registros (num_matricula, nom_func, des_cpf) Values ('" _
sql = sql & Trim(txtnumeromatricula.text) & "','" &
sql = sql & Trim(txtnomefuncionario.text) & "','" &
sql = sql & Trim(txtnumerocpf.text) & "')"
 
Nomedaconexão.execute sql
 
Blz .. está funcionando corretamente para inserir o registro na primeira tabela.

Agora eis a questão ...

Como faço para que o num_matricula, nom_func e des_cpf seja inserido nas duas tabelas ( tbl_registros, tbl_registros_compl ) ?
 
E como faço o sql ? Tipo ligando as duas tabelas ?
 
Desde já grato.
 
   
João Carlos jr.
RIBEIRÃO PRETO
SP - BRASIL
ENUNCIADA !
Postada em 09/10/2007 09:12 hs            
Michel Morgado, analisando a sua tabela pude perceber que podemos modificar ela para ficar ainda mais correto.
 
TblRegistros
CodRegistro         AutoNumeração
Campo                Tipo
Num_Matricula      Numero
Nom_Func            Texto
Des_Cpf               Texto
 
TblRegistros_Compl
CodCompl            Auto
CodRegistro         Numero
Dat_Ferias1         Date
Dat_Ferias2        Date
 
Agora sim vc pode fazer uma ligação entre essas tabelas, sendo que o campo codregistro da tabela TblRegistros_Compl se torna uma chave extrangeira, com as tabelas assim vc pode criar uma consulta (viewer) dentro do seu banco de dados, ou vc pode fazer essa ligação por meio de sql mesmo, mas criando uma consulta dentro do banco simplifica muito o seu código.
 
SELECT * FROM (TblRegistros INNER JOIN TblRegistros_Compl ON TblRegistros.CodRegistro = TblRegistros_Compl.CodRegistro)
Com essa sql vc consegue visualizar os dados, já inserir vc faz da maneira habitual sua.
 
Espero ter ajudado.
 
Flw
 
T+
 

João Carlos Junior

Administrador de Redes - Windows 2003 Srv, Linux

    Desenvolvedor Visual Basic 6.0 com Access, SQL Server, VB .Net e Crystal Reports X

Iniciante em C# e ASP .NET

   
Michel Morgado
SAO PAULO
SP - BRASIL
Postada em 09/10/2007 09:25 hs            
Cara .. vou tentar aqui ..
 
Mas me deram a idéia de fazer 2 sql's para inserir em duas tabelas diferentes ...
 
O que acha ?
     
João Carlos jr.
RIBEIRÃO PRETO
SP - BRASIL
Postada em 09/10/2007 09:37 hs            
Foi como eu te disse para inserir vc pode usar sim duas sql distintas, vc pode fazer assim: com a primeira sql vc inseri o campo normalmente, busca o codigo desse registro e depois inseri o restante na outra tabela com o codigo que vc buscou, com isso vc une as duas tabelas com essa código que são igual para as duas tabelas, sendo que esse código na tabela princial vc pode usar auto-numeração, já na outra tabela ele irá se tornar chave extrangeira e vc usa ele como numero.
 
Se quiser meu msn é: joaocarlosgpjr@hotmail.com
 
Flw
 
T+
 
 

João Carlos Junior

Administrador de Redes - Windows 2003 Srv, Linux

    Desenvolvedor Visual Basic 6.0 com Access, SQL Server, VB .Net e Crystal Reports X

Iniciante em C# e ASP .NET

     
Michel Morgado
SAO PAULO
SP - BRASIL
Postada em 09/10/2007 10:10 hs            
Blz car a.. vou tentar ..
 
vou anotar seu msn .. só nao posso entrar aqui do trampo hehe ..
 
mesmo assim  valeuuu..
     
Página(s): 1/1    


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



CyberWEB Network Ltda.    © Copyright 2000-2024   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página