Hi, I have been building a database for some time now, and felt I had got to point when I could start entering data into it to start building the reports and queries, however when I try and input sample data I run into problems.

The first form inputs correctly and saves and opens the next form, however on all subsequent forms the data is not saved.

Here is the VBA I use for the Save button on the first form...

Private Sub SaveRecord_Click()

Dim NextForm As String

    If Me.Status = "Pupil / Child" Then
        NextForm = "StudentDetail"
    Else
        NextForm = "EmployerDetails"
    End If

    DoCmd.save
    DoCmd.Close
    DoCmd.OpenForm NextForm
End Sub


Private Sub SaveRecord_DblClick(Cancel As Integer)

Dim NextForm As String

    If Me.Status = "Pupil / Child" Then
        NextForm = "StudentDetail"
    Else
        NextForm = "EmployerDetails"
    End If

    DoCmd.save
    DoCmd.Close
    DoCmd.OpenForm NextForm

End Sub


And here is the code I am using for the Save button on form "EmployerDetails"

Private Sub SaveRecord_Click()

DoCmd.save
DoCmd.Close
DoCmd.OpenForm "GeneralInfo"

End Sub


Private Sub SaveRecord_DblClick(Cancel As Integer)

DoCmd.save
DoCmd.Close
DoCmd.OpenForm "GeneralInfo"

End Sub


I can not work out why this would not save the data into the table "EmployerDetails" and why Access is not prompting me of the errors. Please help.

I have been looking further into this, and have added a "Save record" Control box, by using the wizard which gives me this code,

Private Sub Command23_Click()
On Error GoTo Err_Command23_Click


    DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70

Exit_Command23_Click:
    Exit Sub

Err_Command23_Click:
    MsgBox Err.Description
    Resume Exit_Command23_Click

End Sub

Now when I navigate to "Employer Details" after filling out "PersonDetails" then click on "Command23" button, I get the error window "You can not add or change a record because a related record is required in table "PersonDetails".

Well the related record is present in "PersonDEtails" as I can view the data entered in the table view, however the link between "PersonDetails.PersonKey" and "EmployerDetails.PersonKey" does not appear to work...

What could I have done wrong that would cause the form not to get the PersonKey field from the previous table???

Surely there is a way where the user would not have to input the PersonKey on every form they are entering??

You definitely do NOT want the user to enter the PersonKey on any form. What you do want to do is fill the value of the employer form with PersonKey using VBA prior to the save.

One way to do this is have a textbox in the employer form called me.PersonKey(which probably should be invisible), linked to Employer.Personkey.

Then, have the assignment before the save:

Me.PersonKey=<<some value>>.
DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70


<<some value>> would be, of course, the Personkey from PersonDetails. There are many ways to pass this value to the current screen. But it has to be done explicitly, unless you are using a linked subform, which is another topic.

The other thing here is that your data model seems like it could use some improvement, if i understand correctly how you seem to have things set up. That's also another topic.

I hope this is somewhat helpful to you.