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

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  inserir dados de um select em uma tabela
Futura
PORTO FERREIRA
SP - BRASIL
Postada em 11/04/2005 12:37 hs            
é o seguinte, preciso inserir dados de uma consulta sql, em uma tabela, e para não fazer um FOR-NEXT, adicionando registro a registro, estou fazendo o seguinte: os dados vão pra uma tabela temporária chamada folha, então eu a deleto, como a seguir:


bd.Execute ("drop table folha")

ai depois faço um processamento, e após faço um select e insiro na tabela temporária,
neste ponto a tabela é criada novamente:

sql = "SELECT codfun,despesa,qtde,valor,periodo,tipo,nome,empresa,funcao,setor INTO [folha] FROM [lancamentos] WHERE periodo='" & txtperiodo & "'"

O que ocorre, é que se neste processamento ocorrer alguma condição, em que o mesmo não termine, a tabela ja foi deletada acima, o que vai causar erro qdo tentar deleta-la novamente. então pensei em apenas apagar o conteudo desta tabela, e depois do processamento, inserir os dados na tabela ja criada, mas qual seria a instrução sql para isto ?
     
Rochª
Pontos: 2843 Pontos: 2843 Pontos: 2843
RIO DE JANEIRO
RJ - BRASIL
Postada em 11/04/2005 12:51 hs            
Não sei se ajuda mais voce pode tentar deletar e se nao tiver arquivo continuar o processo assim
 
on error resume next ' se der erro ( no caso a tabela nao existe) continue na
                             'proxima linha
bd.Execute ("drop table folha")
on error goto 0                ' Volta a dar erro normalmente
 
Assim o programa nao para de executar se a tabela nao existir.
 
Ajuda ????

__________________________________________________________________________
Qualquer coisa post
 
Emoções
Rochª
     
Página(s): 1/1    

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