VBNet - Форум - =-КОРЗИНА-=

Вопрос: =-КОРЗИНА-= Добавлено: 16.04.03 17:30

Автор вопроса: KEP

Помогите начинающему!

Как очистить корзину без запроса на ее чистку?

Ответить

Ответы Всего ответов: 6

Номер ответа: 1
Автор ответа:

Миха

ICQ: 394243

Вопросов: 20
Ответов: 151

Web-сайт: www.visualbasic.boom.ru
Профиль | | #1

Добавлено: 16.04.03 17:35

Public Type SHFILEOPSTRUCT

hwnd As Long
wFunc As Long
pFrom As String
pTo As String
fFlags As Integer
fAnyOperationsAborted As Long
hNameMappings As Long
lpszProgressTitle As Long

End Type

Public Declare Function SHFileOperation Lib "shell32.dll" Alias "SHFileOperationA" (lpFileOp As SHFILEOPSTRUCT) As Long

Public Const FO_DELETE = &H3
Public Const FOF_ALLOWUNDO = &H40

Пример использования

Dim SHop As SHFILEOPSTRUCT
Dim strFile As String

With Shop

.wFunc = FO_DELETE
.pFrom = strFile
.fFlags = FOF_ALLOWUNDO

End With

SHFileOperation SHop
' Где strFile есть полный путь к файлу, который Вы хотите поместить в Корзину

только поставь флажок "Уничтожать файлы сразу после удаления, не помещая их в корзину

Ответить

Номер ответа: 2
Автор ответа:

KEP

Вопросов: 44
Ответов: 119

Профиль | | #2

Добавлено: 16.04.03 17:44

Да но все равно запрашивает "Вы действительно хотите поместить xxx.x" в корзину

а мне нужно чтоб без всяких запросов

И чистить корзину так же...

Ответить

Номер ответа: 3
Автор ответа:

msv

Вопросов: 34
Ответов: 312

Web-сайт: msvprogs.narod.ru
Профиль | | #3

Добавлено: 16.04.03 20:22

Удалить без корзины - Kill "pathname"

Ответить

Номер ответа: 4
Автор ответа:

KEP

Вопросов: 44
Ответов: 119

Профиль | | #4

Добавлено: 17.04.03 00:02

Вы все меня непонил!

Мне нужно чтоб файлы которые я удоляю помещались в корзину без запроса на их помещения туда!

И как очистить корзину?

Ответить

Номер ответа: 5
Автор ответа:

Access

Вопросов: 0
Ответов: 32

Web-сайт: -
Профиль | | #5

Добавлено: 17.04.03 14:07

Чтобы удалить без подтверждения, смотри ответ 1, но измени флаг:

.fFlags = FOF_ALLOWUNDO + FOF_NOCONFIRMATION

ну и в модуль добавь

Public Const FOF_NOCONFIRMATION = &H10

Ответить

Номер ответа: 6
Автор ответа:

KEP

Вопросов: 44
Ответов: 119

Профиль | | #6

Добавлено: 17.04.03 15:12

Ой зашибись... , все работает!

Ответить

Страница: 1 |