Μεταφορά περιεχομένου λίστας σε σύνθετο πλαίσιο άλλης φόρμας

[stavros2244]

Καλημέρα σε όλα τα μέλη του forum!
Απ' ότι έριξα μια ματιά στο περιεχόμενο, οφείλω να πω ότι κάνετε πολύ καλή δουλειά!

Στο θέμα μας τώρα!

Έχω μία φόρμα(frm2), στην οποία έχω μία λίστα(list1). Η λίστα είναι κενή και δέχεται τιμές από κομμάτι κώδικα από άλλα μέρη της φόρμας τα οποία χειρίζονται από τον χρήστη. Δηλαδή, ο χρήστης χειρίζεται σύνθετα πλαίσια, πλαίσια κειμένου κτλ και συμπληρώνεται η λίστα.
Αυτό που θέλω είναι όταν πατάω ένα κουμπί, να μεταφέρεται το index της λίστας σε έναν κενό πίνακα tbl1.
Σε μία άλλη φόρμα, χρησιμοποιώ ένα σύνθετο πλαίσιο, το οποίο θέλω να έχει rowsource το περιεχόμενο του πίνακα tbl1.
Ουσιαστικά, θέλω τα περιεχόμενα της λίστας - όταν αυτή συμπληρώνεται να περνάνε με ένα κουμπί ως rowsource ενός σύνθετου πλαισίου μίας άλλης φόρμας(frm2).

Πως θα μπορούσα να το κάνω αυτό?

Ευχαριστώ!

[pm4698]

Σταύρο είχα κι εγώ τέτοιο θέμα και δημιούργησα έναν πίνακα με δύο πεδία. Το ένα είναι το Αυτόματη Αρίθμηση(paperID) και το άλλο είναι το Author_name. Ο πίνακας ονομάζεται tblPaper ενώ η λίστα ονομάζεται author_list. Δοκιμάζω το παρακάτω για να περάσω τις τιμές του listbox στον άδειο πίνακα αλλά δεν δούλεψε..

Private Sub button_Click()

Dim varItem As Variant
Dim strCriteria As String
Dim strSQL As String
Dim strSQL2 As String

strSQL = "INSERT INTO tblPaper (Auhor_name) VALUES(" & Me!author_list & ", "

If Me!l1.ItemsSelected.Count > 0 Then
For Each varItem In Me!author_list
strSQL2 = strSQL & Me!author_list.ItemData(varItem) & ");"
CurrentDb.Execute strSQL
Next varItem
End If

Exit Sub

End Sub

Αν τον παραμετροποιήσεις και δουλέψει ρίχτο!

[stavros2244]

Βρήκα άλλη προσέγγιση:
Με ανοιχτή την φόρμα form1ενώ ανοίγει η φόρμα frm2:

Στο click event του button βάζω:
Form_form2name.comboboxname.RowSource = Me.listboxname.RowSource

Στο Open event της φόρμας form2 βάζω:
Me.comboboxname.RowSource = Form_form1name.listboxname.RowSource
και δουλεύει μια χαρά.
Σκέφτηκα όμως, ότι θα δούλευε καλύτερα το παράδειγμά μου εάν το σύνθετο πλαίσιο το μετέτρεπα σε πλαίσιο κειμένου με rowsource από έναν πίνακα tblPaper. Αυτός ο πίνακας θα γεμίζει με κουμπί από την φόρμα που είναι το listbox. Έτσι, μετατρέπω τη φόρμα μου σε συνεχή και μου βγάζει το ίδιο για όλες τις τιμές της λίστας κάτι που θέλω στην εφαρμογή μου.
Δοκίμασα στο on click event του button το εξής:
currentdb.execute ("INSERT INTO tblPaper(Lastname) VALUES ('" & me.listboxname& "','" ) ;
αλλά μου βγάζει λάθος.
Να επισημάνω ότι ο πίνακάς μου έχει δύο πεδία. Ένα είναι αύξων αριθμός και το άλλο είναι το Lastname

[stavros2244]

