IBM Lotus Symphony


SetAttr-setningen [kjøretid]

Angir attributtinformasjon for en spesifisert fil.

Syntaks:

SetAttr Filnavn som streng, Attributt som heltall

Parametere:

Filnavn: Navn på filen, inklusive banen, som du vil teste attributtene til. Hvis du ikke angir en bane, søker SetAttr etter filen i gjeldende katalog. Du kan også bruke URL-notasjon.

Attributt: Bitmønster som definerer attributtene du vil angi eller fjerne:

Verdi

0 : Normale filer.

1 : Skrivebeskyttede filer.

32 : Filen ble endret siden siste sikkerhetskopi (arkiv-bit).

Du kan angi flere attributter ved å kombinere de respektive verdiene med et logisk OR-setning.

Feilkoder

5 Ugyldig prosedyrekall

53 Filen ble ikke funnet

70 Tilgang nektet

Eksempel:

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


Tilbakemelding om produktet | Annen dokumentasjon | Varemerker