FileSystem.Dir Metoda

Definicja

Przestrzeń nazw:

Microsoft.VisualBasic

Zestaw:

Microsoft.VisualBasic.Core.dll

Zwraca ciąg reprezentujący nazwę pliku, katalogu lub folderu odpowiadającego określonemu wzorcowi, atrybutowi pliku lub etykietom woluminu dysku. Zapewnia FileSystem lepszą wydajność i wydajność operacji we/wy plików niż Dir funkcja. Aby uzyskać więcej informacji, zobacz GetDirectoryInfo(String).

Przeciążenia

Dir()	Zwraca ciąg reprezentujący nazwę pliku, katalogu lub folderu odpowiadającego określonemu wzorcowi, atrybutowi pliku lub etykietom woluminu dysku. Zapewnia FileSystem lepszą wydajność i wydajność operacji we/wy plików niż Dir funkcja. Aby uzyskać więcej informacji, zobacz GetDirectoryInfo(String).
Dir(String, FileAttribute)	Zwraca ciąg reprezentujący nazwę pliku, katalogu lub folderu odpowiadającego określonemu wzorcowi, atrybutowi pliku lub etykietom woluminu dysku. Zapewnia FileSystem lepszą wydajność i wydajność operacji we/wy plików niż Dir funkcja. Aby uzyskać więcej informacji, zobacz GetDirectoryInfo(String).

Dir()

Źródło:

FileSystem.vb

Zwraca ciąg reprezentujący nazwę pliku, katalogu lub folderu odpowiadającego określonemu wzorcowi, atrybutowi pliku lub etykietom woluminu dysku. Zapewnia FileSystem lepszą wydajność i wydajność operacji we/wy plików niż Dir funkcja. Aby uzyskać więcej informacji, zobacz GetDirectoryInfo(String).

public:
 static System::String ^ Dir();

public static string Dir ();

static member Dir : unit -> string

Public Function Dir () As String

Zwraca

String

Ciąg reprezentujący nazwę pliku, katalogu lub folderu odpowiadającego określonemu wzorcowi, atrybutowi pliku lub etykietom woluminu dysku.

Przykłady

W tym przykładzie użyto Dir funkcji w celu sprawdzenia, czy istnieją pewne pliki i katalogi.

Dim MyFile, MyPath, MyName As String
' Returns "WIN.INI" 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, including files 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.
    ' Use bitwise comparison to make sure MyName is a directory.
    If (GetAttr(MyPath & MyName) And vbDirectory) = vbDirectory Then
        ' Display entry only if it's a directory.
        MsgBox(MyName)
    End If
    MyName = Dir()   ' Get next entry.
Loop

Uwagi

Funkcja Dir obsługuje używanie symboli wieloznacznych () i symboli wieloznacznych (*?) w celu określenia wielu plików.

VbVolume zwraca etykietę woluminu dla dysku zamiast określonej nazwy pliku.

Musisz podać po raz pierwszy wywołanie PathNameDir funkcji. Aby pobrać następny element, możesz wykonywać kolejne wywołania funkcji Dir bez parametrów.

Ważne

Aby uruchomić poprawnie, Dir funkcja wymaga Read udzielenia flag FileIOPermission i PathDiscovery do wykonania kodu. Aby uzyskać więcej informacji, zobacz FileIOPermission, SecurityExceptioni Uprawnienia dostępu do kodu.

Wartości Attributes wyliczenia argumentów są następujące:

Wartość	Stała	Opis
Normal	vbnormal	Domyślne. Określa pliki bez atrybutów.
ReadOnly	vbReadOnly	Określa pliki tylko do odczytu, a także pliki bez atrybutów.
Hidden	vbHidden	Określa ukryte pliki, a także pliki bez atrybutów.
System	vbSystem	Określa pliki systemowe, a także pliki bez atrybutów.
Volume	vbVolume	Określa etykietę woluminu; jeśli określono inny atrybut, vbVolume jest ignorowany.
Directory	vbDirectory	Określa katalogi lub foldery, a także pliki bez atrybutów.
Archive	vbArchive	Plik został zmieniony od czasu wykonania ostatniej kopii zapasowej.
Alias	vbAlias	Plik ma inną nazwę.

Uwaga

Te wyliczenia są określane przez język Visual Basic i mogą być używane w dowolnym miejscu w kodzie zamiast rzeczywistych wartości.

