通过检查更新功能

Question

首先发布这里，但我已经使用了这个网站上的一些文章，我希望有人可以提供帮助。我正在开发一个项目，用于每个人都会在我的工作中使用的工具。

        If My.Settings.Version >= Newestversion Then
        MsgBox("No Update Available!")
    ElseIf My.Settings.Version < Newestversion Then
        MsgBox("An update is available" & vbNewLine & "Update Now?", MsgBoxStyle.OkCancel)
        If MsgBoxResult.Ok Then
            'Download Exe'
            If System.IO.File.Exists(("C:\Program Files (x86)\iSolved\iSolved Tech Tool\iSolvedTech.exe")) Then
                System.IO.File.Delete("C:\Program Files (x86)\iSolved\iSolved Tech Tool\iSolvedTech.exe")
                My.Computer.Network.DownloadFile("https://www.dropbox.com/s/lxn1ropdn101qa3/iSolvedTech.exe?dl=1", IO.Path.Combine("C:\Program Files (x86)\iSolved\iSolved Tech Tool", SaveExe))
            ElseIf System.IO.File.Exists("C:\Program Files (x86)\iSolved\iSolved Tech Tool\iSolvedTech.exe") = False Then
                My.Computer.Network.DownloadFile("https://www.dropbox.com/s/lxn1ropdn101qa3/iSolvedTech.exe?dl=1", IO.Path.Combine("C:\Program Files (x86)\iSolved\iSolved Tech Tool", SaveExe))

代码下载.exe文件没有任何问题但是当我尝试从下载的.exe启动程序时，我收到以下错误：

我已经搜索了几个小时，试图找出它为什么不能正确下载文件。甚至尝试在表单上使用嵌入式webbrowser，但不会将文件保存到需要重新启动的位置。任何帮助肯定是赞赏的。 在写这个主题时我注意到的另一件事是，即使在MsgBox上点击没有“没有更新可用”（“没有更新可用”），elseif语句仍然会生效并下载文件。我错过了什么吗？有没有办法区分两个消息框？

Answer 1

我终于能够弄清楚这一点，只是在这里忘记了这个问题。

之所以只下载一个占位符，是因为更新功能中没有FileSystem.WriteAllBytes方法。我在Microsoft文档站点上找到了关于该方法的页面Here。希望这篇文章对其他像我这样的业余爱好者有帮助