[kapetang]

Καλησπέρα και πάλι

Στη ΒΔ που επισυνάπτω έχω προσθέσει και τη φόρμα client2 στην οποία το φιλτράρισμα με βάση τον αριθμό κυκλοφορίας γίνεται με καλύτερο τρόπο.

1. Η προέλευση της γραμμής του σύνθετου πλαισίου είναι το ερώτημα:
SELECT car.customer_id, car.ar_kikl FROM car UNION Select 0 as customer_id, "<<ALL>>" as ar_kik FROM car ORDER BY 2;

2. Ο κώδικας είναι:

Private Sub cboNumCar_AfterUpdate()
    If IsNull(Me.cboNumCar) Or Me.cboNumCar = 0 Then
        Me.Filter = ""
        Me.FilterOn = False
    Else
        Me.Filter = "[client]![customer_ID]=" & Me.cboNumCar
        Me.FilterOn = True
    End If
End Sub

Φιλικά/Γιώργος