Я пытаюсь загрузить файл с URL-адреса, используя этот код:
Private Sub getPatch()
Using client As New WebClient
Dim url As String = My.Settings.host & "/update.zip"
If Directory.Exists(Replace(fName, "\update.zip", "")) Then Directory.Delete(Replace(fName, "\update.zip", ""), True)
Directory.CreateDirectory(Replace(fName, "\update.zip", ""))
AddHandler client.DownloadProgressChanged, AddressOf ProgressChanged
AddHandler client.DownloadFileCompleted, AddressOf DownloadFileCompleted
client.DownloadFileAsync(New Uri(url), fName)
End Using
End Sub
Public Sub ProgressChanged(ByVal sender As Object, ByVal e As System.Net.DownloadProgressChangedEventArgs)
Try
If e.ProgressPercentage = 100 Then Exit Sub
ProgressBar1.Value = e.ProgressPercentage
Catch ex As Exception
MsgBox(ex.ToString)
End Try
End Sub
Public Sub DownloadFileCompleted(ByVal sender As Object, ByVal e As System.Net.DownloadDataCompletedEventArgs)
If Not e.Cancelled AndAlso e.Error Is Nothing Then
MessageBox.Show("Download success")
extractZip(fName)
Else
MessageBox.Show("Download failed")
End If
End Sub
при завершении загрузки (файлы успешно сохранены на моем диске) всегда выдается ошибка
Произошло необработанное исключение типа 'System.Reflection.TargetInvocationException' в mscorlib.dll. Дополнительная информация: Исключение было вызвано целью вызова.
Я пытаюсь отладить его, нометод никогда не запускается DownloadComplete.