Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Chris Miller on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

GoToRecord in Form

Status
Not open for further replies.

bruce24444

Technical User
Mar 23, 2007
3
CA
Tbl:Claim_Assignment
Field Name: Adjuster
Field Name: Assigned Date
Field Name: Prov
Field Name: Claim Number
Field Name: Type of Loss
Field Name: Insureds Name
Field Name: Ext_Adjuster

Frm:Main
Text Box: Assigned Date – Bound to Claim_Assignment!Assigned Date
Text Box: Province – Bound to Claim_Assignment!Prov
Text Box: Claim Number – Bound to Claim_Assignment!Claim Number
Text Box: Loss Type – Bound to Claim_Assignment!Type of Loss
Text Box: Adjuster – Bound to Claim_Assignment!Adjuster
Text Box: Insureds Name – Bound to Claim_Assignment!Insureds Name

What I’m trying to do is once a file is reviewed and if it requires to be sent to an external adjuster, I want the form to go to the existing record, disable all of the existing data input in Frm:Main and have a textbox which is enabled for Ext_Adjuster.

So what I have so far is:

Frm:Assign_External

In the form header I have:
Text Box: Claim Number
Command Button: GoToRecord

In the details section I have:
Text Box: Claim Number – Bound to Claim_Assignment!Claim Number (Disabled)
Text Box: Loss Type – Bound to Claim_Assignment!Type of Loss (Disabled)
Text Box: Adjuster – Bound to Claim_Assignment!Adjuster (Disabled)
Text Box: Insureds Name – Bound to Claim_Assignment!Insureds Name (Disabled)
Text Box: Ext_Adjuster – Bound to Claim_Assignment! Ext_Adjuster (Enabled)

When I click on Command Button: GoToRecord, nothing happens.

How can I get this button to go to the specific claim number that is entered in the Claim Number Text Box in the header and return the existing values in the details section of the form?

Built and running with Access 97
 
This is what Access generated and it doesn't work:


Option Compare Database
Option Explicit

Private Sub Find_Record_Click()
On Error GoTo Err_Find_Record_Click


Screen.PreviousControl.SetFocus
DoCmd.DoMenuItem acFormBar, acEditMenu, 10, , acMenuVer70

Exit_Find_Record_Click:
Exit Sub

Err_Find_Record_Click:
MsgBox Err.Description
Resume Exit_Find_Record_Click

End Sub

Private Sub GoToRecord_Click()

End Sub
 
I need to know the exact name of the control for the search box in the hearder and the claim number in the detail. Not what the label says and not what the field is bound to. I ask this because you called both of them Claim Number.

With this I may be able to get you some code.

ProDev, MS Access Applications
Visit me at ==>
May God bless you beyond your imagination!!!
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top