Μήπως πρέπει να βάλω στην παρένθεση, το tblPaper(ID, Lastname) ?Δηλαδή να πρέπει να δηλώσω και τα δύο πεδία?Ή μήπως να αναφερθώ σε στήλες?

[Tasos]

Σταύρο καλησπέρα!

Να επισημάνω ότι ο πίνακάς μου έχει δύο πεδία. Ένα είναι αύξων αριθμός και το άλλο είναι το Lastname

Το listboxname τι πεδία έχει και ποια στήλη είναι δεσμευμένη;

Φιλικά

Τάσος

[stavros2244]

Το listbox είναι σε μορφή λίστα τιμών και το γεμίζω με ονόματα μέσω άλλων ερωτημάτων. Επίσης, έχει μία στήλη η οποία είναι και η δεσμευμένη. Άρα όταν πατάω το κουμπί, λογικά θα πρέπει να μου μεταφέρει την μοναδική στήλη που έχει με τα ονόματα στην στήλη Lastname του πίνακα tblPaper αλλά μου βγάζει πρόβλημα

[Tasos]

Καλημέρα!

Σταύρο, αν σου είναι εύκολο, επισύναψε μας ένα παράδειγμα για να μπορέσουμε να
έχουμε μια πιο πλήρη εικόνα του ζητούμενου σου και να σου δώσουμε την κατάλληλη απάντηση.

Φιλικά

Τάσος

[stavros2244]

Στο συνημμένο φαίνεται αυτό που θέλω. Ο πίνακας tblPaper είναι κενός. Στην μία φόρμα μέσω comboboxes περνιούνται τα ονόματα στην λίστα της ίδιας φόρμας.

Έπειτα, πιέζοντας το κουμπί Transfer θέλω να μεταφέρονται οι τιμές της λίστας στο πεδίο Lastname του πίνακα tblPaper.
Έπειτα, έχω μία φόρμα η οποία έχει ένα textbox και είναι σε μορφή συνεχούς φόρμας. Το rowsource του textbox θα είναι η στήλη Lastname του μόλις συμπληρωμένου πίνακα tblPaper. και ως συνεχή φόρμα θα μου εμφανίζει κάθε Lastname του tblPaper σε ξεχωριστή εγγραφή.
Και κάτι άλλο που δεν ξέρω πως γίνεται..Στον αρχικό πίνακα με τα ονόματα tblNames, έχω άλλα δύο πεδία, τα πεδία Metaforiko και Eksoda.
Πως γίνεται στην τελική φόρμα σε κάθε εγγραφή να φαίνονται και οι τιμές των δύο πεδίων που αντιστοιχούν στον πίνακα?(Οι πίνακες tblPaper και tblNames δεν διασυνδέονται)

[Meteora]

ΚΑΛΗΣΠΕΡΑ

...Στην μία φόρμα μέσω comboboxes περνιούνται τα ονόματα στην λίστα της ίδιας φόρμας. Έπειτα, πιέζοντας το κουμπί Transfer θέλω να μεταφέρονται οι τιμές της λίστας στο πεδίο Lastname του πίνακα tblPaper...

Λοιπόν
Έχεις 5 (!) comboboxes σε μια φόρμα, απόλυτα ΙΔΙΑ (!!) και φορτώνεις -επιλέγοντας τιμές απο αυτά - μια περιοχή 'λιστα' (όπως την ονομάζεις) και μετά θες το περιεχόμενο της λίστας να πάει στο πεδίο (!!!) Lastname του πίνακα tblPaper

Μάλλον δεν τα λες καλά...

Νίκος Δ,

[stavros2244]

Το συνημμένο αρχείο είναι παράδειγμα αυτουνού που ζητάω.δεν είναι η κανονική εφαρμογή.Το πρόβλημά μου γενικότερα είναι ο τρόπος μεταφοράς του περιεχομένου μιας λίστας που συμπληρώνεται από τον χρήστη, στη στήλη ενός πίνακα, ο οποίος αποτελεί την προέλευση ενός textbox.

Συγνώμη αν δεν τα λέω καλά, απλά δεν ξέρω καλά access και προσπαθώ να μάθω