Not: Microsoft Jet İfade Hizmeti korumalı alan modunda çalışıyorsa, bu konuda açıklanan işlev, yöntem, nesne veya özellik devre dışı bırakılır ve bu da güvenli olabilecek ifadelerin değerlendirilmesini engeller. Korumalı alan modu hakkında daha fazla bilgi için Yardım'da "korumalı alan modu" araması yapın.
Open deyimi kullanılarak açılan dosyalar için dosya modunu temsil eden bir Long döndürür.
Söz dizimi
FileAttr ( filenumber , returntype )
FileAttr işlevinin söz diziminde şu bağımsız değişkenler bulunur:
Bağımsız değişken |
Açıklama |
dosyasayısı |
Gerekli. Tamsayı. Geçerli herhangi bir dosya numarası. |
Returntype |
Gerekli. Tamsayı. Döndürülecek bilgi türünü gösteren sayı. Dosya modunu belirten bir değer döndürmek için 1 belirtin. Yalnızca 16 bit sistemlerde, işletim sistemi dosya tanıtıcısını almak için 2 belirtin. returntype 2, 32 bit sistemlerde desteklenmez ve hataya neden olur. |
Dönüş Değerleri
Returntype bağımsız değişken 1 olduğunda, aşağıdaki dönüş değerleri dosya erişim modunu gösterir:
Mod |
Değer |
Giriş |
1 |
Çıktı |
2 |
Rasgele |
4 |
Ekleme |
8 |
İkili |
32 |
Örnek
Not: Aşağıdaki örneklerde, bu işlevin Visual Basic for Applications (VBA) modülünde kullanımı gösterilir. VBA ile çalışma hakkında daha fazla bilgi için, rama'nın yanındaki açılan listede Geliştirici Başvurusu'nu seçin ve arama kutusuna bir veya birden çok terim yazın.
Bu örnek, açık bir dosyanın dosya modunu ve dosya tanıtıcısını döndürmek için FileAttr işlevini kullanır. Dosya tanıtıcısı yalnızca 16 bit sistemlerde döndürülür; 32 bit sistemlerde 2'yi ikinci bağımsız değişken olarak geçirmek hata oluşturur.
Dim FileNum, Mode, Handle
FileNum = 1 ' Assign file number. Open "TESTFILE" For Append As FileNum ' Open file. Mode = FileAttr(FileNum, 1) ' Returns 8 (Append file mode). Handle = FileAttr(FileNum, 2) ' Returns file handle. Close FileNum ' Close file.