Zobacz też

• ChDir(String)
• ChDrive
• FileAttribute

Dir(String, FileAttribute)

Źródło:

FileSystem.vb

Zwraca ciąg reprezentujący nazwę pliku, katalogu lub folderu odpowiadającego określonemu wzorcowi, atrybutowi pliku lub etykietom woluminu dysku. Zapewnia FileSystem lepszą wydajność i wydajność operacji we/wy plików niż Dir funkcja. Aby uzyskać więcej informacji, zobacz GetDirectoryInfo(String).

[System.Runtime.Versioning.SupportedOSPlatform("windows")]
public static string Dir (string PathName, Microsoft.VisualBasic.FileAttribute Attributes = Microsoft.VisualBasic.FileAttribute.Normal);

[<System.Runtime.Versioning.SupportedOSPlatform("windows")>]
static member Dir : string * Microsoft.VisualBasic.FileAttribute -> string

Public Function Dir (PathName As String, Optional Attributes As FileAttribute = Microsoft.VisualBasic.FileAttribute.Normal) As String

Parametry

PathName

String

Opcjonalny. Wyrażenie ciągu, które określa nazwę pliku, nazwę katalogu lub folderu albo etykietę woluminu dysku. Ciąg o zerowej długości ("") jest zwracany, jeśli PathName nie zostanie znaleziony.

Attributes

FileAttribute

Opcjonalny. Wyliczenie lub wyrażenie liczbowe, którego wartość określa atrybuty pliku. Jeśli pominięto, zwraca pliki zgodne, DirPathname ale nie mają atrybutów.

Zwraca

String

Ciąg reprezentujący nazwę pliku, katalogu lub folderu odpowiadającego określonemu wzorcowi, atrybutowi pliku lub etykietom woluminu dysku.

Atrybuty

SupportedOSPlatformAttribute

Przykłady

W tym przykładzie użyto Dir funkcji w celu sprawdzenia, czy istnieją pewne pliki i katalogi.

Dim MyFile, MyPath, MyName As String
' Returns "WIN.INI" 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, including files 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.
    ' Use bitwise comparison to make sure MyName is a directory.
    If (GetAttr(MyPath & MyName) And vbDirectory) = vbDirectory Then
        ' Display entry only if it's a directory.
        MsgBox(MyName)
    End If
    MyName = Dir()   ' Get next entry.
Loop

Uwagi

Funkcja Dir obsługuje używanie symboli wieloznacznych () i symboli wieloznacznych (*?) w celu określenia wielu plików.
VbVolume zwraca etykietę woluminu dla dysku zamiast określonej nazwy pliku.
Musisz podać po raz pierwszy wywołanie PathNameDir funkcji. Aby pobrać następny element, możesz wykonać kolejne wywołania Dir funkcji bez parametrów.

Ważne

Aby uruchomić poprawnie, Dir funkcja wymaga Read udzielenia flag FileIOPermission i PathDiscovery do wykonania kodu. Aby uzyskać więcej informacji, zobacz FileIOPermission, SecurityExceptioni Uprawnienia dostępu do kodu.
Wartości Attributes wyliczenia argumentów są następujące:
|Wartość|Stała|Opis|
|-|-|-|
|Normal|vbnormal|Domyślny. Określa pliki, które nie mają atrybutów.|
|ReadOnly|vbReadOnly|Określa pliki tylko do odczytu, oprócz plików, które nie mają atrybutów.|
|Hidden|vbHidden|Określa ukryte pliki oprócz plików, które nie mają atrybutów.|
|System|vbSystem|Określa pliki systemowe oprócz plików, które nie mają atrybutów.|
|Volume|vbVolume|Określa etykietę woluminu; jeśli określono inny atrybut, vbVolume jest ignorowany.|
|Directory|vbDirectory|Określa katalogi lub foldery oprócz plików, które nie mają atrybutów.|
|Archive|vbArchive|Plik został zmieniony od ostatniej kopii zapasowej.|
|Alias|vbAlias|Plik ma inną nazwę.|

Uwaga

Te wyliczenia są określane przez język Visual Basic i mogą być używane w dowolnym miejscu w kodzie zamiast rzeczywistych wartości.

Zobacz też

• ChDir(String)
• ChDrive
• FileAttribute