Ανανέωση ιστοσελίδας

[steliosgr]

Καλησπέρα σε όλα τα μέλη του απίστευτου αυτού forum γνώσεων. Θα ήθελα την βοήθεια σας , σε μία φόρμα με πεδίο ημερομηνίας ονόματος ΗΜΕΡΟΜ καταχωρώ μόνο Σάββατα Κυριακές και αργίες. Για αποφύγω λάθος καταχώρηση έχω ενσωματώσει το παράδειγμα
http://www.ms-office.gr/forum/access...ma-access.html
και πριν από ενημέρωση του ΗΜΕΡΟΜ

If IsHoliday(ΗΜΕΡΟΜ) = True Then
μια διαδικασία
Else
Dim iWeekNo As Integer
iWeekNo = Weekday(ΗΜΕΡΟΜ)
If iWeekNo = 2 Or iWeekNo = 3 Or iWeekNo = 4 Or iWeekNo = 5 Or iWeekNo = 6 Then
μια διαδικασία
Me.Undo
End If
End If
θα ήθελα σε μια έκθεση να εξάγονται μόνο οι Κυριακές και οι αργίες. Προφανώς χρειάζεται κάποιο ερώτημα η συνάρτηση αλλά δεν έχω τις κατάλληλες γνώσεις ευχαριστώ.

[kapetang]

Καλησπέρα

Στέλιο, αν υποθέσουμε ότι ο πίνακας με τα στοιχεία λέγεται tbl, θα μπορούσες να στηρίξεις την έκθεση στο παρακάτω ερώτημα:

SELECT * FROM [tbl]
WHERE Weekday([ΗΜΕΡΟΜ])=1 Or IsHoliday([ΗΜΕΡΟΜ]);

Το ερώτημα επιστρέφει όλα τα πεδία (στήλες) του πίνακα tbl και από τις εγγραφές (γραμμές) μόνο αυτές που η μέρα της ημερομηνίας είναι αργία ή Κυριακή.

Φιλικά/Γιώργος

[steliosgr]

Γιώργο σ' ευχαριστώ πολύ για την απάντηση, φτιάχνω ένα ερώτημα όπως μου υποδεικνύεις και εκτελώντας το μου γράφει Η έκφραση αυτή δεν έχει πληκτρολογηθεί σωστά ή είναι πολύ περίπλοκη για να αποτιμηθεί .Για παράδειγμα, ίσως μια αριθμητική έκφραση περιέχει πάρα πολλά περίπλοκα στοιχεία. Προσπαθήστε να απλοποιήσετε την έκφραση εκχωρώντας μέρη της σε μεταβλητές
Αν αφήσω μόνο Weekday([ΗΜΕΡΟΜ])=1 δουλεύει μια χαρά όμως με το IsHoliday([ΗΜΕΡΟΜ])<>ψεύδές εμφανίζει το ανωτέρω μήνυμα.

[kapetang]

Στέλιο δοκίμασε IsHoliday([ΗΜΕΡΟΜ])=-1.
Αν εξακολουθεί να δίνει λάθος ανέβασε ένα δείγμα της ΒΔ.

[steliosgr]

Γιώργο καλημέρα, εξακολουθεί να δίνει λάθος θα προσπαθήσω να ανεβάσω ένα δείγμα.

[kapetang]

Καλησπέρα

Στέλιο η επισυναπτόμενη ΒΔ αποτελεί προσομοίωση του ζητούμενου.

Περιέχει:

1) Τη λειτουργική μονάδα fncArgies με τον κώδικα ορισμού των επίσημων αργιών και τη συνάρτηση IsHolday.

2) Τον πίνακα Dates που περιέχει τις ημερομηνίες των αργιών και των Σαββατοκύριακων.

3) Τη φόρμα Dates στην οποία γίνεται η καταχώρηση των δεδομένων και ελέγχεται αν η ημερομηνία αντιστοιχεί σε αργία ή Σαββατοκύριακο.

4) Το ερώτημα qryArgies που εμφανίζει μόνο τις Κυριακές και τις αργίες.

Ελπίζω να μπορέσεις να την προσαρμόσεις στα δεδομένα σου.

Αν δεν τα καταφέρεις ανέβασε το δείγμα.

Φιλικά/Γιώργος

[steliosgr]

Γιώργο, και πάλι σ'ευχαριστώ για τον κόπο σου θα προσπαθήσω να την προσαρμόσω στην δικιά μου βδ ελπίζω να δουλέψει αυτή τη φορά και να μην βγάλει σφάλμα.