| |
| Access - Ερωτήσεις / Απαντήσεις Access + VBA... Εδώ δεν υπάρχουν όρια! |
 |
| | Εργαλεία Θεμάτων | Τρόποι εμφάνισης |
|
#1
08-09-11, 09:48
| |||
| |||
 Aποσφαλμάτωση φόρμας σε βάση
Καλημέρα και πάλι στην παρέα Ενω πίστευα ότι τελείωσα τελικά δεν το απέφυγα.Στην φόρμα Ταμείο Ημέρας στον κώδικα δεν είχα υπολογίσει το Εξώφλησε σαν Παράμετρο(περιορισμό) με αποτέλεσμα όταν εγώ τσεκαριζα Εξώφληση σε ένα πελάτη στη φόρμα ΚινήσειςΠελάτη και υπήρχαν αλλοι 5 που διέμεναν στο ξενοδοχείο τότε γινόταν πρόσθεση των τιμών σε όλα τα πεδία όλων των πελατών. με το (ΠοσόΠληρωμών ,ΠοσόΔιαμονής ,ΠοσόΠαροχών) Βάζοντας τον παρακάτω κώδικα If tbl2![Εξώφλησε] = -1 And tbl1![CustomerID] = tbl2![CustomerID] And tbl1![ΗμερΠληρωμής] >= tbl2![StartDate] And tbl1![ΗμερΠληρωμής] <= tbl2![EndDate] Then μου βγάζει σφάλμα κάνοντας Debug το σφάλμα είναι με το Loop To μήνυμα με το σφάλμα είναι ; Loop Without Do Τι διορθωση κάνουμε στην περίπτωση αυτή.Στέλνω την βάση για βοήθεια. Φιλικά Αλεξανδρος  |
|
#2
08-09-11, 10:14
| ||||
| ||||
|
Καλημέρα Αλέξανδρε! Πριν από το tbl2.MoveNext που υπάρχει μερικές γραμμές παρακάτω, βάλε ένα End If για να είναι σωστή η σύνταξη του If και κατά συνέπεια του Loop. Φιλικά Τάσος
__________________ Ms-Office Development Team Ανάπτυξη επαγγελματικών εφαρμογών σε VB.Net, Access, Excel, Outlook, Word |
|
« Προηγούμενο Θέμα
|
Επόμενο Θέμα »
| Εργαλεία Θεμάτων | |
| Τρόποι εμφάνισης | |
Αλλαγή σε γραμμικό τρόπο
| |
| ||||
| Θέμα | Δημιουργός | Forum | Απαντήσεις | Τελευταίο Μήνυμα |
| Πρόβλημα με Βάση Access | asterix | Access - Ερωτήσεις / Απαντήσεις | 17 | 26-09-11 20:26 |
| [ Πίνακες ] Αντιγραφή πινάκων από τρέχουσα βάση σε νέα βάση | apostolos | Access - Ερωτήσεις / Απαντήσεις | 3 | 18-07-11 16:06 |
| Βάση για πελατολογιο Κομμωτηρίου | Melisson | Access - Ερωτήσεις / Απαντήσεις | 4 | 24-01-11 19:50 |
| [ Ερωτήματα ] ΒΑΣΗ ΔΕΔΟΜΕΝΩΝ | chris1978 | Access - Ερωτήσεις / Απαντήσεις | 15 | 09-12-10 09:59 |
| Βοήθεια για την βάση μου | Τακης | Access - Ερωτήσεις / Απαντήσεις | 5 | 22-04-10 18:54 |
Η ώρα είναι 15:44.