Функция SHEmptyRecycleBin

Declare Function SHEmptyRecycleBin Lib "shell32" Alias "SHEmptyRecycleBinA" ( _
    ByVal hwnd As Long, _
    ByVal pszRootPath As String, _
    ByVal dwFlags As Long) As Long

SHEmptyRecycleBin удаляет содержимое Корзины. Функция может удалять файлы из корзины выбранного диска или сразу всех дисков.

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

В успешном случае функция возвращает 0, в случае ошибки функция возвращает ненулевое значение

Параметры

hwnd

Описатель окна

pszRootPath

Путь к диску, чья Корзина будет освобождаться от файлов. Чтобы освободить все Мусорные корзины, установите значение равным пустой строке

dwFlags

Комбинация флагов:

SHERB_NOCONFIRMATION = &H1	Не показывать подверждение удаления файлов пользователю
Const SHERB_NOPROGRESSUI = &H2	Не показывать диалоговое окно, показывающее процесс удаления файлов из Корзины
SHERB_NOSOUND = &H4	Не воспроизводить звук после удаления файлов из Корзины

Пример

' Удаляем содержимое Корзин всех дисков, 
' не показывая процесса удаления файлов
Dim lRet As Long ' возвращаемое значение

' Удаляем содержимое Корзин, если пользователь согласен с этим
lRet = SHEmptyRecycleBin(Form1.hWnd, "", SHERB_NOPROGRESSUI)

Смотри также

Категория