■ 파일 속성을 구하는 방법을 보여준다.
▶ 예제 코드 (VB)
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 |
Public Function IsReadOnlyFile(nFileAttribute As Integer) As Boolean IsReadOnlyFile = (nFileAttribute And 1) > 0 ' 읽기 전용 파일 End Function Public Function IsHiddenFile(nFileAttribute As Integer) As Boolean IsHiddenFile = (nFileAttribute And 2) > 0 ' 숨김 파일 End Function Public Function IsSystemFile(nFileAttribute As Integer) As Boolean IsSystemFile = (nFileAttribute And 4) > 0 ' 시스템 파일 End Function Public Function IsDiskVolume(nFileAttribute As Integer) As Boolean IsDiskVolume = (nFileAttribute And 8) > 0 ' 디스크 볼륨 End Function Public Function IsDirectory(nFileAttribute As Integer) As Boolean IsDirectory = (nFileAttribute And 16) > 0 ' 디렉토리 End Function Public Function IsArchiveFile(nFileAttribute As Integer) As Boolean IsArchiveFile = (nFileAttribute And 32) > 0 ' 아카이브 파일 End Function |