Funkcija Dir

Važno :  Ovaj je članak strojno preveden. Pogledajteizjavu o odricanju od odgovornosti. Verziju ovog članka na engleskom potražite ovdje.

Napomena : Funkcija, način, objekt ili svojstvo koje su opisane u ovoj temi onemogućeno je ako Microsoft Jet Expression Service izvodi u načinu rada s memorijom za testiranje, što sprječava potencijalno nesigurnih izraza. Dodatne informacije o načinu rada s memorijom za testiranje ključnoj riječi "način rada s memorijom za testiranje" u sustavu pomoći.

Vraća niz koji predstavlja naziv datoteke, direktorija ili mape koja zadovoljava navedeni uzorak ili atribut datoteke ili oznaku jedinice pogona.

Sintaksa

Dir [(putom [atributi] )]

Sintaksa funkcije Dir sadrži sljedeće argumente:

Argument

Opis

put

Neobavezno. Nizovni izraz koji određuje naziv datoteke – može obuhvaćati direktorija ili mape, a pogon. Niz nulte duljine (""), vraća se ako se put ne pronađe.

Atributi

Neobavezno. Konstanta ili numerički izraz, čiji zbroj određuje atribute datoteke. Ako se ispusti, vraća se datoteke koje odgovaraju putom , ali nemaju atribute.


Postavke

Postavkeargumentatributesu:

Konstanta

Value (Vrijednost)

Opis

vbNormal

0

(Zadano) Određuje datoteke bez atributa.

vbReadOnly

1

Određuje datoteke samo za čitanje osim datoteka bez atributa.

vbHidden

2

Određuje skrivene datoteke osim datoteka bez atributa.

VbSystem

4

Određuje sistemske datoteke osim datoteka bez atributa. Nije dostupno na Macintosh.

vbVolume

8

Određuje natpis medija; Ako bilo koji drugi atribut nije naveden, vbVolume bit će zanemarene. Nije dostupno na Macintosh.

vbDirectory

16

Određuje direktorija ili mape osim datoteka bez atributa.

vbAlias

64

Navedeni naziv datoteke je pseudonim. Dostupno samo na Macintosh.


Napomena : Ove konstante određuje Visual Basic for Applications (VBA), a možete koristiti bilo gdje u kodu umjesto stvarnih vrijednosti.

Napomene

U Microsoft Windows Dir podržava korištenje većeg broja znakova (*) i zamjenske znakove znak (?) da biste naveli više datoteka. U sustavu Macintosh, te znakove tretira se kao valjani znakovi naziva datoteke i nije moguće koristiti kao zamjenske znakove da biste naveli više datoteka.

Budući da Macintosh ne podržava zamjenske znakove, korištenje vrsta datoteke za prepoznavanje grupe datoteka. Funkcija MacID možete koristiti da biste odredili vrstu datoteke umjesto korištenja naziva datoteka. Na primjer, sljedeća naredba vraća naziv prve tekstne datoteke u trenutnoj mapi:

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

Da biste ponavljanje svih datoteka u mapi, odredite prazni niz:

Dir("")

Ako koristite funkcija MacID s Dir u sustavu Windows, javlja se pogreška.

Atributi vrijednosti veće od 256 smatra MacID vrijednost.

Odredite put kada prvi put poziva funkcija Dir ili javlja se pogreška. Ako navedete atribute datoteka, put mora biti uključeno.

Funkcija dir vraća prvi naziv datoteke koja odgovara putom. Da biste pristupili dodatnim imena koje odgovaraju putomsvoja Dir ponovno nema argumenata. Kada se podudaraju s više nema naziva datoteka, Dir vraća niz nulte duljine (""). Kada se vraća niz nulte duljine, navedite put naknadni pozivi ili javlja se pogreška. Možete promijeniti u novi putom bez dohvaćanja svih naziva datoteka koje odgovaraju trenutnom putom. Međutim, ne možete pozvati rekurzivno funkcija Dir . Pozivanje Dir s atributom vbDirectory neprestano vraća direktorijima.

Savjet     Budući da nazivi datoteka nisu dohvaćeni pojedinačnom redoslijedu, trebali biste spremiti vraćene nazive datoteka u polje, a zatim sortirati polja.

Primjer

Napomena : Primjeri koji slijede prikazuju korištenje te funkcije u modulu jezika Visual Basic for Applications (VBA). Da biste pronašli dodatne informacije o radu s VBA-om, na padajućem popisu uz stavku Traži odaberite stavku Referenca za razvojne inženjere pa unesite jedan ili više izraza u okvir pretraživanja.

U ovom se primjeru koristi funkcija Dir da biste provjerili određene datoteke i imenici postoji li. Na računalu Macintosh "HD:" je zadani naziv pogona, a dijelovi puta su odvojenih zarezom umjesto obrnute kose crte. Osim toga, zamjenski znakovi sustava Windows tretira se kao valjani znakovi naziva datoteke na Macintosh. Međutim, funkciju MacID možete koristiti za određivanje grupa 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

Napomena : Izjava o odricanju od odgovornosti za strojni prijevod: ovaj je članak preveo računalni sustav bez ljudske intervencije. Microsoft nudi strojne prijevode da bi korisnicima koji ne razumiju engleski omogućio čitanje sadržaja o Microsoftovim proizvodima, uslugama i tehnologijama. Budući da je preveden strojno, članak možda sadrži pogreške u vokabularu, sintaksi ili gramatici.

Proširite svoje vještine
Istražite osposobljavanje

Jesu li vam ove informacije bile korisne?

Hvala vam na povratnim informacijama!

Hvala vam na povratnim informacijama! Čini se da bi vam pomoglo kad bismo vas povezali s nekim od naših agenata podrške za Office.

×