Missinglinq: Here is the code that Im using:
Dim COLOR1, COLOR2, COLOR3, CUSTOMER As String
COLOR1 = Nz(DLookup("[ColorOne]", "order", "[SalesOrderNo] = Form![DOCKET]"), 0)
COLOR2 = Nz(DLookup("[ColorTwo]", "order", "[SalesOrderNo] = Form![DOCKET]"), 0)
COLOR3 = Nz(DLookup("[ColorThree]"...