[ Φόρμες ] Νέο όνομα ίδιο επώνυμο & ID

[alatis]

Καλημέρα σε όλη την παρέα
Θέλω να σας κάνω μια ερώτηση την οποία είχα κάνει και παλαιότερα αλλά μου απαντήθηκε κατά ένα μέρος γιαυτό το επαναφέρω το θέμα.
Όπως θα δείτε στο παράδειγμα που ανέβασα έχω φτιάξει μια φόρμα που κάνοντας 2κλικ πάνω στην "προβολή στοιχείων" ανοίγει μια άλλη tbl και εμφανίζει τα δεδομένα του Χ πελάτη. Πως γίνεται όταν κάνω 2κλικ πάνω στο "νεο όνομα" να ανοίγει η ιδια φόρμα tbl και να μου φέρνει μόνο το επώνυμο και το id και τα άλλα κενά για να κάνω νέα καταχώρηση?
Ελπίζω να έγινα κατανοητός
Ευχαριστώ πολύ
Φιλικα/Γιώργος

[Tasos]

Καλησπέρα σε όλους!

Αγαπητέ Γιώργο, το Id δεν θα χρειαστεί και δεν θα μπορέσεις να του δώσεις τιμή αφού η μορφή του είναι "αυτόματη αρίθμηση" και συμπληρώνεται αυτόματα.

Έστω ότι η ετικέτα σου έχει το όνομα "MyLabel".

Στο συμβάν "Με το διπλό κλικ" (DblClick) της ετικέτας επίλεξε "Δόμηση κώδικα" και στον VBE πέρασε το παρακάτω:

Private Sub MyLabel_DblClick(Cancel As Integer)
    DoCmd.OpenForm "tbl", , , , acFormAdd, acDialog, Me.EPONYMO
End Sub

Στη φόρμα "tbl" στο συμβάν "Με τη φόρτωση" (OnLoad) επίλεξε "Δόμηση κώδικα" και στον VBE πέρασε το παρακάτω:

Private Sub Form_Load()
   If Nz(Me.OpenArgs, vbNullString) <> vbNullString Then Me.EPONYMO = Me.OpenArgs
End Sub

Καλή συνέχεια!

Τάσος

[kapetang]

Καλησπέρα στην παρέα

Γιώργο η βάση δεδομένων, που ανέβασες, έχει μόνο ένα πίνακα «tbl» στον οποίο το πεδίο ID είναι πρωτεύον κλειδί (παίρνει μοναδικές τιμές). Αν γινόταν αυτό που ζητάς στον πίνακα «tbl» θα είχαμε πολλές έγγραφές με ίδια τιμή στο πεδίο ID !!!
Κατά τη γνώμη μου θα πρέπει να σχεδιάσεις καλύτερα τη βάση δεδομένων σου.
Αυτό προϋποθέτει κάποιες γνώσεις και φυσικά μελέτη για την απόκτησή τους.

Φιλικά/Γιώργος
Υ.Γ Είχα ετοιμάσει το παραπάνω μήνυμα όταν είδα το μήνυμα του Τάσου. Νομίζω όμως ότι κάτι προσθέτει.

[alatis]

Καλημέρα Τάσο και Γιώργο
Δεν έχω προλάβει να κάνω πράξη την πρόταση σου Τάσο αργά το βράδυ θα το δω
Ευχαριστώ πολυ
Φιλικά
Γιώργος

[alatis]

Γεία σας και πάλι
Τάσο σε ευχαριστώ πολύ δουλεύει άψογα όπως πάντα φυσικά
Ευχαριστώ παρα πολύ
Καλό βράδυ σε όλους σας
Φιλικά Γιώργος