Two Forms based on One Table

[blueraincoat]

Hi all,
I have a form which contain too many lables that makes the form too big, and I'm thinking to seperate it to two forms.


I add a cmd button on the first form and used DoCmd.OpenForm to open the second form, the two forms both have the primary key.
Here comes the problem when I close the form after entering records, there's a system warning of data integrity. I also tried the acFormEdit, but it does not work.
Any one have an idea?
Thanks in advance.

[pbaldy]

Having that many fields implies a normalization issue. What do they all represent? You should be able to get around the problem by either closing the first form or at least forcing a save of the data when you open the second form. In my experience, the error you describe occurs when two forms have the same record dirtied. You might also consider a single form with a tab control to organize the data, which is what I would likely do.

[blueraincoat]

Thanks Paul.
The form is used to record repair actions, but there's also many repair instructions about how to do it, and it gets too big.
So if saved the first part before I dirty the second part that would be OK,right?

[blueraincoat]

Hi Paul,
I tried the tab control and it solved the issue perfectly, the only thing left is to decorate the tab control.
So when I switch from one tab to another tab, it saved the first part and then edit the others, am I right?

[pbaldy]

I suspect repair instructions should be in a one-to-many related table, but that's just a gut feeling. As to your question, no; moving from tab to tab does not trigger a save, presuming all the controls are directly on the form (as opposed to a subform). The tab control simply organizes the controls; they are all still on the same form.

[blueraincoat]

Hi Paul, take a look at the attachment picture, it's something like that.
Thanks for the explanation about the tabl control.

By the way I tried to make the two forms work, but failed.
Could you pleas take a look at the sample db and help find what's going wrong?

[blueraincoat]

Hi Paul,
I tried to insert data from the second form to the same table with a UPDATE query.
The code I have is like this:
Private Sub Command8_Click()
Dim mySQL As String
mySQL = "UPDATE tbl SET tbl.C= Me.C"
mySQL = mySQL & " Where tbl.A=' " & Me.A & "'"

CurrentDb.Execute mySQL, dbFailOnError

End Sub

There's a runtime erro 3061,need more parameter,expecting 1.
Can you help find what's going wrong?

[June7]

Concatenate Me.C into the string. Is field a number datatype?

mySQL = "UPDATE tbl SET tbl.C= " & Me.C
mySQL = mySQL & " Where tbl.A='" & Me.A & "'"

[blueraincoat]

No ,it's a string type

[June7]

Okay, then include the apostrophe delimiters just like with the Me.A concatenation.

[blueraincoat]

Thanks June7,that works!