OK, What Am I Doing Wrong?

Time for you form experts to lend a hand.... what I have is 2 tables with queries based directly on them with no criteria and forms directly on the queries.

custtbl
CustID ----Text-Primary Key
Custname--Text-non essential just identifies customer

equiptbl
CustIDFK - Text-Foreign Key
EquipID -- Text -Primary Key
EquipDesc-Text -non essential just identifies equipment

qucust
CustID ----Text-PK
Custname--Text

quEquip
CustIDFK - Text
EquipID -- Text -PK
EquipDesc-Text

fmcust
CustID ----Text-PK
Custname--Text
button - vba code

fmEquip
CustIDFK - Text
EquipID -- Text -PK
EquipDesc-Text

On the button for fmcust, I have the following code:
Code:Private Sub Command7_Click()On Error GoTo Err_Command7_ClickDim strid As Stringstrid = Me.CustIDIf IsNull(DLookup("custidFK", "equiptbl", "custidfk =' " & Me.CustID & " ' ")) Then strQuery = "INSERT INTO equiptbl(custidfk) Values('" & strid & "');" DoCmd.SetWarnings False DoCmd.RunSQL strQuery DoCmd.SetWarnings TrueEnd If Dim stDocName As String Dim stLinkCriteria As String stDocName = "fmequip" stLinkCriteria = "[CustIDFK]=" & "'" & Me![CustID] & "'" DoCmd.OpenForm stDocName, , , stLinkCriteriaExit_Command7_Click: Exit SubErr_Command7_Click: MsgBox Err.Description Resume Exit_Command7_Click End Sub Now, for an existing record, this pulls it up fine, but if the record doesn't exist, then I want it to create a new record in the equiptbl and pull it up in fmequip. I've done some error checking, and everything works fine up to the insert to part of the vba. I have a feeling it's something simple, but I'm too much into it to look at it objectively. (I've had a lot of distractions all weekend - dogs, kids, roommate, roommate's kids, I just want to punch anything that makes noise, lol)

Here is the sample I'm working with. Record 1 from the customer table is included in the equipment table, record 2 is not.

Edit: As it is, if the record doesn't exist in equiptbl, it pulls up the form with an entirely new record, everything blank, but I want the customer ID to populate the custidFK field of the equiptbl if the record doesn't exist in equiptbl (sort of autocompleting part of the new record if you will).