Edit/Refresh

I have the following code to edit some fields in a database and then refresh some forms.

Form10.Data1.Recordset.FindFirst "Name = '" & Label1.Caption & "'"
Form10.Data1.Recordset.Edit
Form10.Data1.Recordset.Fields(16).Value = Label6.Caption
Form10.Data1.Recordset.Fields(18).Value = Text1.Text
Form10.Data1.Recordset.Fields(11).Value = Combo3.Text
Form10.Data1.Recordset.Update
Form10.Data1.Refresh
Form9.Adodc1.Recordset.Update
Form9.Adodc1.Refresh
Form8.Adodc1.Recordset.Update
Form8.Adodc1.Refresh
Form8.MSHFlexGrid1.Refresh

The editing part works fine but the problem is in the refresh code. Forms 9 and 10 refresh properly but you must click the button twice to make Form8 update, can anyone tell me why?
http://simulatorcentral.cjb.net
Sign In or Register to comment.

Howdy, Stranger!

It looks like you're new here. If you want to get involved, click one of these buttons!

Categories