I am trying to link my customerID and my TroubleTicketID to my work order.

I have a subform under the customer form that shows all of the trouble Tickets for that particular customer. I want to create a button that will open a new work order and populate the customerID and the trouble ticketID so that the association will work properly.

I am using the following code.

Private Sub Command10_Click()
On Error GoTo Err_Command10_Click

Dim stDocName As String
Dim stLinkCriteria As String
DoCmd.RunCommand acCmdSaveRecord
stDocName = "WorkOrder"

stLinkCriteria = _
"([TroubleTicketID]=" & Me![TroubleTicketID] & _
") And ([CustomerId]=" & Me![CustomerID] & _
") AND [workorderId]= -1"


DoCmd.OpenForm stDocName, , , stLinkCriteria

Exit_Command10_Click:
Exit Sub

Err_Command10_Click:
MsgBox Err.Description
Resume Exit_Command10_Click

End Sub

Any help would be appreciated.
MrFormula

This will not work because it is looking for existing records, not populating fields.

In the form's On Open event, I think, take values from the parent form that is already open:

(Me.) = the new form...

Me.CustomerID = [Forms]![frmParentForm].[CustomerID]
Me.TroubleTicketID = [Forms]![frmParentForm].[TroubleTicketID]

If the form is set to open on a new record, this should auto populate the fields.

Did this help?



mmcdonal