Saving changes to records on Form (1 Viewer)
- Thread starter AdmiralN
- Start date
Hi arnelgp,
Sorry to keep bugging you. Hopefully this is a quick one to solve.
I wanted to keep it so that no records were displayed when the form first opened, but have the option to display all records with a package number 'All' that could be selected from the combopackage.
I thought this could be done by changing the LinkMasterFields to "" when 'ALL' was selected as a package.
My code is below
Code:
Private Sub ComboPackage_AfterUpdate()
If Me.ComboPackage.ListIndex = -1 Or Me.ComboPackage = 0 Then
Me.LabelActivities.Caption = "Activities"
If Me.ComboPackage = 0 Then
ShowPackageFields True
Me.subFormPackageActivity.Form.RecordSource = "select * from " & strRecordSource & " where (1=0);"
Else
Me.subFormPackageActivity.Form.RecordSource = strRecordSource
End If
ElseIf Me.ComboPackage.Column(1) = "All" Then
With Me.subFormPackageActivity
.LinkMasterFields = ""
End With
Else
Me.LabelActivities.Caption = "Activities for " & Me.ComboPackage.Column(1) & " - " & _
Replace(Me.ComboPackage.Column(2), "&", "&&")
ShowPackageFields False
Me.subFormPackageActivity.Form.RecordSource = "select * from " & strRecordSource & " where PackageID=" & Me.ComboPackage
End If
Me.txtSearchActivity = Null
End SubThis is causing a runtime error in the following line
Code:
Me.subFormPackageActivity.Form.RecordSource = "select * from " & strRecordSource & " where PackageID=" & Me.ComboPackage
Hi Arnel,
I wonder if I can trouble you for your help once more?
My DB no longer saves new records to the correct package number selected in the package combo box. New records are not assigned a package by default.
I not sure what I've changed to cause this.
Thanks.
Thanks so much for your help!
It seems while solving the bigger problem of saving records with the correct package number, the DB has lost the ability to filter by 'All' records.
This option when selected in the combo box does not show any records.
Any ideas why this may be?
Gasman
Enthusiastic Amateur
- Local time
- Today, 10:38
- Joined
- Sep 21, 2011
- Messages
- 14,232
Well I am about to go to work.
It seems arnelgp was not using the link fields, but setting the recordsource in code in the afterupdate event of the combo. So remove those two entries.
I can see a problem with that already as All still allows you to add a new record, when you cannot possibly know which ID it is for.?
So I would look at setting the PackageID from the combo ONLY on new record, and disable Additions if combo is 0.5
Best I can do at present, sorry.
It seems arnelgp was not using the link fields, but setting the recordsource in code in the afterupdate event of the combo. So remove those two entries.
I can see a problem with that already as All still allows you to add a new record, when you cannot possibly know which ID it is for.?
So I would look at setting the PackageID from the combo ONLY on new record, and disable Additions if combo is 0.5
Best I can do at present, sorry.
Well I am about to go to work.
It seems arnelgp was not using the link fields, but setting the recordsource in code in the afterupdate event of the combo. So remove those two entries.
I can see a problem with that already as All still allows you to add a new record, when you cannot possibly know which ID it is for.?
So I would look at setting the PackageID from the combo ONLY on new record, and disable Additions if combo is 0.5
Best I can do at present, sorry.
Thanks Gasman. I appreciate you taking the time to respond.
I did begin to understand (as you explained) what Arnel had done. His delinking of the master and child links was intentional. Unfortunately the rest of the code is way beyond my limited Access knowledge.
The 'All' option was added to giver users a option to search for a record using the 'Search Activity' text box, rather than having to select the correct package No. under which the record is located first.
The save button appears when the option 'create new package' is selected in the combo box. Clicking on this should add a new package to the list. However, this does not work either at the moment.
I'm not sure why Arnel chose to have the controls unbound.
Yes that is correct.
However, the creation of a new package will be rare. The list of packages of packages that is there is unlikely to change.
Users will mostly be adding records under the exiting packages. So they first select the correct package from the combobox and then add the record.
Gasman
Enthusiastic Amateur
- Local time
- Today, 10:38
- Joined
- Sep 21, 2011
- Messages
- 14,232
OK, I think I might have it working now, as my old version still had the link fields. :-(
It still needs a fair bit of work, but at least the package id is now being saved to the child table
Try the attached.
It still needs a fair bit of work, but at least the package id is now being saved to the child table
Try the attached.
Awesome! Thanks Gasman!
Similar threads
