1 Κάντε κλικ στο κουμπί των Windows " Start" και επιλέξτε " Όλα τα προγράμματα ". Κάντε κλικ στο " Microsoft Visual Basic , " και στη συνέχεια κάντε κλικ στο κουμπί " Visual Basic 6 " για να ανοίξετε τον compiler . Ανοίξτε το έργο σας μετά τα φορτία compiler . 2
Πάρτε μια λίστα με τις άδειες των αρχείων χρησιμοποιώντας την κλάση FileSecurity . Ο παρακάτω κώδικας δημιουργεί μια μεταβλητή που ανακτά μια λίστα των δικαιωμάτων για την myfile.txt αρχείου :
Dim filepermissions Όπως FileSecurity = File.GetAccessControl ( "c : \\ myfile.txt " )
Η
3
Εμφάνιση δικαιώματα του αρχείου . Εμφανίζεται το ακόλουθο κώδικα "Full Δικαιώματα " εάν ο χρήστης θα έχει πλήρη δικαιώματα για να επεξεργαστείτε ή να διαγράψετε το αρχείο :
MsgBox " Ο χρήστης έχει " & filepermissions.AccessRightType & " στο αρχείο ".
Η
Η
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα