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]Inserir dado em registro já inserido

    avatar
    varjal
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Inserir dado em registro já inserido Empty [Resolvido]Inserir dado em registro já inserido

    Mensagem  varjal Sáb 17 Ago 2013, 12:38

    Uma construtora usa um banco de dados que eu criei para inserir lotes de um condomínio vendidos. A partir de dados do formcontratos são inseridas todas as parcelas a vencer até a liquidação da compra.

    Utilizo o código abaixo para inserir parcelas de um contrato:

    Private Sub Comando83_Click()
    On Error GoTo Err_Comando83_Click

    Dim I As Integer

    For I = 1 To Parcelas_Quantidade

    CurrentDb.Execute "INSERT INTO tab_Parcelas([Contrato],[Versão],[Cliente],[Tipo],[Empreendimento],[Objeto],[Vencimento],[Valor],[OBS],[Parcela],[De]) VALUES ('" & Número & "','" & Versão & "','" & Cliente & "','" & Tipo1 & "','" & Empreendimento & "','" & Objeto & "','" & DateAdd("m", I - 1, Parcelas_DataInicial) & "'," & Parcelas_Valor & ",'" & OBS & "'," & I & "," & Parcelas_Quantidade & ")"
    Next


    Me.Requery

    MsgBox "Prestações Inseridas", vbOKOnly, "OK"



    Exit_Comando83_Click:
    Exit Sub

    Err_Comando83_Click:
    MsgBox Err.Description
    Resume Exit_Comando83_Click

    End Sub

    Até aí tudo funciona. agora preciso, todo mês, abrir as parcelas que estão vencendo e aplicar uma correção (índice divulgado pelo governo). teria como criar um código, provavelmente adaptar deste, para que ele abra as prestações com vencimento no mês que vou informar e insira um número no campo correção?


    PS: quando o BD ficar pronto irei postá-lo na íntegra no Repositório.

    Grato
    matheuspereira
    matheuspereira
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 513
    Registrado : 31/12/2012

    [Resolvido]Inserir dado em registro já inserido Empty boa tarde

    Mensagem  matheuspereira Sáb 17 Ago 2013, 14:26

    Olá amigo, use uma consulta atualização, para buscar os registro que quer e atualiza-los da maneira que vc necessita. Qualquer duvida poste seu bd que tento ajudar vc..
    avatar
    varjal
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Inserir dado em registro já inserido Empty ok

    Mensagem  varjal Sex 03 Out 2014, 21:54

    ok

    Conteúdo patrocinado


    [Resolvido]Inserir dado em registro já inserido Empty Re: [Resolvido]Inserir dado em registro já inserido

    Mensagem  Conteúdo patrocinado


      Data/hora atual: Sex 22 Nov 2024, 11:28