IBM Lotus Symphony
|
Vráti bitový vzor, ktorý identifikuje typ súboru alebo názov nosiča alebo adresára.
GetAttr (Text As String)
Typ Integer
Text: Ľubovoľný reťazcový výraz, ktorý obsahuje jednoznačnú špecifikáciu súboru. Tiež môžete použiť zápis URL.
Táto funkcia určuje atribúty pre určený súbor a vráti bitový vzor, ktorý vám môže pomôcť identifikovať nasledujúce atribúty súboru:
0 : Normálne súbory.
1 : Súbory určené len na čítanie.
8 : Vráti názov nosiča
16 : Vráti len názov adresára.
32 : Súbor sa od posledného zálohovania zmenil (Archívny bit).
Ak chcete zistiť, či je nastavený bit bajtu atribútu, použite nasledujúcu metódu dotazovania:
Sub ExampleSetGetAttr
On Error Goto ErrorHandler REM Define target for error-handler
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
ErrorHandler:
Print Error
end
end sub