Удаление файлов в Windows Vista !????

[Leon144]

Всем приятного время суток. Возникла проблема следующего характера : Нужно программно удалить файл в системной папке Windows Vista ! Все вроде работает но, если на удаляемый файл поставить атрибут "Только для чтения" то удаление не происходит. Вопрос в следующем: Как определить установлен ли атрибут на файле "Только для чтения" и если да то как его снять?? Заранее благодарю за помощь!!!

[FireFenix]

Очередной вирус/троян/червь?

[Leon144]

С точностью до наоборот!!

[Ramzes]

Public Shared Function GetAttributes(ByVal path As String) As System.IO.FileAttributes
Member of: System.IO.File
Summary:
Gets the System.IO.FileAttributes of the file on the path.

Public Shared Sub SetAttributes(ByVal path As String, ByVal fileAttributes As System.IO.FileAttributes)
Member of: System.IO.File
Summary:
Sets the specified System.IO.FileAttributes of the file on the specified path.

[Alexandrius]

Проверить отмечен ли файл только для чтения можно так:

Код: Выделить всё

Dim Attr As Integer
        Attr = System.IO.File.GetAttributes(ИмяВашегофайла) And IO.FileAttributes.ReadOnly

Если Attr не равен нулю то меняй атрибут на IO.FileAttributes.Normal и удаляй.