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

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Comparar Dados com SQL
Martini
Pontos: 2843 Pontos: 2843
PAROBÉ
RS - BRASIL
Postada em 18/07/2005 13:17 hs         
assim eu insiro o "ghi" na tabela 2
 
Create Table #Tabela1 (
   Codigo Integer,
   Nome Varchar(20)
          )
Create Table #Tabela2 (
   Codigo Integer,
   Nome Varchar(20)
          )

Set NoCount On
Insert Into #Tabela1 (Codigo, Nome) Values (1, 'ABC')
Insert Into #Tabela1 (Codigo, Nome) Values (2, 'BCD')
Insert Into #Tabela1 (Codigo, Nome) Values (3, 'GHI')
Insert Into #Tabela2 (Codigo, Nome) Values (1, 'ABC')
Insert Into #Tabela2 (Codigo, Nome) Values (2, 'BCD')
Insert Into #Tabela2 (Codigo, Nome) Values (3, 'EFG')
 
Select * From #Tabela1
Select * From #Tabela2
Insert Into #Tabela2 (
    Codigo,
    Nome
   )
    Select
     Codigo,
     Nome
    From #Tabela1
    Where Nome Not In (
       Select Distinct Nome
       From #Tabela2
      )

Select * From #Tabela2
Drop Table #Tabela1
Drop Table #Tabela2
     
Knight
GOIÂNIA
GO - BRASIL
Postada em 18/07/2005 13:29 hs         
Posso montar um loop ai, n ha problemas, pq sempre sera 1 ou 2 registros em cada tabela
 
Ex: s = "insert into tabela1(cod,nome) values(" 
enquanto não tabela2.eof
s = s tabela1!cod  & ",'" & tabela2!nome "'"
s = s "),"
fim enquanto
 
bd.executa s
Alguma coisa parecida com isso
 

Emoções Knight Emoções

http://host.csti.eti.br

CSTI WebHosting
Hospedando Idéias Emoções

     
Martini
Pontos: 2843 Pontos: 2843
PAROBÉ
RS - BRASIL
Postada em 18/07/2005 16:00 hs         
não faz loop, faz assim:
Insert Into #Tabela2 (
    Codigo,
    Nome
   )
    Select
     Codigo,
     Nome
    From #Tabela1
    Where Nome Not In (
       Select Distinct Nome
       From #Tabela2
      )
 
     
Página(s): 2/2     « ANTERIOR  


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

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

HTML DESLIGADO

     
 VOLTAR

  



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