如何检查Shell32.Folder.CopyHere()何时完成

时间:2012-04-06 11:26:13

标签: vb.net asynchronous zip shell32

我需要使用Shell32解压缩我的应用程序中的一些文件。现在,我使用srcFolder.CopyHere(destFolder.Items())来实现这一目标。但是,我的下一行代码需要新制作的ZIP文件。但由于CopyHere方法是异步,我如何检查它何时完成?现在我使用Thread.Sleep大约500毫秒这足以让我的电脑完成创建ZIP文件,但它不是很好的代码imo。

有什么想法吗?

如有必要,可提供更多信息/代码。

2 个答案:

答案 0 :(得分:10)

这是另一个等待完成复制的方法

'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

答案 1 :(得分:6)

我找到了它,使用了这样的东西:

  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

不是很完美,但会比第一次接近时间减少时间。