Solved

Move to a record on a form based on another forms data

Posted on 2015-02-06
15
84 Views
Last Modified: 2015-02-06
This code is working to find the record in the other form but the records are filtered and it only shows one record... I want the code to bring me to the record on that form but not be filtered and show all of the other records..

Dim stDocName As String
    Dim stLinkCriteria As String
    stDocName = "MasterCamp"
   
    stLinkCriteria = "[ID]=" & Me![ID]
    DoCmd.OpenForm stDocName, , , stLinkCriteria
   
    DoCmd.Close acForm, Me.name
0
Comment
Question by:Shaft960
  • 9
  • 6
15 Comments
 
LVL 120

Expert Comment

by:Rey Obrero (Capricorn1)
ID: 40593484
try this codes

Dim stDocName As String
    Dim stLinkCriteria As String
    stDocName = "MasterCamp"
       DoCmd.OpenForm stDocName, openargs:=Me.[ID]
      

in the load event of form "MasterCamp", place this codes

private sub form_load()
if me.openargs & ""<>"" then

with me.recordsetclone
      .findfirst "[ID]=" & me.openargs
      if not .nomatch then
            me.bookmark=.bookmark
            else
            msgbox "Record not found"
      end if
end with

end sub
0
 

Author Comment

by:Shaft960
ID: 40594816
Does it matter that the form "MasterCamp" is already open?
0
 

Author Comment

by:Shaft960
ID: 40594825
Everything that I had in the code is working except for the fact that it is filtering all of the records and only showing the one record.  I want it to go to the record yet still have all the other records available.
0
The Eight Noble Truths of Backup and Recovery

How can IT departments tackle the challenges of a Big Data world? This white paper provides a roadmap to success and helps companies ensure that all their data is safe and secure, no matter if it resides on-premise with physical or virtual machines or in the cloud.

 
LVL 120

Expert Comment

by:Rey Obrero (Capricorn1)
ID: 40594942
did you try the code posted above?
0
 

Author Comment

by:Shaft960
ID: 40594945
Not yet, because I didn't see any coding to close the popup form... Do I put this coding in the button on the popup form and also in the onload of the already open MasterCamp form?
0
 
LVL 120

Expert Comment

by:Rey Obrero (Capricorn1)
ID: 40594951
in your original code, you are opening the form "MasterCamp" .

close the form "MasterCamp", then open it using the codes I posted,

and READ the suggestion.
0
 

Author Comment

by:Shaft960
ID: 40594964
Please look at the attached photo.. I don't want MasterCamp closed.  The second form that is on top is small... Currently when I click the "Go To" button on the small form it takes me to the correct record on the MasterCamp form but that is the only record available... I just want to go to that record but have the other records visible.
0
 

Author Comment

by:Shaft960
ID: 40594990
I tried it and it doesn't even change the record to the correct record now.... all I wanted it to do is show all the records rather that just one filtered one..
0
 

Author Comment

by:Shaft960
ID: 40594993
This coding brings me to exactly what I want except that it only shows the one record... I want the form to be on that record but in the navigation it shouldn't say 1 of 1 (Filtered)

Dim stDocName As String
    Dim stLinkCriteria As String
    stDocName = "MasterCamp"
   
    stLinkCriteria = "[ID]=" & Me![ID]
    DoCmd.OpenForm stDocName, , , stLinkCriteria
   
    DoCmd.Close acForm, Me.name
0
 
LVL 120

Expert Comment

by:Rey Obrero (Capricorn1)
ID: 40594996
upload a copy of your db
0
 

Author Comment

by:Shaft960
ID: 40595011
Click on Camper Data, and then click on the Reservation # button on the left.
Camping.mdb
0
 
LVL 120

Expert Comment

by:Rey Obrero (Capricorn1)
ID: 40595039
after clicking "Reservation # button " then how do we proceed?

what do you do next,
and what do you expect..
0
 

Author Comment

by:Shaft960
ID: 40595048
You find a reservation number that you want.. by searching in the combo box... then you click the little "Go To" button... in closes that form and moves to the correct record in MasterCamp but the records are filtered to only one record...I want to be on that record but have the bottom navagation control show all of the records..
0
 
LVL 120

Accepted Solution

by:
Rey Obrero (Capricorn1) earned 500 total points
ID: 40595062
test this
Camping-rev.mdb
0
 

Author Closing Comment

by:Shaft960
ID: 40595087
Thank you very much...
0

Featured Post

Complete VMware vSphere® ESX(i) & Hyper-V Backup

Capture your entire system, including the host, with patented disk imaging integrated with VMware VADP / Microsoft VSS and RCT. RTOs is as low as 15 seconds with Acronis Active Restore™. You can enjoy unlimited P2V/V2V migrations from any source (even from a different hypervisor)

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

QuickBooks® has a great invoice interface that we were happy with for a while but that changed in 2001 through no fault of Intuit®. Our industry's unit names are dictated by RUS: the Rural Utilities Services division of USDA. Contracts contain un…
It’s been over a month into 2017, and there is already a sophisticated Gmail phishing email making it rounds. New techniques and tactics, have given hackers a way to authentically impersonate your contacts.How it Works The attack works by targeti…
Familiarize people with the process of utilizing SQL Server functions from within Microsoft Access. Microsoft Access is a very powerful client/server development tool. One of the SQL Server objects that you can interact with from within Microsoft Ac…
Familiarize people with the process of retrieving data from SQL Server using an Access pass-thru query. Microsoft Access is a very powerful client/server development tool. One of the ways that you can retrieve data from a SQL Server is by using a pa…

813 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

8 Experts available now in Live!

Get 1:1 Help Now