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

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  SQL Para Analistas
Marcos Leandro
não registrado
ENUNCIADA !
Postada em 27/10/2005 14:03 hs   
Pessoal: Olha meu problema, estou rodando a sql abaixo dentro do vb, ok...ela roda normal, mas dá uma mensagem assim: "Operação não permitida quando o objeto está fechado"...já tentei de tudo, mas nada resolve alguém sabe de alguma coisa somente pra não deixar essa mensagem aparecer??...ficarei muito grato...sem mais
MArcos Leandro Rosa
 
adoatraso.RecordSource = "INSERT INTO TbAtrasos " & _
 "( Aresp, Cidade, [Distrito Nome], [N Part], InicioL, " & _
 "FimL, [Hora Efetiva], QtdUc, [Nome Leiturista], DataFat, " & _
 "HoraDescarga ) SELECT DISTINCT PARTFA.aresp AS Aresp, " & _
 "TabDistritos.Cidade, TabNomeDist.[Distrito Nome], " & _
 "PARTFA.part AS [N Part], TimeValue(Right([inicio],8)) " & _
 "AS InicioL, TimeValue(Right([fim],8)) AS FimL, " & _
 "([fiml]-[iniciol]) AS [Hora Efetiva], " & _
 "([PARTFA]![nreg])/3 AS QtdUc, PARTFA.nome AS " & _
 "[Nome Leiturista], Left([dbo_logfa.data],10) AS DataFat, " & _
 "Right([dbo_logfa.data],8) AS HoraDescarga " & _
"FROM (dbo_LOGFA INNER JOIN ((REGIAOFA INNER JOIN " & _
"PARTFA ON REGIAOFA.chave = PARTFA.chave) INNER JOIN " & _
"(TabDistritos INNER JOIN TabNomeDist ON TabDistritos.Distrito " & _
"= TabNomeDist.Distrito) ON PARTFA.aresp = TabDistritos.Aresp) " & _
"ON dbo_LOGFA.arquivo = PARTFA.arqd) INNER JOIN dbo_LOGFA2 " & _
"ON PARTFA.arqc = dbo_LOGFA2.arquivo " & _
"WHERE (((Left([dbo_logfa.data],10))=#10/26/2005#) " & _
"AND ((Right([dbo_logfa.data],8))>#12/30/1899 15:1:0#) AND " & _
"((Left([dbo_logfa2.data],10))=#10/26/2005#));"
adoatraso.Refresh
   
JoãoCarlosjr
RIBEIRÃO PRETO
SP - BRASIL
Postada em 27/10/2005 14:13 hs            
Marcos vc colocou o begintrans antes da rotina e o committrans depois da rotina? Essa mensagem dá quando vc nãi inicia uma transação com o begintrans.
 
Espero ter Ajudado
 
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

     
Alexandre C.G
Pontos: 2843 Pontos: 2843
PATOS DE MINAS
MG - BRASIL
ENUNCIADA !
Postada em 27/10/2005 14:13 hs            
sua conexão esta aberta e o recordset foi criado.??
   
Marcos Leandro
não registrado
ENUNCIADA !
Postada em 27/10/2005 14:56 hs   
eu uso um componente Adodc
adoatraso.RecordSource
Tentei fazer alguma outra coisa , mas nem deu nada..... valeu pessoal
 
   
Maxcim
GUARULHOS
SP - BRASIL
ENUNCIADA !
Postada em 27/10/2005 15:51 hs            
joga o conteudo em uma variavel string "SQL" e dá um debug.print sql cole a resultrado da janela imediate diretamente no banco de dados e execute, se rodar é sinal que a instução esta certa.
e depois faça:
adoatraso.RecordSource = sql
 
 
   
Keyo
Pontos: 2843
CURITIBA
PR - BRASIL
Postada em 27/10/2005 16:12 hs            
Este tal de adodc nao suporta este método de inclusão,use da seguinte forma
adoatraso.recordset.addnew
adoatraso.recordset("nomedocampo") = text1.text
adoatraso.recordset.update
adostraso.refresh
ou use uma conexão em ado puro,dai vc usa a funçao "insert into" do jeito que vc quiser..
TÓPICO EDITADO
   
Página(s): 1/2      PRÓXIMA »


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