Napomena: Funkcija, metod, objekat ili vlasništvo opisane u ovoj temi je onemogućeno ako se pokreće Microsoft Jet Expression usluga u okviru "sandbox" režima, što sprečava procenu potencijalno nebezbednih izraza. Više informacija o "sandbox" režimu potražite u okviru pomoći "sandbox režim".

Daje nisku koja predstavlja ime datoteke, direktorijuma ili fascikle koja se podudara sa navedenim obrascem ili atributom datoteke ili oznakom volumena disk jedinice.

Sintaksa

Dir[(ime putanje [, atributi] )]

Sintaksa funkcije dir ima sledeće argumente:

Argument

Opis

ime putanje

Opcionalno. Izraz niske koji navodi ime datoteke – može da sadrži direktorijum ili fasciklu i disk jedinicu. Niska nulte dužine ("") se daje ako ime putanje nije pronađeno.

atribute

Opcionalno. Konstanta ili brojni izraz, čiji zbir određuje atribute datoteke. Daje datoteke koje se podudaraju sa imenom pathname , ali bez atributa.


Postavke

Postavkeargumentatributi su:

Konstanta

Vrednost

Opis

Vannormal

0

Raz Navodi datoteke bez atributa.

Šta je to

1

Navodi datoteke samo za čitanje pored datoteka bez atributa.

Funkcija Vibsakrivena

2

Navodi skrivene datoteke pored datoteka bez atributa.

Vibsystem

4

Navode sistemske datoteke pored datoteka bez atributa. Nije dostupno na Macintosh računarima.

Vibvolumen

8

Navodi oznaku volumena; Ako je naveden drugi pripisan, funkcija Vakbvolumen se zanemaruje. Nije dostupno na Macintosh računarima.

Mbdirectory

Posted

Navode direktorijume ili fascikle pored datoteka bez atributa.

Vibalias

64

Navedeno ime datoteke je pseudonim. Dostupno samo na Macintosh računarima.


Napomena:  Ove konstante navode Visual Basic for Applications (VBA) i mogu se koristiti bilo gde u kodu umesto stvarnih vrednosti.

Napomene

U operativnom sistemu Microsoft Windows, dir podržava korišćenje više znakova (*) i pojedinačnih znakova (?) da biste naveli više datoteka. Na Macintosh računarima, ovi znakovi se tretiraju kao važeći znakovi imena datoteka i ne mogu se koristiti kao džoker da bi naveli više datoteka.

Pošto Macintosh) ne podržava džoker znakove, koristite Tip datoteke da biste identifikovali grupe datoteka. Možete da koristite funkciju MacID da biste naveli tip datoteke umesto da koristite imena datoteka. Na primer, sledeća izjava vraća ime prve TEKSTUALNE datoteke u trenutnu fasciklu:

Dir("SomePath", MacID("TEXT"))

Da biste zadali sve datoteke u fascikli, navedite praznu nisku:

Dir("")

Ako koristite funkciju MacID u programu dir u operativnom sistemu Windows, pojavljuje se greška.

Sve atribute koji se veće od 256 smatraju MacID .

Morate da navedete ime putanje kada prvi put pozovete funkciju dir ili se pojavi greška. Ako takođe navedete atribute datoteka, treba uključiti ime putanje .

Dir daje ime prvog datoteke koje se podudara sa imenom putanje. Da biste dobili dodatna imena datoteka koja se podudaraju sa putanjardoimenom, ponovo pozovite . Kada se imena više ne podudaraju, dir vraća nisku nulte dužine (""). Kada se vrati niska nulte dužine, morate da navedete ime putanje u narednim pozivima ili se pojavi greška. Možete da promenite novo ime putanje bez preuzimanja svih imena datoteka koje se podudaraju sa trenutnim imenom putanje. Međutim, funkciju dir ne možete reklatit nazivalim. Pozivanje programa dir sa atributom nbdirectory ne vraća kontinualno povraćaj potdirektorijumi.

Savet     Pošto su imena datoteka preuzeta bez određenog redosleda, možda želite da uskladištite vraćena imena datoteka u niz, a zatim sortirate niz.

Primer

Napomena: Primeri koji slede pokazuju upotrebu ove funkcije u Visual Basic for Applications (VBA) modulu. Za više informacija o radu sa VBA modulom izaberite stavku Referenca razvojnog programera sa padajuće liste pored stavke Pretraga i unesite termine u polje za pretragu.

Ovaj primer koristi funkciju dir za proveru da li postoje datoteke i imenici. Na Macintosh računarima, "HD:" je podrazumevano ime disk jedinice i delovi imena putanje su razdvojeni nekoliko delova umesto obrnute kose crte. Takođe, Windows džoker znakovi se tretiraju kao važeći znakovi imena datoteka na Macintosh računarima. Međutim, možete da koristite funkciju MacID da biste naveli grupe datoteka.

Dim MyFile, MyPath, MyName
' Returns "WIN.INI" (on Microsoft Windows) if it exists.
MyFile = Dir("C:\WINDOWS\WIN.INI")
' Returns filename with specified extension. If more than one *.ini
' file exists, the first file found is returned.
MyFile = Dir("C:\WINDOWS\*.INI")
' Call Dir again without arguments to return the next *.INI file in the
' same directory.
MyFile = Dir
' Return first *.TXT file with a set hidden attribute.
MyFile = Dir("*.TXT", vbHidden)
' Display the names in C:\ that represent directories.
MyPath = "c:\" ' Set the path.
MyName = Dir(MyPath, vbDirectory) ' Retrieve the first entry.
Do While MyName <> "" ' Start the loop.
' Ignore the current directory and the encompassing directory.
If MyName <> "." And MyName <> ".." Then
' Use bitwise comparison to make sure MyName is a directory.
If (GetAttr(MyPath & MyName) And vbDirectory) = vbDirectory Then
Debug.Print MyName ' Display entry only if it
End If ' it represents a directory.
End If
MyName = Dir ' Get next entry.
Loop

Potrebna vam je dodatna pomoć?

Unapredite veštine
Istražite obuku
Prvi nabavite nove funkcije
Pridružite se Microsoft insajdere

Da li su vam ove informacije koristile?

Koliko ste zadovoljni kvalitetom prevoda?

Šta je uticalo na vaše iskustvo?

Imate li dodatne povratne informacije? (Opcionalno)

Hvala vam na povratnim informacijama!

×