Solved Records show up only if I click twice (1 Viewer)

[ramasco]

Hi,

Private Sub CmdModificaContraente_Click() ' [MODIFICA] button
On Error Resume Next

With CodeContextObject
DoCmd.OpenForm "Ins_Azienda", acNormal, "", "[Symphony]=" & Me.txtSymphony, , acNormal
End With

Forms(Ins_Azienda).AllowEdits = False

End Sub

It opens the form and doesn't shows any thing. All the fields are white. If i press again the same button [MODIFICA] shows up all the right data in all the fields.
I'm afraid that this situation involve the problem I had with the other conversation we had yesterday.
>>> I can't quote it here because of the spam-like detector . It's in general "Gost Form hard to delete"<<<
The Temp was a copy of Forms(Ins_Azienda)
Even because I'm having hard time to make others things around "Ins_Azienda").
To be secure and reading more of your posts, today I delete all the data and compact it just in case. I am also having trouble setting the color change of the field related on a If .AllowEdits True or False. And I'm not understanding why.
I hope my explanation is good enough

Thank you in advance

 

[theDBguy]

Hi. Just curious with your use of CodeContextObject, are you creating an Add-In?

 

[ramasco]

Ups.... nop... thas's a heredity of all my tests.
I generated a macro to check what was wrong. And I forgot to cancel.
I found out it doesn't change.

 

[theDBguy]

Ups.... nop... thas's a heredity of all my tests.
I generated a macro to check what was wrong. And I forgot to cancel.
I found out it doesn't change.

Okay. Is the Data Entry property of the Form you're trying to open set to "Yes?" If so, try setting it to "No."

 

[ramasco]

Yes yes yes yes yes!!!!
Thank you

 

[theDBguy]

Yes yes yes yes yes!!!!
Thank you

Hi. You're welcome. Glad to hear you got it sorted out. Good luck with your project.