Viewing Form saves record at the same time

[TecnicoAlpha]

Hello, this is my first time here at Bytes, and i'm a newbie to Access.

I'm really desperate.
Each time i enter a form, it saves a record automatically, wich is fine if it's a new record (Button "New Budget").
But for an existing record (for View/Edit Budget by BID), it´s a problema, because it´s saves the record you're editing plus another record (the one it saves entering the form).

I use a filter (Click event + Form Load):

 
Private Sub btn3_Click()
 
    If IsNull(txtClientName) Then
        MsgBox ("Please select a client")
    Else
        DoCmd.Close acForm, "Menu Budgets"
        DoCmd.OpenForm "O_2 - Avaliação Clínica Inicial" ', acNormal, , , , , Me.BID
        DoCmd.ApplyFilter "SELECT [O_2-AvaliaçãoClínicaInicial].* FROM [O_2-AvaliaçãoClínicaInicial] WHERE BID = TempVars!TempBID"
 
        End If
 
End Sub
 
 

 
Private Sub Form_Load()
 
    DoCmd.Maximize
    txtBID.Value = TempVars!TempBID
    txtClientName.Value = TempVars!TempClientName
 
    Me.Form.Filter = "BID=" & Me.txtBID
    Me.Form.FilterOn = True
 
End Sub
 
 

I tried an "Before Update" event code, but it asks the user if he wants to save soon after the form loads and then asks the same question on exiting the form, "Me.Undo" doesn't work while leaving the form, don´t know what else to do, because each time you enter/view the form, a new record is saved, and it buils up to hundreds.

Thanks in advance...

[TecnicoAlpha]

Found another problema :(
Consulting an existing record on a form, sometimes it shows the first record, but replaces the old BID (Budget ID, not primary key) on that record by the new one we're using :(

I think it has something to do with the filter i'm applying on OpenForm.

[jforbes]

I think you want to set the default value of the field instead of setting the field's value. By setting the value it makes the new record dirty, and Access is just doing you the favor of saving a Dirty record when the focus moves away from it. By setting the default, it doesn't create a Dirty record until something is actually entered in.

I would comment out these to lines:

Private Sub Form_Load()
 
    DoCmd.Maximize
    txtBID.Value = TempVars!TempBID
    txtClientName.Value = TempVars!TempClientName
 
    Me.Form.Filter = "BID=" & Me.txtBID
    Me.Form.FilterOn = True
 
End Sub

Then set the default value for txtBID to something like this:

=nz(TempVars("TempBID"),0)

and the default value for txtClientName to something like this:

=nz(TempVars("TempClientName"),"")

[TecnicoAlpha]

Thank you for your quick answer.

The client is created on a form, then through the main menu the client is selected in a ComboBox (which sets the values of the TempVars)

These two variables are used to populate the name and ID of the client on an unbound textbox "txtClient" and his "txtBID" (Budget Identification nunmber) on each and every Form, this way the user can go from form to form always entering data for the same cliente and see his name on top, until he exits to the main menu, where the TempVars are cleared :

TempVars!TempBID
TempVars!TempClientName

The problem is that each form is a new record or has to show always previous entered data.

[TecnicoAlpha]

The Form is always "Dirty" because the present Date is set by default on one of the fields (requested by our client)