Applies ToAccess για Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

Σημείωση: Η συνάρτηση, η μέθοδος, το αντικείμενο ή η ιδιότητα που περιγράφεται σε αυτό το θέμα είναι απενεργοποιημένη εάν η υπηρεσία παραστάσεων Microsoft Jet εκτελείται σε κατάσταση λειτουργίας φίλτρου, κάτι που αποτρέπει τον υπολογισμό πιθανώς μη ασφαλών παραστάσεων. Για περισσότερες πληροφορίες σχετικά με τη λειτουργία φίλτρου, κάντε αναζήτηση για "λειτουργία φίλτρου" στη Βοήθεια.

Επιστρέφει έναν Ακέραιο που αντιπροσωπεύει τα χαρακτηριστικά ενός αρχείου, καταλόγου ή φακέλου.

Σύνταξη

GetAttr ( όνομα_διαδρομής )

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

Τιμές επιστροφής

Η τιμή που επιστρέφεται από το GetAttr είναι το άθροισμα των ακόλουθων τιμών χαρακτηριστικών:

Σταθερά

Τιμή

Περιγραφή

vbNormal

0

Κανονική.

vbReadOnly

1

Μόνο για ανάγνωση.

vbHidden

2

Κρυμμένα.

vbSystem

4

Αρχείο συστήματος. Δεν είναι διαθέσιμη στο Macintosh.

vbDirectory

16

Κατάλογος ή φάκελος.

vbArchive

32

Το αρχείο έχει αλλάξει από την τελευταία δημιουργία αντιγράφων ασφαλείας. Δεν είναι διαθέσιμη στο Macintosh.

vbAlias

64

Το καθορισμένο όνομα αρχείου είναι ένα ψευδώνυμο. Διατίθεται μόνο σε Macintosh.

Σημείωση: Αυτές οι σταθερές καθορίζονται από τη Visual Basic for Applications. Τα ονόματα μπορούν να χρησιμοποιηθούν οπουδήποτε στον κωδικά σας αντί για τις πραγματικές τιμές.

Παρατηρήσεις

Σημείωση: Παραδείγματα που ακολουθούν δείχνουν τη χρήση αυτής της συνάρτησης σε μια λειτουργική μονάδα Visual Basic for Applications (VBA). Για περισσότερες πληροφορίες σχετικά με την εργασία με τη VBA, επιλέξτε Αναφορά προγραμματιστών στην αναπτυσσόμενη λίστα δίπλα στην Αναζήτηση και πληκτρολογήστε έναν ή περισσότερους όρους στο πλαίσιο αναζήτησης.

Για να προσδιορίσετε ποια χαρακτηριστικά έχουν οριστεί, χρησιμοποιήστε τον τελεστή And για να εκτελέσετε μια σύγκριση σε επίπεδο bit της τιμής που επιστρέφεται από τη συνάρτηση GetAttr και την τιμή του μεμονωμένου χαρακτηριστικού αρχείου που θέλετε. Εάν το αποτέλεσμα δεν είναι μηδέν, αυτό το χαρακτηριστικό ορίζεται για το καθορισμένο αρχείο. Για παράδειγμα, η τιμή επιστροφής της ακόλουθης παράστασης And είναι μηδέν εάν δεν έχει οριστεί το χαρακτηριστικό Archive:

Result = GetAttr(FName) And vbArchive

Επιστρέφεται μη μηδενική τιμή εάν έχει οριστεί το χαρακτηριστικό Archive.

Παράδειγμα

Αυτό το παράδειγμα χρησιμοποιεί τη συνάρτηση GetAttr για να καθορίσει τα χαρακτηριστικά ενός αρχείου και καταλόγου ή φακέλου. Στα Macintosh, είναι διαθέσιμες μόνο οι σταθερές vbNormal, vbReadOnly, vbHidden και vbAlias.

Dim MyAttr' Assume file TESTFILE has hidden attribute set.MyAttr = GetAttr("TESTFILE")  ' Returns 2.' Returns nonzero if hidden attribute is ' set on TESTFILE.Debug.Print MyAttr And vbHidden    ' Assume file TESTFILE has hidden and ' read-only attributes set.MyAttr = GetAttr("TESTFILE")  ' Returns 3.' Returns nonzero if hidden attribute is ' set on TESTFILE.Debug.Print MyAttr And (vbHidden + vbReadOnly)    ' Assume MYDIR is a directory or folder.MyAttr = GetAttr("MYDIR")  ' Returns 16.

Χρειάζεστε περισσότερη βοήθεια;

Θέλετε περισσότερες επιλογές;

Εξερευνήστε τα πλεονεκτήματα της συνδρομής, περιηγηθείτε σε εκπαιδευτικά σεμινάρια, μάθετε πώς μπορείτε να προστατεύσετε τη συσκευή σας και πολλά άλλα.

Οι κοινότητες σάς βοηθούν να κάνετε και να απαντάτε σε ερωτήσεις, να δίνετε σχόλια και να ακούτε από ειδικούς με πλούσια γνώση.