SetAttr Statement

μ§€μ •ν•œ 파일의 속성 정보λ₯Ό μ„€μ •ν•©λ‹ˆλ‹€.

ꡬ문:


SetAttr FileName As String, Attribute As Integer

맀개 λ³€μˆ˜:

FileName: 속성을 ν…ŒμŠ€νŠΈν•  경둜λ₯Ό ν¬ν•¨ν•œ 파일의 μ΄λ¦„μž…λ‹ˆλ‹€. 경둜λ₯Ό μž…λ ₯ν•˜μ§€ μ•Šμ„ 경우 SetAttr은 ν˜„μž¬ λ””λ ‰ν† λ¦¬μ—μ„œ νŒŒμΌμ„ κ²€μƒ‰ν•©λ‹ˆλ‹€. URL ν‘œκΈ°λ²•μ„ μ‚¬μš©ν•  μˆ˜λ„ μžˆμŠ΅λ‹ˆλ‹€.

Attribute: μ„€μ •ν•˜κ±°λ‚˜ μ§€μšΈ 속성을 μ§€μ •ν•˜λŠ” λΉ„νŠΈ νŒ¨ν„΄μž…λ‹ˆλ‹€.

κ°’

Named constant

Value

Definition

ATTR_NORMAL

0

Normal files.

ATTR_READONLY

1

Read-only files.

ATTR_HIDDEN

2

Hidden file


논리 OR 문으둜 ν•΄λ‹Ή 값을 κ²°ν•©ν•˜μ—¬ μ—¬λŸ¬ 속성을 μ„€μ •ν•  수 μžˆμŠ΅λ‹ˆλ‹€.

Error codes:

5 잘λͺ»λœ ν”„λ‘œμ‹œμ € ν˜ΈμΆœμž…λ‹ˆλ‹€.

53 νŒŒμΌμ„ 찾을 수 μ—†μŠ΅λ‹ˆλ‹€.

70 μ‚¬μš© κΆŒν•œμ΄ κ±°λΆ€λ˜μ—ˆμŠ΅λ‹ˆλ‹€.

예:


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" , ATTR_READONLY
 Print GetAttr( "c:\test\autoexec.sav" )
 End
ErrorHandler:
 Print Error
 End
End Sub

Please support us!