MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

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


4 participantes

    Replace no select pelo Vb6

    avatar
    samucatnb
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4
    Registrado : 25/06/2015

    Replace no select pelo Vb6 Empty Replace no select pelo Vb6

    Mensagem  samucatnb 5/6/2021, 10:04

    Bom dia amigos, estou com instrução sql que funciona perfeitamente pelo Access, porém ao executar ela pelo VB6 da erro devido o uso do REPLACE, já tentei atualizar e utilizar um drive de conexão mais novo porém sem sucesso.
    Alguém poderia me ajudar, por favor.
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7996
    Registrado : 15/03/2013

    Replace no select pelo Vb6 Empty Re: Replace no select pelo Vb6

    Mensagem  Alvaro Teixeira 5/6/2021, 19:36

    Olá Samuel, Seja Bem-Vindo ao fórum.

    Este tópico é de Microsoft Access, o tópico vai ser movido para sala adequada.
    Relativamente à dúvida, será melhor partilhar a parte do códifgo envolvida para verificar se podemos ajudar.

    Abraço
    avatar
    samucatnb
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4
    Registrado : 25/06/2015

    Replace no select pelo Vb6 Empty Re: Replace no select pelo Vb6

    Mensagem  samucatnb 5/6/2021, 20:03

    Ok, quanto ao código não existe mistério, um select básico com uso do REPLACE:
    select * from cliente where replace(clitel, '-', '')
    O que acontece é que no access funciona, mas no Vb6 não.
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3845
    Registrado : 22/11/2016

    Replace no select pelo Vb6 Empty Re: Replace no select pelo Vb6

    Mensagem  DamascenoJr. 5/6/2021, 23:14

    Seria bom descrever onde você usa e como se conecta com a tabela onde os dados são buscados. Pois aí está o problema.

    O Access acessa e trabalha as informações da tabela diferente de qualquer outro aplicativo. Simplesmente facilitando tudo. Por isso nele funciona.


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    avatar
    samucatnb
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4
    Registrado : 25/06/2015

    Replace no select pelo Vb6 Empty Re: Replace no select pelo Vb6

    Mensagem  samucatnb 6/6/2021, 03:36

    Boa noite amigo, como disse utilizo Vb6, e por ele utilizo DAO abrindo um recordset, a minha dúvida é se funciona no Vb6, e se funciona teria que fazer uma atualização de driver, ou algum outro meio ?
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7996
    Registrado : 15/03/2013

    Replace no select pelo Vb6 Empty Re: Replace no select pelo Vb6

    Mensagem  Alvaro Teixeira 6/6/2021, 12:12

    Olá a todos,

    Samuel, como o colega Damasceno referiu, deveria partilhar o código onde está a dar o erro para um eventual ajuda.
    Como já foi referido este fórum é de MsAccess.

    Veja se ajuda:
    chennaiiq.com/developers/reference/visual_basic/functions/replace.asp
    freevbcode.com/ShowCode.asp?ID=6892

    Boa sorte

    Abraço
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3495
    Registrado : 13/12/2016

    Replace no select pelo Vb6 Empty Re: Replace no select pelo Vb6

    Mensagem  Alexandre Fim 6/6/2021, 23:01

    Samuel boa noite,

    A tua instrução está equivocada.

    O correto seria:

    SELECT * FROM cliente WHERE CampoDaTabela = REPLACE(clitel, '-', '')

    O que vc precisa é aplicar o REPLACE no valor de algum campo que vc esteja usando no teu form.
    Provavelmente, este campo é um MaskEdit.

    Reveja a instrução e nos retorne.

    Se possível, anexe seu projeto junto com sua base de dados (somente partes envolvidas) para análise.

    []'s

    FIM




    .................................................................................
    Arrow  Marcar tópico como Resolvido: clique aqui
    Arrow  Postar anexos no fórum: clique aqui

    Replace no select pelo Vb6 Setinf11
    Sistemas e Tecnologia Ltda
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3845
    Registrado : 22/11/2016

    Replace no select pelo Vb6 Empty Re: Replace no select pelo Vb6

    Mensagem  DamascenoJr. 6/6/2021, 23:05

    Alexandre, creio que ele já queira filtrar comparando o campo da tabela sem os "-", por isso o replace apontando direto na instrução SQL.


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.

    samucatnb gosta desta mensagem

    avatar
    samucatnb
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4
    Registrado : 25/06/2015

    Replace no select pelo Vb6 Empty Re: Replace no select pelo Vb6

    Mensagem  samucatnb 7/6/2021, 12:57

    Amigos bom dia está correta a minha instrução, caso os colegas desejem fazer um teste utilize no Access diretamente como falei, e depois a mesma instrução no VB6 e verão que não funciona, cheguei a fazer teste no C#, deu mesmo erro, após atualizar o driver de conexão deu certo, mas no Vb6 não tive sucesso
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3495
    Registrado : 13/12/2016

    Replace no select pelo Vb6 Empty Re: Replace no select pelo Vb6

    Mensagem  Alexandre Fim 7/6/2021, 16:07

    Olá Samuel,

    É possivel vc postar o seu .vbp e o banco de dados para eu analisar?

    ´[]'s

    FIM


    .................................................................................
    Arrow  Marcar tópico como Resolvido: clique aqui
    Arrow  Postar anexos no fórum: clique aqui

    Replace no select pelo Vb6 Setinf11
    Sistemas e Tecnologia Ltda
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3495
    Registrado : 13/12/2016

    Replace no select pelo Vb6 Empty Re: Replace no select pelo Vb6

    Mensagem  Alexandre Fim 7/6/2021, 21:33

    Samuel,
    Apenas uma sugestão:
    Se você pretende migrar do Access para outros bancos de dados (Ex.: SQL Server, MySQL, Oracle, FireBase e etc.), utilize conexão ADO, até pq DAO não suporta todos os tipos de dados desses gerenciadores, e foi criada para acessar banco de dados Access.

    É isso !!

    []'s

    FIM


    .................................................................................
    Arrow  Marcar tópico como Resolvido: clique aqui
    Arrow  Postar anexos no fórum: clique aqui

    Replace no select pelo Vb6 Setinf11
    Sistemas e Tecnologia Ltda

    samucatnb gosta desta mensagem


    Conteúdo patrocinado


    Replace no select pelo Vb6 Empty Re: Replace no select pelo Vb6

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 22/11/2024, 20:36