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]Inserir um campo novo no código e está dando erro (gerar parcelas)

    avatar
    athenas1200
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 29
    Registrado : 29/03/2011

    [Resolvido]Inserir um campo novo no código e está dando erro (gerar parcelas) Empty [Resolvido]Inserir um campo novo no código e está dando erro (gerar parcelas)

    Mensagem  athenas1200 20/1/2016, 13:18

    Option Compare Database
    Nesta parte do código que está dando erro:
    Inserir o campo CPValor1
    Alguém saber onde está errado.



    CurrentDb.Execute "INSERT INTO tblExemplo(Compra,CpData,CpValor,Cpvalor1)" _
    & " Values(""" & Me.txtDescricao.Value & """,#" & Format(StrDateAdd, "mm/dd/yyyy") & "#, """ & StrValorParc & """)& "#, """ & Cpvalor1 & """);"







    Private Sub btnGerar_Click()
    Dim I As Integer
    Dim StrDateAdd As Date
    Dim StrValorParc As Double
    Dim Parc As String
    StrValorParc = Me.txtValor_Total
    For I = 1 To Me.txtParc
    StrDateAdd = DateAdd("m", I, Format(Me.txtData, "dd/mm/yyyy"))
    StrParc = I & "/" & Me.txtParc
    CurrentDb.Execute "INSERT INTO tblExemplo(Compra,CpData,CpValor,Cpvalor1)" _
    & " Values(""" & Me.txtDescricao.Value & """,#" & Format(StrDateAdd, "mm/dd/yyyy") & "#, """ & StrValorParc & """)& "#, """ & Cpvalor1 & """);"
    Next I
    Me.lstParcelas.Requery
    End Sub
    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

    [Resolvido]Inserir um campo novo no código e está dando erro (gerar parcelas) Empty Re: [Resolvido]Inserir um campo novo no código e está dando erro (gerar parcelas)

    Mensagem  Alvaro Teixeira 20/1/2016, 15:54

    Olá, tente assim:

    Código:
    CurrentDb.Execute "INSERT INTO tblExemplo(Compra,CpData,CpValor,Cpvalor1)" _
    & " Values(""" & Me.txtDescricao.Value & """,#" & Format(StrDateAdd, "mm/dd/yyyy") & "#, """ & StrValorParc & """)& ", """ & Cpvalor1 & "");"
    Abraço
    avatar
    athenas1200
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 29
    Registrado : 29/03/2011

    [Resolvido]Inserir um campo novo no código e está dando erro (gerar parcelas) Empty O erro que esta aparecento

    Mensagem  athenas1200 20/1/2016, 16:20

    O erro:
    [Resolvido]Inserir um campo novo no código e está dando erro (gerar parcelas) Teste12
    CurrentDb.Execute "INSERT INTO tblExemplo(Compra,CpData,CpValor,Cpvalor1)" _
    & " Values(""" & Me.txtDescricao.Value & """,#" & Format(StrDateAdd, "mm/dd/yyyy") & "#, """ & StrValorParc & """)& ", """ & Cpvalor1 & "");"
    Arquivo:
    http://consultoriasoft.com.br/video/x.zip
    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

    [Resolvido]Inserir um campo novo no código e está dando erro (gerar parcelas) Empty Re: [Resolvido]Inserir um campo novo no código e está dando erro (gerar parcelas)

    Mensagem  Alvaro Teixeira 20/1/2016, 16:35

    Olá, estou no telemóvel não posso ver zip, verifique as aaspas dos campos que são valor.
    Abraço


    Última edição por ahteixeira em 20/1/2016, 17:36, editado 1 vez(es)
    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

    [Resolvido]Inserir um campo novo no código e está dando erro (gerar parcelas) Empty Re: [Resolvido]Inserir um campo novo no código e está dando erro (gerar parcelas)

    Mensagem  Alvaro Teixeira 20/1/2016, 16:59

    Olá, veja assim:
    Código:
    CurrentDb.Execute "INSERT INTO tblExemplo(Compra,CpData,CpValor,Cpvalor1)" _
    & " Values(""" & Me.txtDescricao.Value & """,#" & Format(StrDateAdd, "mm/dd/yyyy") & "#, " & StrValorParc & ", " & Me.Cpvalor1 & ");"
    Abraço
    Anexos
    [Resolvido]Inserir um campo novo no código e está dando erro (gerar parcelas) AttachmentGeraParcelas_rev.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (28 Kb) Baixado 41 vez(es)


    Última edição por ahteixeira em 27/12/2017, 14:26, editado 2 vez(es)
    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

    [Resolvido]Inserir um campo novo no código e está dando erro (gerar parcelas) Empty Re: [Resolvido]Inserir um campo novo no código e está dando erro (gerar parcelas)

    Mensagem  Alvaro Teixeira 20/1/2016, 17:35

    Olá, vejo que faltou o anexo do meu teste.
    No form no campo do valor mês coloque na origem do campo:

    =[CampoComValorTotal]/[CampoNrPrestacoes]

    E teste com a instrução sql da mensagem anterior.

    Abraço
    Lupércio
    Lupércio
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1143
    Registrado : 07/05/2011

    [Resolvido]Inserir um campo novo no código e está dando erro (gerar parcelas) Empty Re: [Resolvido]Inserir um campo novo no código e está dando erro (gerar parcelas)

    Mensagem  Lupércio 21/1/2016, 06:37

    Tente assim:

    CurrentDb.Execute "INSERT INTO tblExemplo(Compra,CpData,CpValor,Cpvalor1)" _
    & " Values(""" & Me.txtDescricao.Value & """, """ & Format(StrDateAdd, "mm/dd/yyyy") & """, """ & StrValorParc & """, """ & Cpvalor1 & """)"


    .................................................................................
    Quando tua dúvida for resolvida, de o retorno de agradecimento á aqueles que gastaram seu tempo para te ajudar.
    Clique no botão “Resolvido” logo acima do botão “Enviar” ao lado direito. Todos nós agradecemos.lol!Rolling Eyes
    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

    [Resolvido]Inserir um campo novo no código e está dando erro (gerar parcelas) Empty Re: [Resolvido]Inserir um campo novo no código e está dando erro (gerar parcelas)

    Mensagem  Alvaro Teixeira 21/1/2016, 09:40

    Olá a todos,
    Veja meu teste no anexo da mensagem nº 5.
    Lupércio, obrigado pela ajuda, vamos aguardar retorno do colega.
    Abraço
    avatar
    athenas1200
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 29
    Registrado : 29/03/2011

    [Resolvido]Inserir um campo novo no código e está dando erro (gerar parcelas) Empty Ficou muito bom

    Mensagem  athenas1200 21/1/2016, 11:23

    Parabéns.
    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

    [Resolvido]Inserir um campo novo no código e está dando erro (gerar parcelas) Empty Re: [Resolvido]Inserir um campo novo no código e está dando erro (gerar parcelas)

    Mensagem  Alvaro Teixeira 21/1/2016, 11:30

    Olá, o código do Lupércio também está bem.
    Estude o projecto e compare as alterações, aparentemente o problema era devido ao seu último campo no form.
    Obrigado pelo retorno e bons estudos.
    Abraço

    Conteúdo patrocinado


    [Resolvido]Inserir um campo novo no código e está dando erro (gerar parcelas) Empty Re: [Resolvido]Inserir um campo novo no código e está dando erro (gerar parcelas)

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 22/11/2024, 03:44