Petrakas Δημοσ. 27 Σεπτεμβρίου 2006 Δημοσ. 27 Σεπτεμβρίου 2006 καλησπέρα, Φτιάχνω μια ΒΔ σε access και θα ήθελα να μου πείτε πως να γράψω ένα κομματάκι κώδικα σε VB. Η κατάσταση έχει ως εξής : έχω δύο πίνακες : CHECK(num,sum,date,bank) και OVERALL(num,sum,date) έχω φτιάξει φόρμες για τους δύο πίνακες. Αυτό που θέλω να κάνω είναι το εξής : όταν καταχωρώ μια καινούργια εγγραφή στη φόρμα CHECK να δημιουργείται παράλληλα μια νέα εγγραφή στην φόρμα OVERALL στα αντίστοιχα πεδία με τις ίδιες τιμές. (δλδ έστω μια εγγραφή στην φόρμα CHECK (111,200,01/01/06,pisteos), να δημιουργηθεί η εγγραφή (111,200,01/01/06) στην φόρμα OVERALL. Στην φόρμα CHECK έχω βάλει ένα κουμπί στο οποίο (on click) έχω γράψει τον κώδικα : Form_overall.date = Form_Check.date Form_overall.num = Form_Check.num Form_overall.sum = Form_Check.sum το θέμα είναι πως θέλω να προσθέσω κώδικα ώστε όταν πατηθεί το συγκεκριμένο κουμπί, εκτός απο την καταχώρηση τιμών που κάνει ήδη , να δημιουργεί και μια νέα εγγραφή στην φόρμα OVERALL δλδ με κάθε πατημα του κουμπιού να δημιουργήται και μια καινούργια εγγραφή/στιγμυότυπο στην φόρμα OVERALL....θυμίζω το κουμπί βρίσκεται στην φόρμα CHECK. Ευχαριστώ και σορυ για το μεγαλο ποστ
lefterhs Δημοσ. 27 Σεπτεμβρίου 2006 Δημοσ. 27 Σεπτεμβρίου 2006 Βαλε κωδικα στον κουμπι: Docmd.RunSQL "Insert into OVERALL(num,sum,date) values (Forms!Form_check.num, Forms!Form_check.sum, Forms!Form_check.date);" Δεν ξερω ολο το shema της ΒΔ που εφτιαξες, παντως ας μου επιτρεψεις μια παρατηρηση. Το OVERALL μου φαινεται σαν αχρηστο, πλεοναζον table. Δεν νομιζω να υπαρχει καποια πληροφορια που να ειναι αποθηκευμενη στο OVERALL και να μην μπορεις να "παρεις" την ιδια πληροφορια με ενα απλο query απο το CHECK και στο OVERALL δεν σωζεις καποια επιπλεον πληροφορια σε σχεση με ο,τι αποθηκευεις στο CHECK .
Petrakas Δημοσ. 27 Σεπτεμβρίου 2006 Μέλος Δημοσ. 27 Σεπτεμβρίου 2006 καταρχήν ευχαριστώ φίλε λευτέρη για την βοήθεια....θα το κοιτάξω τώρα αν μου δουλέψει..! η φόρμα OVERALL με τον τρόπο που πέρνει δεδομένα/στιγμυότυπα απο την CHECK θα πέρνει και απο άλλες 5-6 φόρμες! οπότε αν και θέλει λίγο παραπάνω εξήγηση πωε ακριβώς το δουλεύω to table OVERALL ομαδοποιεί δεδομένα απο διαφορετικούς πίνακες (κρατάει μονο τρία πεδία που είναι τα κοινά των άλλων πινάκων) οπως και να έχει ευχαριστώ για την απάντηηση!!! τρέχω να το δοκιμάσω!!
Petrakas Δημοσ. 27 Σεπτεμβρίου 2006 Μέλος Δημοσ. 27 Σεπτεμβρίου 2006 o παραπάνω κώδικας μου έίπες να γράψω λευτέρη μου βγάζει το ακόλουθο λάθος : ξέρεις τι μπορεί να είναι?
Petrakas Δημοσ. 27 Σεπτεμβρίου 2006 Μέλος Δημοσ. 27 Σεπτεμβρίου 2006 Το πρόβλημα το έχει το πεδίο date του πίνακα OVERALL ... όΤΑντο παραλέιπω δουλεύει κανονικά ο κώδικας.... Το δοκίμασα και σαν κανονικό ερώτημα sql στην access βάζοντας τιμές δικές μου στο values( ...) και πάλι το πεδίο date όταν παραέίπεται το ερώτημα δουλεύει ...αλλιώς μου εμφανίζει το ίδιο λάθος.....Τι να είναι? το πεδίο το έσβησα και το ξαναδημιούργησα στον πίνακα αλλα πάλι τπτ.... δλδ : 1)INSERT INTO OVERALL (num,sum,kind,proim) values (1,50,"gogogo",4,); -----> δουλεύει 2)INSERT INTO OVERALL (num,sum,kind,proim,date) values (1,50,"gogogo",4,"19/08/2008"); ----> δεν δουλεύει .. Η ημερομηνία σε ολόυς τους πίνακες έχει οριστεί ως σύντομη ημερομηνία
lefterhs Δημοσ. 27 Σεπτεμβρίου 2006 Δημοσ. 27 Σεπτεμβρίου 2006 To date ειναι reserved word. ΔΕΝ πρεπει να το χρησιμοποιεις για να ονομαζεις μεταβλητες ή columns σε tables. Aλλαξε το σε κατι αλλο πχ imerominia.:wink:
Petrakas Δημοσ. 27 Σεπτεμβρίου 2006 Μέλος Δημοσ. 27 Σεπτεμβρίου 2006 ontos....!stoyus alous pinakes to eixa date+kati allo.... sostos...!
isim Δημοσ. 27 Σεπτεμβρίου 2006 Δημοσ. 27 Σεπτεμβρίου 2006 den xreiazetai na allakseis to pedio, apla prepei na baleis aggiles [date]. To idio isxiei kai gia reserved words se VB 6
Petrakas Δημοσ. 28 Σεπτεμβρίου 2006 Μέλος Δημοσ. 28 Σεπτεμβρίου 2006 δηστυχώς νέο πρόβλημα ... ο κώδικας στο event on click se VB του κουμπιού είναι : DoCmd.RunSQL "INSERT INTO help(TDATE,TNUM,TSUM,id_supl) values (Forms!Form_check.ch_date, Forms!Form_check.ch_num, Forms!Form_check.ch_sum, Forms!Form_check.id_supl );" οι πίνακες είναι οι HELP kαι CHECK με τα αντίστοιχα πεδία όπως φαίνονται απο τον κώδικα... το "λάθος" που εμφανίζεται όταν πατήσω το κουμπί είναι το εξης : γαιτί βλέπει ως παράμετρο to Forms!Form_check.ch_date ??' το κάνει και για όλα τα άλλα πεδία (ch_num, ch_sum, ch_id_supl)
lefterhs Δημοσ. 28 Σεπτεμβρίου 2006 Δημοσ. 28 Σεπτεμβρίου 2006 Αυτο το βγαζει κατα 99%, επειδη εχεις κανει καποιο ορθογραφικο λαθος στο "Forms!Form_check.ch_date" μεσα στο Insert statement. Δεν βρισκει το πεδιο ή τη φορμα, θεωρει οτι εχεις ορισει μια παραμετρο και ζητα απο το χρηστη να της ορισει τιμη. Ελεγξε οτι πραγματι το πεδιο σου λεγεται ch_date και η φορμα σου Form_check. Το ιδιο ισχυει και για τα υπολοιπα πεδια.
Petrakas Δημοσ. 28 Σεπτεμβρίου 2006 Μέλος Δημοσ. 28 Σεπτεμβρίου 2006 τέλος καλό όλα καλά!! η φόρμα ήταν απλά check και όχι form_check ...σε άλλο κουμπί είχα χρησιμοποιήσει για όνομα φόρμας το form_check ..τέσπα όλα καλά now, leyteris thx a lot for the help!
Bspus Δημοσ. 1 Οκτωβρίου 2006 Δημοσ. 1 Οκτωβρίου 2006 Mipos tha mporouses na antikatastiseis to table overall me ena union select query pou na mazeuei ta tria pedia apo tous 5-6 pinakes se ena megalo pinaka(query stin pragmatikotita)? Pisteuo tha itan poly pio aplo. Ta union select stin access grafontai mono stin sql view kai ama psaxeis ligo tha vreis apeira paradeigmata
Petrakas Δημοσ. 3 Οκτωβρίου 2006 Μέλος Δημοσ. 3 Οκτωβρίου 2006 Mipos tha mporouses na antikatastiseis to table overall me ena union select query pou na mazeuei ta tria pedia apo tous 5-6 pinakes se ena megalo pinaka(query stin pragmatikotita)? Pisteuo tha itan poly pio aplo. Ta union select stin access grafontai mono stin sql view kai ama psaxeis ligo tha vreis apeira paradeigmata an kai ayto to komati tis vasis to teliosa xrisimopiontas ton pinaka OVERALL...kai doyleyei mia xara... parolayta distixos oi gnoseis moy se sql den einai toso kales kai den ksero polla giayta ta erotimata.....parolayta exo tin entiposi pos ean kaneis UNION se sql oi pinakes prpei na exoyn ton idio tipo pedion (ayto ok) alla kai ton idio arithmo pedion? i kano lathos...? pantos se mena den exoun oloi oi pin akes toin idio arithmo pedion ..apla 4 pedia einai idioy tipoy kai ayta sigkentrono ston OVERALL!
Bspus Δημοσ. 5 Οκτωβρίου 2006 Δημοσ. 5 Οκτωβρίου 2006 an kai ayto to komati tis vasis to teliosa xrisimopiontas ton pinaka OVERALL...kai doyleyei mia xara... parolayta distixos oi gnoseis moy se sql den einai toso kales kai den ksero polla giayta ta erotimata.....parolayta exo tin entiposi pos ean kaneis UNION se sql oi pinakes prpei na exoyn ton idio tipo pedion (ayto ok) alla kai ton idio arithmo pedion? i kano lathos...? pantos se mena den exoun oloi oi pin akes toin idio arithmo pedion ..apla 4 pedia einai idioy tipoy kai ayta sigkentrono ston OVERALL! Den xreiazetai na einai paromoioi oi pinakes. Sto select dialegeis esy poia pedia thes, opote aplos dialegeis ta pedia pou einai ta idia. An kapoios pinakas den exei katholou ena apo ta pedia, tou vazeis ena pseutopedio sto select me null. An o typos dedomenon den einai o idios, ta kaneis convert se string. Genikos den yparxoun ta problimata pou anysixeis
Petrakas Δημοσ. 8 Οκτωβρίου 2006 Μέλος Δημοσ. 8 Οκτωβρίου 2006 Den xreiazetai na einai paromoioi oi pinakes. Sto select dialegeis esy poia pedia thes, opote aplos dialegeis ta pedia pou einai ta idia. An kapoios pinakas den exei katholou ena apo ta pedia, tou vazeis ena pseutopedio sto select me null. An o typos dedomenon den einai o idios, ta kaneis convert se string. Genikos den yparxoun ta problimata pou anysixeis nai alla exo ena pedio date se kathe pinaka vasi toy opioy thelo na taksinomounte ta silegomena stoixeia ston kenourgio pinaka....dld ta dates apo kathe pinaka thelo na mazeyonte ola se ena alo pedio oste na taksinomounte meta oi egrafes vasi toy kenourgioy , sinolikoy date... px mporo sto SELECT na paro oti pedia thelo apo osous pinakes thelo ...alla exo to apotelesma : ------------------------------------------------------------ 100 || 12/09/06 || epitagi || 200 || 13/06/06 || gramatio ------------------------------------------------------------ eno ego thelo : ---------------------------- 200 || 13/06/06 || gramatio 100 || 12/09/06 || epitagi ----------------------------- nomizo pos ginete mono na petao tis egrfes ton pinakon se ena neo kai meta ta taskinomo kata date apo ekei...dld ta dates olon ton pinakon pane sto date toy neoy pinaka kai apo ekei ta xeirizomai... kathe alli idea dekti .kathosmeta ginonte poliplokes oi enimeroseis toy neou pinaka!
Προτεινόμενες αναρτήσεις
Αρχειοθετημένο
Αυτό το θέμα έχει αρχειοθετηθεί και είναι κλειστό για περαιτέρω απαντήσεις.