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


3 participantes

    [Resolvido]Insert Into com erro de instrução

    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2682
    Registrado : 23/01/2018

    [Resolvido]Insert Into com erro de instrução Empty [Resolvido]Insert Into com erro de instrução

    Mensagem  crysostomo 29/1/2023, 20:36

    galera me da uma luz aqui.
    Estou fazendo em 2 tipos praticamente diferente
    Um código fala que with não definida outro fale que é erro de instrução. Eu não sei onde está o erro.
    Código:
    CurrentDb.Execute "INSERT INTO Tbl_Ano_Temp (Nome,Curso Turma,Valor,Tpo de PG,Data,Data do lançamento)" _
                    & " Values(""" & Me.txtNome.Value & """,""" & Me.txtCursoTurma.Value & """,""" & StrValorParc & """,""" & Me.cboTipoDePG & """,#" & Format(StrDateAdd, "mm/dd/yyyy") & "#,""" & Me.txtDataDoLancamento.Value & """);"
        
        


    Última edição por crysostomo em 30/1/2023, 12:09, editado 1 vez(es)


    .................................................................................
    Obs.: Coloque somente as partes defeituosas para que possamos encontrar e entender  o problema mais rápido para lhe ajudar. Disponho.
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Insert Into com erro de instrução Empty Re: [Resolvido]Insert Into com erro de instrução

    Mensagem  DamascenoJr. 29/1/2023, 22:15

    Tópico movido da sala de repositório de exemplos por não ser exemplo para estudo.


    .................................................................................
    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.
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Insert Into com erro de instrução Empty Re: [Resolvido]Insert Into com erro de instrução

    Mensagem  Alexandre Fim 30/1/2023, 12:14

    Crysostomo,

    Sempre que for criar uma instrução SQL, quebre-a em várias linhas, pois pode gerar confusão com ASPAS e ASPAS DUPLAS na hora de separar os valores.
    Outro detalhe que já é muito discutido aqui no fórum:
    Nome de coluna separado por ESPAÇO. Isso atrapalha na hora de criar instruções e expressões.

    Outro detalhe:
    Em instrução SQL, não é utilizado o "#" para datas.

    Tente isso:
    Código:


        Dim sSQL As String
        
        sSQL = "INSERT INTO Tbl_Ano_Temp "
        sSQL = sSQL & "("
        sSQL = sSQL & " Nome"
        sSQL = sSQL & ",[Curso Turma]"
        sSQL = sSQL & ",Valor"
        sSQL = sSQL & ",[Tpo de PG]"
        sSQL = sSQL & ",Data"
        sSQL = sSQL & ",[Data do lançamento]"
        sSQL = sSQL & ")"
        sSQL = sSQL & " VALUES "
        sSQL = sSQL & "("
        sSQL = sSQL & " '" & Trim(Me.txtNome.Value) & "'"
        sSQL = sSQL & ",'" & Me.txtCursoTurma.Value & "'"
        sSQL = sSQL & ",'" & Replace(Format(StrValorParc, "#########0.#0"), ",", ".") & "'"
        sSQL = sSQL & ",'" & Me.cboTipoDePG & "'"
        sSQL = sSQL & ",'" & Format(StrDateAdd, "mm/dd/yyyy") & "'"
        sSQL = sSQL & ",'" & Format(Me.txtDataDoLancamento.Value, "mm/dd/yyyy") & "'"
        sSQL = sSQL & ")"
        CurrentDb.Execute sSQL



    É isso

    Att,

    Alexandre Fim


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

    [Resolvido]Insert Into com erro de instrução Setinf11
    Sistemas e Tecnologia Ltda
    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2682
    Registrado : 23/01/2018

    [Resolvido]Insert Into com erro de instrução Empty Re: [Resolvido]Insert Into com erro de instrução

    Mensagem  crysostomo 30/1/2023, 13:57

    Bom dia Alexandre.
    Então. Quando estava fazendo assim  deu erro como bloco with não definido. Não vi aonde estava esse erro.
    Eu sempre fiz os nomes das colunas juntos por esse caso também que sempre priorizava, mas somente dessa vez eu coloquei separado para aparecer no cabeçalho.
    No caso se eu colocar dataDeLancamento ele vai aparecer assim e o usuário final vai ter dificuldade na leitura.
    Teria algum código para que os nome das colunas apareça de forma viável? Ex.
    Na tabela eu colocar dataDeLancamento e na lista aparecer Data de Lançamento.


    .................................................................................
    Obs.: Coloque somente as partes defeituosas para que possamos encontrar e entender  o problema mais rápido para lhe ajudar. Disponho.
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Insert Into com erro de instrução Empty Re: [Resolvido]Insert Into com erro de instrução

    Mensagem  Alexandre Fim 30/1/2023, 17:17

    Crysostomo,

    Se possível, manda seu bd, somente objetos envolvidos no problema, para analsie e solução.

    OBS: Não precisa colocar o nome da coluna entre espaços, (Ex.: Data de Nascimento).
    Na tabela, existe uma propriedade do campo chamada "Legenda", e o Access utiliza essa legenda como rótulo de campo, cabeçalho de listbox, de folha de dados e etc.

    Exemplo:
    [Resolvido]Insert Into com erro de instrução Leg110

    [Resolvido]Insert Into com erro de instrução Leg210


    É isso.

    Att,

    Alexandre Fim


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

    [Resolvido]Insert Into com erro de instrução Setinf11
    Sistemas e Tecnologia Ltda
    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2682
    Registrado : 23/01/2018

    [Resolvido]Insert Into com erro de instrução Empty Re: [Resolvido]Insert Into com erro de instrução

    Mensagem  crysostomo 1/2/2023, 15:13

    Eita, esqueci da legenda.
    A parte do with sem bloco não definida seria por qual motivo?
    Obg.


    .................................................................................
    Obs.: Coloque somente as partes defeituosas para que possamos encontrar e entender  o problema mais rápido para lhe ajudar. Disponho.
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Insert Into com erro de instrução Empty Re: [Resolvido]Insert Into com erro de instrução

    Mensagem  Alexandre Fim 1/2/2023, 16:06

    Preciso ver o codigo de toda a rotina para entender o contexto.
    Por gentileza, manda o bd somente com este problema pra eu analisar.

    Att,
    Alexandre Fim


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

    [Resolvido]Insert Into com erro de instrução Setinf11
    Sistemas e Tecnologia Ltda
    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2682
    Registrado : 23/01/2018

    [Resolvido]Insert Into com erro de instrução Empty Re: [Resolvido]Insert Into com erro de instrução

    Mensagem  crysostomo 1/2/2023, 19:29

    O único erro agora é que  o arredondamento de  preço está acontecendo mesmo mexendo comnúmeros double, já fiz e refiz outros codigos e nesse não está dando certo.
    vou continuar mexendo aqui, se não der certo até mais tarde vou anexar..
    At.te


    .................................................................................
    Obs.: Coloque somente as partes defeituosas para que possamos encontrar e entender  o problema mais rápido para lhe ajudar. Disponho.
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2682
    Registrado : 23/01/2018

    [Resolvido]Insert Into com erro de instrução Empty Insert Into com erro de instrução

    Mensagem  crysostomo 1/2/2023, 21:01

    Tentei aqui de varias maneiras.
    Estou querendo evitar que ele arredonde nem um centavo
    drive.google.com/drive/folders/1rDUGQSMd8fyrK3JBUllSM1uUG9T-SN-V?usp=share_link

    O fórum não deixa eu colocar foto.

    ex.;
    80,00/3 = 26,66 ele esta colocando 2,6666666667 e nos outros códigos ele coloca 26,67 não tem como controlar pagamento 0,01 centavos de varias contas é praticamente morte, rs


    .................................................................................
    Obs.: Coloque somente as partes defeituosas para que possamos encontrar e entender  o problema mais rápido para lhe ajudar. Disponho.
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.

    Conteúdo patrocinado


    [Resolvido]Insert Into com erro de instrução Empty Re: [Resolvido]Insert Into com erro de instrução

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 27/5/2024, 03:57