IBM Lotus Symphony
|
Returnerer et bitmønster som identifiserer filtypen eller navnet på et volum eller en katalog.
GetAttr(Tekst som Streng)
Heltall
Tekst: Et strenguttrykk som inneholder en utvetydig filspesifikasjon. Du kan også bruke URL-notasjon.
Denne funksjonen bestemmer attributtene for en angitt fil og returnerer bitmønsteret som kan hjelpe deg å identifisere følgende filattributter:
0 : Normale filer.
1 : Skrivebeskyttede filer.
8 : Returnerer navnet på volumet.
16 : Returnerer bare navnet på katalogen.
32 : Filen ble endret siden siste sikkerhetskopi (arkiv-bit).
Hvis du vil vite om en bit i attributt-byten er angitt, bruker du følgende spørringsmetode:
Sub ExampleSetGetAttr
On Error Goto ErrorHandler REM Definer målet for feilbehandler
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