Пишу нечто вроде упрощенного проводника.
На контрол ListView можно кидать файлы и папки, они копируются и отображаются.Все это делается по событию OLEDragDrop
Для копирования использую обьекты Scripting.FileSystemObject, Scripting.Folder, Scripting.File
в завершении процедуры OLEDragDrop делаю так
- Код: Выделить всё
Unload fldr
Set fldr = Nothing
Unload oFile
Set oFile = Nothing
Unload fso
Set fso = Nothing
Теперь если открыть скопированную папку в windows explorer и попробывать удалить или переместить, пишет что занято другим приложением, файлы удаляются нормально вроде. Уж не могу разобраться в чем причина.
