MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    [Resolvido]Inserir dado em registro já inserido

    Compartilhe

    varjal
    Novato
    Novato

    Respeito às Regras 100%

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

    [Resolvido]Inserir dado em registro já inserido

    Mensagem  varjal em 17/8/2013, 16: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
    avatar
    matheuspereira
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

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

    boa tarde

    Mensagem  matheuspereira em 17/8/2013, 18: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..

    varjal
    Novato
    Novato

    Respeito às Regras 100%

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

    ok

    Mensagem  varjal em 4/10/2014, 01:54

    ok

      Data/hora atual: 24/9/2017, 01:23