Функция SfcIsFileProtected

Declare Function SfcIsFileProtected Lib "SFC.dll" (lpRpcHandle As Long, lpProtFileName As Any) As Long

SfcIsFileProtected определяет, является ли заданный файл защищенным. Ваше приложение должно избегать замены защищенных системных файлов

Возвращаемое значение

Если файл является защищенным, то возвращается ненулевое значение, Если файл не защищен, то возвращается 0 и GetLastError возвращает ERROR_FILE_NOT_FOUND. В случае ошибки GetLastError возвращает другие коды ошибок

Параметры

lpRpcHandle

Параметр должен быть равен 0

lpProtFileName

Имя файла

Пример

' Проверим, является ли Проводник защищенным приложением
Dim FileBuffer() As Byte, lRet As Long

FileBuffer() = "c:\windows\explorer.exe" & Chr(0)
lRet = SfcIsFileProtected(ByVal 0&, FileBuffer(0))

If lRet = 0 Then
      Print "Файл не защищен"
Else
      Print "Файл защищен"
End If

Смотри также

Категория