Cách kiểm tra khi nào Shell32.Folder.CopyHere() kết thúc

Question

Tôi cần phải giải nén vi một số tệp trong ứng dụng của tôi bằng Shell32. Ngay bây giờ, tôi sử dụng srcFolder.CopyHere(destFolder.Items()) để đạt được điều này. Tuy nhiên, dòng mã tiếp theo của tôi yêu cầu tệp ZIP mới được tạo. Nhưng vì phương pháp CopyHere là Không đồng bộ, làm thế nào tôi có thể kiểm tra khi nó kết thúc? Ngay bây giờ tôi sử dụng một Thread.Sleep cho khoảng 500 ms đó là đủ cho máy tính của tôi để hoàn thành việc tạo tập tin ZIP, nhưng nó không phải là mã imo tốt.

Bất kỳ ý tưởng nào?

Thông tin thêm/mã có thể được cung cấp nếu cần.

Answer 1

Tôi tìm thấy nó, sử dụng một cái gì đó như thế này:

srcFolder.CopyHere(destFolder.Items()) 


      While FileInUse(FILEPATH & "BudgetJaarOverzichtSMB.zip") 
       Thread.Sleep(100) 
      End While 

    Private Function FileInUse(ByVal FilePath As String) As Boolean 
     Try 
      FileOpen(1, FilePath, OpenMode.Input) 
      FileClose(1) 
      Return False ' File not in use 
     Catch ex As Exception 
      Return True  ' File in use 
     End Try 
    End Function 

Không thực sự hoàn hảo nhưng sẽ mất ít thời gian hơn so với cách tiếp cận đầu tiên của tôi.

Answer 2

Dưới đây là một số khác đã chờ đợi để kết thúc việc sao chép

'Wait until the File/Folder has finished writing to zip file... 
Do Until Shell.NameSpace(Filename).Items.Count = Shell.NameSpace(Input).Items.Count 
    System.Threading.Thread.Sleep(200) 
    System.Diagnostics.Debug.Print("Waiting...") 
Loop