Funkcja GetAttr

Funkcja GetAttr zwraca wartość typu Integer określającą atrybutu pliku, katalogu lub folderu.

Składnia funkcji GetAttr:

GetAttr (ŚcieżkaDostępu)

Argument ŚcieżkaDostępu jest wymaganym wyrażeniem łańcuchowym, określającym nazwę pliku. Może zawierać nazwę katalogu lub folderu i dysk.

Wartości i stałe zwracane przez funkcję GetAttr:

Stała	Wartość	Opis
vbNormal	0	Normalny (domyślny)
vbReadOnly	1	Tylko do odczytu
vbHidden	2	Ukryty
vbSystem	4	Systemowy
vbDirectory	16	Katalog lub folder
vbArchive	32	Plik został zmieniony od ostatniego wykonania kopii zapasowej

Stałe te są określone przez Visual Basic for Applications.

Aby określić, które atrybuty są ustawione, należy użyć operatora And do porównania bitów ustawionych w wartości zwróconej przez funkcję GetAttr z wartościami poszczególnych atrybutów. Jeżeli rezultat jest różny od zera, to znaczy, że atrybut jest ustawiony dla danego pliku.
Poniższy przykład zwróci wartość zero jeżeli atrybut Archive nie jest ustawiony:

varWynik = GetAttr(FName) And vbArchive
Wartość różna od zera oznacza, że atrybut Archive jest ustawiony.

Przykład użycia funkcji GetAttr:

Dim varAtrybuty As Variant
varAtrybuty=GetAttr("Windows")
'zwróci wartość 16 jeżeli Windows jest folderem lub katalogiem
varAtrybuty=GetAttr("IO.SYS") And vbSystem
'zwróci wartość zero, jeżeli plik IO.SYS nie jest systemowy i 0 jeżeli jest

na górę strony...