Thanks for replying mate!
This is whats under the "Place an order" button...
Private Sub cmdOrder_Click()
On Error GoTo Err_cmdOrder_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "Orders"
DoCmd.OpenForm stDocName, , , stLinkCriteria...