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


2 participantes

    [Resolvido]duvida ao substituir campo

    avatar
    Guilherme82
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 28
    Registrado : 03/08/2020

    [Resolvido]duvida ao substituir campo Empty [Resolvido]duvida ao substituir campo

    Mensagem  Guilherme82 26/5/2024, 17:49

    Bom dia, não sou profissional, mas estou “apanhando” com algo que acredito que seja simples. Na linha abaixo quero substituir “Banco” pelo número 5
    Tentei de no lugar de banco = and bco=5, and [bco]=5 and “bco=5”, mas todas dão erro

    strsql = strsql & "WHERE cdbl(dt) >= #" & Format(Forms![f_Bco]![DataInicial], "mm/dd/yy") & "# and bco = " & Me!Banco & ""
    If fncCriarTabela(strsql, tblTemp, 102030) Then
    Me!txSaldo = Nz(DSum("[vlr]", "t_Bcovlr", "[bco]=banco"), 0)

    E na outra linha:Me!Txsaldo=nz(dsum(“[vlr]”, “T_BcoVlr”, “[bco]=banco” também da erro
    Podem me ajudar? Agradeço
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 11026
    Registrado : 04/11/2009

    [Resolvido]duvida ao substituir campo Empty Re: [Resolvido]duvida ao substituir campo

    Mensagem  JPaulo 28/5/2024, 18:10

    Código:
    strsql = strsql & "WHERE cdbl(dt) >= #" & Format(Forms![f_Bco]![DataInicial], "mm/dd/yy") & "# and bco = '" & Me!Banco & "'"


    Se a palavra banco é um texto direto, é assim;
    Código:
    Me!txSaldo.Value = Nz(DSum("vlr", "T_BcoVlr", "[bco]='banco'"), 0)

    Se banco é o nome de um campo e é texto, é assim;
    Código:
    Me!txSaldo.Value = Nz(DSum("vlr", "T_BcoVlr", "bco = '" & Me!Banco & "'"), 0)

    Se banco é o nome de um campo e é numerico, é assim;
    Código:
    Me!txSaldo.Value = Nz(DSum("vlr", "T_BcoVlr", "bco = " & Me!Banco), 0)


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]duvida ao substituir campo Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]duvida ao substituir campo Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]duvida ao substituir campo Folder_announce_new Instruções SQL como utilizar...
    avatar
    Guilherme82
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 28
    Registrado : 03/08/2020

    [Resolvido]duvida ao substituir campo Empty Re: [Resolvido]duvida ao substituir campo

    Mensagem  Guilherme82 2/6/2024, 22:18

    Valeu!!!!Desculpe a demora

    Conteúdo patrocinado


    [Resolvido]duvida ao substituir campo Empty Re: [Resolvido]duvida ao substituir campo

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 22/11/2024, 09:59