Private Sub Parol_KeyPress(KeyAscii As Integer)
    If KeyAscii = 13 Then
        If IsNull(DLookup("Parol", "Parametrs", "[Parol]='" & Me.Parol & "'")) & IsNull(DLookup("Cod", "Parametrs", "[Cod]='" & Me.Cod & "'")) Then
            If MsgBox("Введен неверный пароль или пользователь", vbOKCancel, "Авторизация") = vbCancel Then
               DoCmd.Close
            End If
        Else
                DoCmd.OpenForm "Старт"
        End If
    End If
End Sub

В чем ошибка?
Должно быть при совпадении значений из таблицы PARAMETRS полей PAROL и COD открытие формы Старт

http://www.sql.ru/forum/1124228/otkrytie-formy-cherez-avtorizaciu