Not: En güncel yardım içeriklerini, mümkün olduğunca hızlı biçimde kendi dilinizde size sunmak için çalışıyoruz. Bu sayfanın çevirisi otomasyon aracılığıyla yapılmıştır ve bu nedenle hatalı veya yanlış dil bilgisi kullanımları içerebilir. Amacımız, bu içeriğin sizin için faydalı olabilmesini sağlamaktır. Buradaki bilgilerin faydalı olup olmadığını bu sayfanın sonunda bize bildirebilir misiniz? Kolayca başvurabilmek için İngilizce makaleye buradan ulaşabilirsiniz.
Not: Microsoft Jet ifade hizmeti güvenli olmayabilecek deyimleri engeller korumalı alan modunda çalışıyorsa işlevi, yöntemi, nesne veya bu konuda açıklanan özelliğini devre dışı bırakılır. Korumalı alan modu hakkında daha fazla bilgi için Yardım'da "korumalı alan modu için" arayın.
Dosya modunu Aç deyimi ile açılmış dosyalarda temsil eden bir Uzun döndürür.
Söz dizimi
FileAttr ( filenumber , returntype )
FileAttr işlevi sözdiziminde aşağıdaki bağımsız değişkenler bulunur:
Bağımsız Değişken | Açıklama |
---|---|
filenumber |
Gerekli. Bir tamsayı. Herhangi bir geçerli dosya numarası. |
returnType |
Gerekli. Bir Tamsayı. Dönmek için bilgi türünü gösteren sayı. Dosya modunu belirten bir değer döndürmek için 1 belirtin. Yalnızca 16 bit sistemlerinde bir işletim sistemi dosya işleyici almak için 2 belirtin. returnType 2 32 bit sistemlerinde desteklenmez ve hataya neden oluyor. |
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:
Mode | Değer |
---|---|
Giriş |
1 |
Çıktı |
2 |
Rastgele |
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 örnekte, açık bir dosyayı dosya modu ve dosya tutamacını dönmek için FileAttr işlevi kullanılmaktadır. Dosya tutamacını yalnızca 16 bit sistemlerinde döndürülür; 32 bit sistemlerinde 2 ikinci bağımsız değişken olarak geçirilmesini bir 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.