locked
Erro no Update RRS feed

  • Pergunta

  • Tenho uma tabela onde os dados deverão ser inseridos via formulário. Estes dados farão parte de um cálculo futuramente.

    Tabela TENDENCIA

    Campos: dias_realizados e dias_tendencia

     

    Formulário: frm_tend

    Controles acoplados: txtDiasReal e txtDiasTend

     

    No firmulário há um botão chamado CALCULAR que ao ser pressionado devrá executar um cálculo em um outro campo de uma outra tabela. Este outro campo a ser atualizado de outra tabela é o seguinte:

    Tabela: Base_Geral

    Campo: Unidades_Gross

     

    Isto é, o campo Unidades_Gross da tabela Base_Geral deverá ser atualizado com o seguinte cálculo:

    ( [Base_Geral]![Unidades_Gross] / Forms![frm_tend]![txtDiasReal].Text ) * Forms![frm_tend]![txtDiasTend].Text

     

    Eu escrevi o seguinte código no evento ON CLICK do botão CALCULAR do formulário frm_tend

    Private Sub cmdCalc_Click()

    Dim dr As Double
    Dim dt As Double
    Dim calc As Double

     

    dr = Me![txtDiasReal]
    dt = Me![txtDiasTend]

     

    Update [Base_Geral]  Set [Base_Geral].[Tendencia] = ([Base_Geral]![Unidades_Gross] / dr) * dt

     

    O campo Unidades_Gross da tabela Base_Geral não está sendo atualizado. Está dando erro no UPDATE. Alguém pode me dizer o porquê?!

     

    Desde já, agradeço a todos.

     

    Aline Alves
    sexta-feira, 25 de abril de 2008 14:22

Todas as Respostas

  • A instrução SQL não pode ficar "solta" assim. Execute-a desta forma:

     

    CurrentDB.Execute "Update [Base_Geral]  Set [Base_Geral].[Tendencia] = ([Base_Geral]![Unidades_Gross] / dr) * dt"

     

     

     

     

    sexta-feira, 25 de abril de 2008 15:03
    Moderador