Question

我正在使用VB 2010，我正在使用My.Computer.Network.DownloadFile方法下载列表框中列出的所有文件，大约1000个文件。

成功下载几个文件后，下载文件停留在下一个文件中，可以下载到任何百分比。但下载几个文件后重复。我启用了UI并在取消时设置了DoNothing。所以我需要取消跳转到下一个文件.. 什么是解决方案？

这是代码

    Private Sub btnDLFile2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnDLFile2.Click
    For i As Integer = 0 To lstReapedLinks.Items.Count - 1


        Dim targetFile As String = lstReapedLinks.Items(i).ToString
        Dim destFile As String = "e:\dls\files\" & i & ".jpg"

        lblDLFile.Text = "Downloading " & targetFile

        My.Computer.Network.DownloadFile(targetFile, destFile, "", "", True, 60000, True, FileIO.UICancelOption.DoNothing)

    Next
End Sub

Answer 1

您是从网络服务器下载这些文件吗？

如果是这样，请尝试使用WebClient.DownloadFile - 如果失败，您需要将其包装在try{...}catch{...}中。

Import System.Net

Dim fileReader As New WebClient()
dim fileAddress = "http://www.where-ever.com/TheFileYouWant.jpg"
fileReader.DownloadFile(fileAddress, "c:\YourSaveLocation\" + your-new-filename)

My.Computer.Network.DownloadFile方法卡在文件上

1 个答案: