I have a database that has 3 main tables:
tbl_StudInfo
tbl_Core
tbl_major
tbl_StudInfo is related to both tbl_Core and tbl_major:
tbl_StudInfo is related to tbl_Core with the Unique Primary Key "SID" from tbl_StudInfo and the Unique Primary Key "SID" from tbl_Core.
tbl_StudInfo is related to tbl_major with the Unique Primary Key "SID" from tbl_StudInfo and the Unique Primary Key "SID" from tbl_major.
Each table has a lot of information so I created three separate forms to view the information.
If I create a fourth form with tab control, I am still running into the issue of too many fields on one form which deletes the autonomy of the forms.
To keep the functionality in addition to the autonomy of the forms, I bound the individual forms in a Navigation Form. I am using the navigation form with the tabs across the top, but have included unique identifying information as a basis for the navigation form (SID, FirstName, LastName, Cohort) and then added the frm_StudInfo, frm_Core, and frm_major on tabs below the unique identifying information.
With this, I have two issues:
Issue 1:
How do I get these tables to "talk" to each other so that the records on one form relate to the other two forms? For example, records in tbl_StudInfo have general information. Each record has a coinciding record (related by the SID field) in the tbl_Core and tbl_major. If I choose record 3 in the first form (frm_StudInfo) in the Navigation form, it will not choose record 3 in the tbl_Core form when I navigate to the second form (frm_Core) - it goes back to the first record.
I tried to solve this issue with a module and I thought it worked. Here's my coding:
Public Sub Command31_Click()
On Error GoTo Err_Command31_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "tbl_Core"
stLinkCriteria = "[tbl_Core]=" & Me![tbl_Core]
DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_Command31_Click:
Exit Sub
Err_Command31_Click:
MsgBox Err.Description
Resume Exit_Command31_Click
End Sub
but it didn't work...
Issue 2:
I don't know if this was caused by creating the module, but I cannot add new records to the database using the forms. I can only update. I receive the error that states the (new) record cannot be found in tbl_StudInfo with matching SID.
Thank you in advance.
tbl_StudInfo
tbl_Core
tbl_major
tbl_StudInfo is related to both tbl_Core and tbl_major:
tbl_StudInfo is related to tbl_Core with the Unique Primary Key "SID" from tbl_StudInfo and the Unique Primary Key "SID" from tbl_Core.
tbl_StudInfo is related to tbl_major with the Unique Primary Key "SID" from tbl_StudInfo and the Unique Primary Key "SID" from tbl_major.
Each table has a lot of information so I created three separate forms to view the information.
If I create a fourth form with tab control, I am still running into the issue of too many fields on one form which deletes the autonomy of the forms.
To keep the functionality in addition to the autonomy of the forms, I bound the individual forms in a Navigation Form. I am using the navigation form with the tabs across the top, but have included unique identifying information as a basis for the navigation form (SID, FirstName, LastName, Cohort) and then added the frm_StudInfo, frm_Core, and frm_major on tabs below the unique identifying information.
With this, I have two issues:
Issue 1:
How do I get these tables to "talk" to each other so that the records on one form relate to the other two forms? For example, records in tbl_StudInfo have general information. Each record has a coinciding record (related by the SID field) in the tbl_Core and tbl_major. If I choose record 3 in the first form (frm_StudInfo) in the Navigation form, it will not choose record 3 in the tbl_Core form when I navigate to the second form (frm_Core) - it goes back to the first record.
I tried to solve this issue with a module and I thought it worked. Here's my coding:
Public Sub Command31_Click()
On Error GoTo Err_Command31_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "tbl_Core"
stLinkCriteria = "[tbl_Core]=" & Me![tbl_Core]
DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_Command31_Click:
Exit Sub
Err_Command31_Click:
MsgBox Err.Description
Resume Exit_Command31_Click
End Sub
but it didn't work...
Issue 2:
I don't know if this was caused by creating the module, but I cannot add new records to the database using the forms. I can only update. I receive the error that states the (new) record cannot be found in tbl_StudInfo with matching SID.
Thank you in advance.