Dim tempbFlight As String
tempFlight = DLookup("Flight", "FlightCCAccesslist", "WindowsID = '" & GetUserName() & "'")
DoCmd.OpenForm "maintable", acNormal, "[Flight] = tempFlight", , acFormEdit, acWindowNormal
Okay, I tried this. Coming up with no filtering. Stepping through the code...