Καλησπέρα
Η βάση δεδομένων που επισυνάπτω αποτελεί μια προσομοίωση του ζητούμενου.
Περιέχει:
1) Τον πίνακα «tblSuppliers» που περιέχει τα στοιχεία των προμηθευτών.
2) Τον πίνακα «tblProducts» που περιέχει τα στοιχεία των προϊόντων.
3) Τον πίνακα «tblSupplies» με τους κωδικούς των προμηθευτών και των αντίστοιχων προϊόντων που προμήθευσαν.
4) Το ερώτημα «qrySupplies» που εμφανίζει στοιχεία των παραπάνω πινάκων.
5) Τη φόρμα «frmSupplies» που περιέχει τα σύνθετα πλαίσια «Προμηθευτές» και «Προϊόντα».
Όταν επιλέγεται ένας προμηθευτής το σύνθετο πλαίσιο «Προϊόντα» εμφανίζει μόνο τα προϊόντα που προμήθευσε.
Η λειτουργικότητα αυτή στηρίζεται στην προέλευση γραμμής των σύνθετων πλαισίων και στο σχετικό κώδικα.
Κώδικας:
SELECT DISTINCT qrySupplies.SupID, qrySupplies.SupName FROM qrySupplies;
Κώδικας:
SELECT DISTINCT qrySupplies.ProID, qrySupplies.ProName FROM qrySupplies WHERE qrySupplies.SupID)=[Forms]![frmSupplies]![cboSup];
Κώδικας:
Private Sub cboSup_AfterUpdate()
Me.cboProducs.Requery
Me.cboProducs.Value = Null
End Sub
Φιλικά/Γιώργος