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]Concatenar comando SQL

    =>Nois
    =>Nois
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 979
    Registrado : 09/11/2012

    [Resolvido]Concatenar comando SQL Empty [Resolvido]Concatenar comando SQL

    Mensagem  =>Nois 20/10/2020, 19:06

    Boa tarde!

    consigo concatenar ou algo parecido para os codigos abaixo?

    O código Funcionam perfeito, mas queria algo mais robusto que não fizesse 4 viagens no banco de dados apenas 1 visto que ele localiza o registro e vais atualizando as colunas sub sequentes ao registro


    Código:
           CurrentDb.Execute "UPDATE tbl_Motor_internet SET Volume='" & Me.txtVolume & "' WHERE id=" & Me.txtId & ""
            CurrentDb.Execute "UPDATE tbl_Motor_internet SET DataBaixa='" & Me.txtDataBaixa & "' WHERE id=" & Me.txtId & ""
            CurrentDb.Execute "UPDATE tbl_Motor_internet SET Baixa= true WHERE id=" & Me.txtId & ""
            CurrentDb.Execute "UPDATE tbl_Motor_internet SET Log='" & Now & "' WHERE id=" & Me.txtId & ""


    seria mais ou menos assim mas não sei implementar da maneira correta

    Código:
            CurrentDb.Execute "UPDATE tbl_Motor_internet " & _
            "SET Volume='" & Me.txtVolume & "' & _
            "SET DataBaixa='" & Me.txtDataBaixa & "' & _
            "SET Baixa= true & _
            "SET Log='" & Now & "' & _
            "WHERE id=" & Me.txtId & ""


    .................................................................................
    Att. Nois

    Se tudo não der certo... tente de novo drunken
    =>Nois
    =>Nois
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 979
    Registrado : 09/11/2012

    [Resolvido]Concatenar comando SQL Empty Re: [Resolvido]Concatenar comando SQL

    Mensagem  =>Nois 20/10/2020, 19:23

    consegui!

    deixo para consulta para os colegas


    Código:
            CurrentDb.Execute "UPDATE tbl_Motor_internet " & _
            " SET Volume='" & Me.txtVolume & "', " & _
            "  DataBaixa='" & Me.txtDataBaixa & "', " & _
            "  Baixa= true , " & _
            "  Log='" & Now & "'" & _
            " WHERE id=" & Me.txtId & ""


    .................................................................................
    Att. Nois

    Se tudo não der certo... tente de novo drunken
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Concatenar comando SQL Empty Re: [Resolvido]Concatenar comando SQL

    Mensagem  DamascenoJr. 20/10/2020, 20:31

    Wow!!!

    Parabéns pela evolução Very Happy


    .................................................................................
    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.

    =>Nois gosta desta mensagem


    Conteúdo patrocinado


    [Resolvido]Concatenar comando SQL Empty Re: [Resolvido]Concatenar comando SQL

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 19/4/2024, 07:51