MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    [Resolvido]Problema em consulta quando executada em SQL

    Compartilhe

    M2013
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Anónimo
    Mensagens : 56
    Registrado : 07/06/2013

    [Resolvido]Problema em consulta quando executada em SQL

    Mensagem  M2013 em Qua 04 Nov 2015, 16:20

    Prezados,  Tenho uma consulta que funciona normalmente quando executada pela janela BD Access.
    Eu copiei essa consulta em Sql e quando executo com "CurrentDb.Execute" ela apresenta erro em tempo de execução '13'....
    Alguém poderai ajudar?

    Não consegui anexar arquivo no site, retorna erro de nome e arquivo não é valido para o formato ZIP e "Não é possível enviar o arquivo : o espaço total de armazenamento foi ultrapassado. (Espaço restante : 0 Kb)" para o formato accdb , não adiantou.

    Consulta:

    CurrentDb.Execute "UPDATE tb_Variaveis, tbTemp SET tbTemp.Flag = [tb_Variaveis].[Descritivo] WHERE (((tbTemp.Texto) Like " * " & [tb_Variaveis].[Texto] & " * ") AND ((tbTemp.[Item financeiro]) Like 420001 Or (tbTemp.[Item financeiro])=420005 Or (tbTemp.[Item financeiro])=420003 Or (tbTemp.[Item financeiro])=430033 Or (tbTemp.[Item financeiro])=440009 Or (tbTemp.[Item financeiro])=440011));"

    onde os campos Flag (tbTemp) é igual a Descritivo(tb_Variaveis) -> texto (255)
    Texto (tbTemp) é igual a Texto (tb_Variaveis) -> texto (255)


    Obrigado
    avatar
    cleverson_manaus
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 723
    Registrado : 23/09/2011

    Re: [Resolvido]Problema em consulta quando executada em SQL

    Mensagem  cleverson_manaus em Qua 04 Nov 2015, 23:22



    Tente assim, retirando ponto e vírgula e acrescentando duas aspas simples no campo Texto:

    CurrentDb.Execute "UPDATE tb_Variaveis, tbTemp SET tbTemp.Flag = [tb_Variaveis].[Descritivo] " _
    & "WHERE (((tbTemp.Texto) LIKE " * """ & [tb_Variaveis].[Texto] & """ * ") AND " _
    & "((tbTemp.[Item financeiro]) LIKE 420001 OR (tbTemp.[Item financeiro])=420005 " _
    & "OR (tbTemp.[Item financeiro])=420003 OR (tbTemp.[Item financeiro])=430033 " _
    & "OR (tbTemp.[Item financeiro])=440009 OR (tbTemp.[Item financeiro])=440011))"


    Abraços,



    .................................................................................
    [Você precisa estar registrado e conectado para ver esta imagem.]

    "É fazendo que se aprende a fazer aquilo que se deve aprender a fazer."(Aristóteles)
    - Dúvida resolvida!!! Favor marcar o tópico como resolvido!!!

    M2013
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Anónimo
    Mensagens : 56
    Registrado : 07/06/2013

    Problema em consulta quando executada em SQL

    Mensagem  M2013 em Qui 05 Nov 2015, 10:30

    Cleverson, obrigado pela resposta.
    Alterei conforme voce postou (copiei inclusive o código) , porém o erro continua "tipos incompativeis".
    Não consegui postar aqui o banco.
    avatar
    cleverson_manaus
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 723
    Registrado : 23/09/2011

    Re: [Resolvido]Problema em consulta quando executada em SQL

    Mensagem  cleverson_manaus em Qui 05 Nov 2015, 12:00

    Tente postar por aqui:

    [Você precisa estar registrado e conectado para ver este link.] › pt_BR

    Abraços,


    .................................................................................
    [Você precisa estar registrado e conectado para ver esta imagem.]

    "É fazendo que se aprende a fazer aquilo que se deve aprender a fazer."(Aristóteles)
    - Dúvida resolvida!!! Favor marcar o tópico como resolvido!!!

    M2013
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Anónimo
    Mensagens : 56
    Registrado : 07/06/2013

    Problema em consulta quando executada em SQL

    Mensagem  M2013 em Qui 05 Nov 2015, 12:14

    Cleverson, não tenho acesso ao dropbox pela rede agora.Poderia ser para seu email?
    obrigado

    M2013
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Anónimo
    Mensagens : 56
    Registrado : 07/06/2013

    Problema em consulta quando executada em SQL

    Mensagem  M2013 em Sex 06 Nov 2015, 00:27

    Cleverson,

    Segue link
    [Você precisa estar registrado e conectado para ver este link.]

    M2013
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Anónimo
    Mensagens : 56
    Registrado : 07/06/2013

    Re: [Resolvido]Problema em consulta quando executada em SQL

    Mensagem  M2013 em Ter 10 Nov 2015, 12:31

    Foi resolvido.

    CurrentDb.Execute "UPDATE tb_Variaveis, tbTemp SET tbTemp.Flag = [tb_Variaveis].[Descritivo]" _
    &"WHERE ((tbTemp.Texto Like '*' & [tb_Variaveis].[Texto] & '*') AND " _
    &"((tbTemp.[Item financeiro]) Like 420001 Or (tbTemp.[Item financeiro])=420005" _
    &"Or (tbTemp.[Item financeiro])=420003 Or (tbTemp.[Item financeiro])=430033" _
    &"Or (tbTemp.[Item financeiro])=440009 Or (tbTemp.[Item financeiro])=440011));"


    '*' & [tb_Variaveis].[Texto] & '*'

    em vez de ...

    " * """ & [tb_Variaveis].[Texto] & """ * ")


      Data/hora atual: Ter 27 Jun 2017, 20:53