Question

我在VB中创建一个项目，它有一个文件下载器，它可以正常使用.txt或图像等文件但是当我尝试下载.exe时，.exe会变成损坏的文件，我的意思是，程序只下载1 Kb的文件，无法执行它。

我正在使用此代码：

My.Computer.Network.DownloadFile(
    "http://www.web.domain/Archive.exe",
    "C:\Archive.exe")

我在2013年VS版本工作。

Answer 1

YAY !!!我找到了解决方案：

那是^^。谢谢你的答案。

Private Sub download_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles     Download.Click
    Download.Enabled = False
    httpclient = New WebClient
    AddHandler httpclient.DownloadFileCompleted, AddressOf Downloaded

    httpclient.DownloadFileAsync(New Uri("https://www.dropbox.com/s/2ch4prhn063hmxs/vanilla.exe?dl=1"), ("C:\BarberLand\downloads\Vanilla\vanilla.exe"))
End Sub

Private Sub dpc(ByVal sender As Object, ByVal e As System.Net.DownloadProgressChangedEventArgs) Handles httpclient.DownloadProgressChanged
    porcentaje.Text = e.ProgressPercentage
End Sub

Private Sub Downloaded()
    'Comprueba si el fichero se ha descargado completamente.
    If System.IO.File.Exists("C:\BarberLand\downloads\Vanilla\vanilla.exe") = True Then

        Process.Start("C:\BarberLand\downloads\Vanilla\vanilla.exe")
        Me.Close()
    Else
        MsgBox("El fichero no existe, pruebe con otra versión o si piensa que es un error, contácte con el administrador", 64, "Open")
    End If

End Sub

VB .exe文件下载

1 个答案: