gracie1972
asked on
Open forms with same record on a different form
I have a Add New Record form and a Edit Resource Form.
Add Resource Form Fields: (Populated from a combo box that pulls from active directory)
Resource ID
First
Last
Full Name
Email
Edit Resource Form:
Resource ID
First
Last
Full Name
Email
Plus additional information that is needed to add in addition to what was populated from Active Directory.
I want to be able to:
1) Add a Resource.
2) Save and open a new form to edit and add additional information.
3) Open the Edit Resource Form using the same primary ID that is linked to all the data.
This seems simple and all the code I have tried does not work.
Problem. When I open up my form in "Edit Mode" by the same Resource ID, it opens the form in Edit mode and brings over the same Resource ID, however, when the form opens and a record displays by default it over rides what Resource ID is already there and now I have my new Resource ID linked to the old records Resource ID's information (First, Last, ect)
I want to be able to open a the second form, display all the records by the Resource ID, not just populate the Resource ID.
Here are both codes that I have tried:
Code 1: (standard access default)
-------------------------- ---------- ---------- ---------- --------
Private Sub cmdEditOpen_Click()
On Error GoTo Err_cmdEditOpen_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "frmEditResources"
stLinkCriteria = "[ResourceID]=" & "'" & Me![ResourceID] & "'"
DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_cmdEditOpen_Click:
Exit Sub
Err_cmdEditOpen_Click:
MsgBox Err.Description
Resume Exit_cmdEditOpen_Click
End Sub
Code 2:
-------------------------- ---------- ---------- ---------- ---------- -
Private Sub cmdEdit_Click()
On Error GoTo Err_cmdEdit_Click
DoCmd.OpenForm "frmEditResources", acNormal, , , acFormEdit
[Forms]![frmEditResources] ![Resource ID] = [Forms]![frmAddResources V2]![ResourceID]
[Forms]![frmEditResources] ![Last] = [Forms]![frmAddResources V2]![Last]
[Forms]![frmEditResources] ![First] = [Forms]![frmAddResources V2]![First]
[Forms]![frmEditResources] ![Full Name] = [Forms]![frmAddResources V2]![Full Name]
[Forms]![frmEditResources] ![Email] = [Forms]![frmAddResources V2]![Email]
Exit_cmdEdit_Click:
Exit Sub
Err_cmdEdit_Click:
MsgBox Err.Description
Resume Exit_cmdEdit_Click
End Sub
-------------------------- ---------- ---------- ---------- ---------- ---------- ---------- ---------- ---------- ---------- ---------- -----
If I combined the efforts on one form, it can get confusing for day to day users who may accidentally add a new user thinking they can search from the drop down.
If there is an easier suggestion, please let me know.
THANKS!
Add Resource Form Fields: (Populated from a combo box that pulls from active directory)
Resource ID
First
Last
Full Name
Edit Resource Form:
Resource ID
First
Last
Full Name
Plus additional information that is needed to add in addition to what was populated from Active Directory.
I want to be able to:
1) Add a Resource.
2) Save and open a new form to edit and add additional information.
3) Open the Edit Resource Form using the same primary ID that is linked to all the data.
This seems simple and all the code I have tried does not work.
Problem. When I open up my form in "Edit Mode" by the same Resource ID, it opens the form in Edit mode and brings over the same Resource ID, however, when the form opens and a record displays by default it over rides what Resource ID is already there and now I have my new Resource ID linked to the old records Resource ID's information (First, Last, ect)
I want to be able to open a the second form, display all the records by the Resource ID, not just populate the Resource ID.
Here are both codes that I have tried:
Code 1: (standard access default)
--------------------------
Private Sub cmdEditOpen_Click()
On Error GoTo Err_cmdEditOpen_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "frmEditResources"
stLinkCriteria = "[ResourceID]=" & "'" & Me![ResourceID] & "'"
DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_cmdEditOpen_Click:
Exit Sub
Err_cmdEditOpen_Click:
MsgBox Err.Description
Resume Exit_cmdEditOpen_Click
End Sub
Code 2:
--------------------------
Private Sub cmdEdit_Click()
On Error GoTo Err_cmdEdit_Click
DoCmd.OpenForm "frmEditResources", acNormal, , , acFormEdit
[Forms]![frmEditResources]
[Forms]![frmEditResources]
[Forms]![frmEditResources]
[Forms]![frmEditResources]
[Forms]![frmEditResources]
Exit_cmdEdit_Click:
Exit Sub
Err_cmdEdit_Click:
MsgBox Err.Description
Resume Exit_cmdEdit_Click
End Sub
--------------------------
If I combined the efforts on one form, it can get confusing for day to day users who may accidentally add a new user thinking they can search from the drop down.
If there is an easier suggestion, please let me know.
THANKS!
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
ASKER
I know in SSRS you can hide/unhide data, I was not sure I can use the same logic?
1) Add new record
2) Form clears for adding
3) drop down becomes visible to select from and my other drop down for searching becomes hidden.
Is this to complex?