IBM Lotus Symphony
|
Zwraca wzorzec bitowy identyfikujący typ pliku albo nazwę woluminu lub katalogu.
GetAttr (Tekst As String)
Liczba całkowita
Tekst: Dowolne wyrażenie łańcuchowe zawierające jednoznaczną specyfikację pliku. Można również użyć notacji URL.
Ta funkcja określa atrybuty podanego pliku i zwraca wzorzec binarny umożliwiający ustalenie następujących atrybutów pliku:
0: Zwykłe pliki.
1: Pliki tylko do odczytu.
8: Zwraca nazwę woluminu.
16: Zwraca tylko nazwę katalogu.
32: Plik został zmieniony od czasu wykonania ostatniej kopii zapasowej (bit archiwizacji).
Aby sprawdzić, czy określony bit w bajcie atrybutów jest ustawiony, należy użyć następującej metody:
Sub Przyklad_SetAttr_GetAttr
On Error Goto Obsluga_bledu REM Definicja elementu docelowego dla procedury obsługi błędów
If Dir("C:\test",16)="" Then MkDir "C:\test"
If Dir("C:\test\autoexec.sav")="" THEN Filecopy "c:\autoexec.bat", "c:\test\autoexec.sav"
SetAttr "c:\test\autoexec.sav" ,0
Filecopy "c:\autoexec.bat", "c:\test\autoexec.sav"
SetAttr "c:\test\autoexec.sav" ,1
print GetAttr( "c:\test\autoexec.sav" )
end
Obsluga_bledu:
Print Error
end
end sub