Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Общий форум

Страница: 1 |

 

  Вопрос: ???Файлы в корзину??? Добавлено: 27.02.05 07:34  

Автор вопроса:  KEP
Есть программа которая удаляет файлы в корзину,

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
Public Const FOF_NOCONFIRMATION = &H15

With SHop
.wFunc = FO_DELETE
.pFrom = strFile
.fFlags = FOF_ALLOWUNDO + FOF_NOCONFIRMATION
End With


SHFileOperation SHop

но если какойто файл находитьтся на данный момент в памяти то программа долго и нудно думает секунд 10
а если активных файлов штук 20.... как можно ускорить этот процесс, или как можно определить программой что данный файл находиться в памяти и пропустить его или убить его из памяти.??? Помогите пожалуйста очень нужно.

Ответить

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

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



Вопросов: 117
Ответов: 1538
 Профиль | | #1 Добавлено: 27.02.05 14:59
Вызови
CreateFile FileName,GENERIC_READ,NULL,NULL,OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL,NULL

Если CreateFile сможет открыть файл - значит он не был до этого открыт, закроешь его CloseHandle'ом и удаляй.

Если же не смогла открыть (вернула -1) - значит он уже открыт, пропускай удаление до лучших времен

Ответить

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



Вопросов: 44
Ответов: 119
 Профиль | | #2 Добавлено: 28.02.05 14:30
Спасибо, все сделал!

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам