Как изменить атрибуты файла -> Форум на Исходниках.Ру

	Наши проекты: Журнал · Discuz!ML · Wiki · DRKB · Помощь проекту

Здравствуйте, Гость ! [216.73.217.2]

Модераторы: SCINER, B.V.

Как изменить атрибуты файла

D[u]fa

Сообщ. #1 , 30.03.04, 17:08

Master

Рейтинг (т): 112

' убрать атрибут "Только чтение"

Call SetAttr(strFileName, GetAttr(strFileName) And (Not vbReadOnly))

' убрать атрибут "Архивный"

Call SetAttr(strFileName, GetAttr(strFileName) And (Not vbArchive))

' Поставить атрибут "Только чтение"

Call SetAttr(strFileName, vbReadOnly)

' Поставить атрибут "Архивный"

Call SetAttr(strFileName, vbArchive)

Сообщение отредактировано: Andrey_Kun - 05.04.04, 10:24

1 пользователей читают эту тему (1 гостей и 0 скрытых пользователей)

0 пользователей:

[ Script execution time: 0,0137 ] [ 15 queries used ] [ Generated: 9.07.25, 03:54 GMT ]